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


apl>" <- expand (\) with axis ------------------------------------------>


apl>L#r#2 3 4RI24

 1  2  3  4
 5  6  7  8
 9 10 11 12

13 14 15 16
17 18 19 20
21 22 23 24


apl>((,r)[1 3 14 16])#'acde'


apl>r

  a  2  c  4 
  5  6  7  8 
  9 10 11 12 
             
 13  d 15  e 
 17 18 19 20 
 21 22 23 24 

apl>1 1 0 1\[2]r

  a  2  c  4 
  5  6  7  8 
             
  9 10 11 12 
             
 13  d 15  e 
 17 18 19 20 
  0  0  0  0 
 21 22 23 24 

apl>L#f#2 2 2R`Z[2]8 2RI16

   1 2    3 4 
   5 6    7 8 
              
  9 10  11 12 
 13 14  15 16 


apl>1 0 1\[2]f

   1 2    3 4 
   0 0    0 0 
   5 6    7 8 
              
  9 10  11 12 
   0 0    0 0 
 13 14  15 16 

apl>L#g#2 2 2R1 (2 3) 4 (5 6) 7 (8 9) 10 (11 12)

  1    2 3 
  4    5 6 
           
  7    8 9 
 10  11 12 


apl>1 0 1\[2]g

  1    2 3 
  0      0 
  4    5 6 
           
  7    8 9 
  0      0 
 10  11 12 

apl>L#t#2 1 3RI6

1 2 3

4 5 6


apl>1 0 0 1\[2]t

1 2 3
0 0 0
0 0 0
1 2 3

4 5 6
0 0 0
0 0 0
4 5 6

apl>L#m#3 4R'a' 'b' 1 'c' 2 3 4 5 6 7 8 9

 a b 1 c 
 2 3 4 5 
 6 7 8 9 


apl>1 0 0 1 1 `\ m

 a b 1 c 
         
         
 2 3 4 5 
 6 7 8 9 

apl>1 0 0 1 1 \[1] m

 a b 1 c 
         
         
 2 3 4 5 
 6 7 8 9 

apl>L#m#3 2RI6

1 2
3 4
5 6


apl>(1 1 0 0 1\[1]m)#5 2R_I10


apl>m

-1  -2
-3  -4
-9 -10

apl>)off