" <-APL2-------------------- sam272.txt ---------------------------->
" <- Ravel (,) p 201 ----------------------------------------------->
L#a#3 3RI9
L#z#,a
Rz
L#b#2 2 4R'bad fog go  slow'
Rb
L#m#,b
Rm
Rc#4
`=c
Rw#,c
`=w
L#s#2 2R(1 2) (3 4) (5 6) (7 8)
`=s
(,s)#'abcd'
s
Rs
`=s
" <- Reciprocal (%) p 207 ------------------------------------------>
%4 1 .2 -3
%2j2 0j1 0j-1
" <- Reduce (/) ---------------------------------------------------->
+/1 2 3 4 5
L#z#+/(1 2)(3 4)(5 6)
Rz
`=z
V/0 0 1 1 0
L#w#,/'ab' 'cd' 'ef'
Rw
`=w
L#m#3 4RI12
+/m
L#r#3 2R'acegik',`1'bdfhfl'
L#y#,/r
Ry
`=y
=/15
L#n#4 1R2 4 6 8
%/n
+/I0
L#a#X/2 3 0R`Z0 0
Ra
`=a
" <- Reduce with axis (/[]) ---------------------------------------->
L#m#3 4RI12
+/[1]m
,/[1]2 3RI6
L#n#2 3 4RI24
+/[1]n
+/[2]n
X/[1]m
X`/m
L#n#2 1 4R2XI8
%/[2]n
%/[2]2 0 3R0
)off