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


apl>" <- direction (x), page 93 ---------------------------------------->


apl>X-5

-1

apl>X-4 0 4

-1 0 1

apl>X3j4

.6j.8  

apl>X0j1 0j-1

0j1 0j-1

apl>" <- disclose (`X), page 94 ---------------------------------------->


apl>`X(2 3 4) (5 6)

2 3 4
5 6 0

apl>L#r#2 3R(I4)'abcd' '****'(5 6 7 8)'efgh' 'HHHH'

 1 2 3 4  abcd **** 
 5 6 7 8  efgh HHHH 


apl>Rr

2 3

apl>`=r

2

apl>L#z#`Xr

 1 2 3 4 
 a b c d 
 * * * * 
         
 5 6 7 8 
 e f g h 
 H H H H 


apl>Rz

2 3 4

apl>`=z

1

apl>L#e#(2 4RI8) 9 (3 2R'abcdef')

 1 2 3 4   9  ab 
 5 6 7 8      cd 
              ef 


apl>L#n#`Xe

 1 2 3 4 
 5 6 7 8 
 0 0 0 0 
         
 9 0 0 0 
 0 0 0 0 
 0 0 0 0 
         
 a b     
 c d     
 e f     


apl>Rn

3 3 4

apl>`=n

1

apl>L#v#`Xd#'wheel' 'of' 'fortune'

wheel  
of     
fortune


apl>Rv

3 7

apl>`=v

1

apl>)off