" <-APL2-------------------- sam243.txt ---------------------------->
" <- drop (U) with axis, page 105 ---------------------------------->
L#a#3 4R'foldbeatrode'
1U[1]a
1U[2]a
1 0Ua
0 1Ua
L#q#3 2 4R'ABCDEFGH',(I8),'abcdefgh'
1 -1U[2 3]q
1 -1U[3 2]q
L#t#'w' 'we'('wee' 'weed')'b' 'be'('bee' 'beep')
L#u#2 3Rt
`=u
L#q#1U[1]u
`=q
Rq
L#m#-1U[2]u
`=m
Rm
L#n#-2U[2]u
`=n
Rn
L#v#3 4R'abcdefghijkl'
(1U[1]v)#2 4RI8
v
)off