apl>" <-APL2-------------------- sam258.txt ---------------------------->


apl>" <- Grade Down (z#Wr) pp 150-152 ---------------------------------->


apl>" ------------------------------------------------------------------


apl>dcs#' ','ABCDEFGHIJKLMNOPQRSTUVWXYZ',[.5]'abcdefghijklmnopqrstuvwxyz'


apl>dcs#(dcs,[1]((8,-1YRdcs))R' '),,F10 1R-1+I10


apl>dcs

 ABCDEFGHIJKLMNOPQRSTUVWXYZ0
 abcdefghijklmnopqrstuvwxyz1
                           2
                           3
                           4
                           5
                           6
                           7
                           8
                           9

apl>" ------------------------------------------------------------------


apl>dcsW'avenue'

2 5 4 3 6 1

apl>h[L#dcsWh#'yzommxa']

2 1 6 3 4 5 7

zyxomma

apl>q[L#dcsWq#5 4R'sent zapdownalsoboa ';]

1 3 5 4 2

sent
down
boa 
also
 zap

apl>k[L#dcsWk#5 4R'dealDealdeadDeadDEED';]

5 1 2 3 4

DEED
deal
Deal
dead
Dead

apl>" ------------------------------------------------------------------


apl>L#s # `X 'X1' 'X10' 'X2' 'X21' 'X3' 'X9' 'X11' 'x3'

X1 
X10
X2 
X21
X3 
X9 
X11
x3 


apl>s[L#dcsWs;] " s/b 4 7 2 8 6 5 3 1

4 7 2 6 8 5 3 1

X21
X11
X10
X9 
x3 
X3 
X2 
X1 

apl>" ------------------------------------------------------------------


apl>'abcde'W'dabbed'

5 1 6 3 4 2

apl>q[L#'abcde'Wq#'bleat']

2 5 3 1 4

lteba

apl>)off