apl>" <------------------------- sam100.txt ---------------------------->
apl>)copy cap2/handbook/wksp/ac adjustdown
apl>)copy cap2/handbook/wksp/df H
apl>)copy cap2/handbook/wksp/gi if index
apl>)copy cap2/handbook/wksp/pr rowindices
apl>e # 1 17 R ' sales'
apl>e # e,[1] ' _____'
apl>e # e,[1] ' '
apl>e # e,[1] ' 1 2 3 4|abcde'
apl>e # e,[1] ' 5 6 7 8|fghij'
apl>e # e,[1] ' 9 10 11 12|klmno'
apl>e # e,[1] ' _____'
apl>e
sales
_____
1 2 3 4|abcde
5 6 7 8|fghij
9 10 11 12|klmno
_____
apl>7 adjustdown e
sales
_____
1 2 3 4|abcde
5 6 7 8|fghij
9 10 11 12|klmno
|_____
apl>)off