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


apl>" <- Ravel (,) p 201 ----------------------------------------------->


apl>L#a#3 3RI9

1 2 3
4 5 6
7 8 9


apl>L#z#,a

1 2 3 4 5 6 7 8 9


apl>Rz

9

apl>L#b#2 2 4R'bad fog go  slow'

bad 
fog 

go  
slow


apl>Rb

2 2 4

apl>L#m#,b

bad fog go  slow


apl>Rm

16

apl>Rc#4

.

apl>`=c

0

apl>Rw#,c

1

apl>`=w

1

apl>L#s#2 2R(1 2) (3 4) (5 6) (7 8)

 1 2  3 4 
 5 6  7 8 


apl>`=s

2

apl>(,s)#'abcd'


apl>s

  abcd abcd    abcd abcd  
  abcd abcd    abcd abcd  

apl>Rs

2 2

apl>`=s

3

apl>" <- Reciprocal (%) p 207 ------------------------------------------>


apl>%4 1 .2 -3

 .25 1 5 -0.33333333

apl>%2j2 0j1 0j-1

.25j-0.25  0j-1 0j1

apl>" <- Reduce (/) ---------------------------------------------------->


apl>+/1 2 3 4 5

15

apl>L#z#+/(1 2)(3 4)(5 6)

 9 12 


apl>Rz

.

apl>`=z

2

apl>V/0 0 1 1 0

1

apl>L#w#,/'ab' 'cd' 'ef'

 abcdef 


apl>Rw

.

apl>`=w

2

apl>L#m#3 4RI12

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


apl>+/m

10 26 42

apl>L#r#3 2R'acegik',`1'bdfhfl'

 ab cd 
 ef gh 
 if kl 


apl>L#y#,/r

 abcd efgh ifkl 


apl>Ry

3

apl>`=y

2

apl>=/15

15

apl>L#n#4 1R2 4 6 8

2
4
6
8


apl>%/n

2 4 6 8

apl>+/I0

0

apl>L#a#X/2 3 0R`Z0 0

 0 0  0 0  0 0 
 0 0  0 0  0 0 


apl>Ra

2 3

apl>`=a

2

apl>" <- Reduce with axis (/[]) ---------------------------------------->


apl>L#m#3 4RI12

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


apl>+/[1]m

15 18 21 24

apl>,/[1]2 3RI6

 1 4  2 5  3 6 

apl>L#n#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>+/[1]n

14 16 18 20
22 24 26 28
30 32 34 36

apl>+/[2]n

15 18 21 24
51 54 57 60

apl>X/[1]m

45 120 231 384

apl>X`/m

45 120 231 384

apl>L#n#2 1 4R2XI8

 2  4  6  8

10 12 14 16


apl>%/[2]n

 2  4  6  8
10 12 14 16

apl>%/[2]2 0 3R0

1 1 1
1 1 1

apl>)off