" <-APL2-------------------- sam273.txt ---------------------------->
" <- Relational Functions p218 ------------------------------------->
)load cap2/help/help
'trial'='trial'
8 -2 6 -4 0 < 0
L#l#('in' 'out') (9 5 6) (`Z2 2RI4)
L#r#('it' 'but') 6 (2 2R1 8 5 4)
display l=r
" <- Replicate (/) ------------------------------------------------->
1 2 3 4 / 'abcd'
L#r#3 2R'a' 8 7 6 5 4
2 -1 1 -2 / r
1 2 -1 3 -2 / 6 7 8
0 2 0 1 / 'soap'
2 / 4 5
L#s#,[I0]'ton'
1 -2 2 / s
1 -2 3 / 6
L#w#'i' 'id' ('ide' 'idea')
`=w
L#x#3 2 1 / w
`=x
L#p#1 2 0 / w
`=p
" <- Replicate with Axis (/[] `/[]) -------------------------------->
L#r#3 2 4RI24
2 -1 1 / [2]r
L#s#3 2 4 R I24
2/[2]s
L#t#3 1 4R'abcdefghijkl'
Rt
-1 1/[2]t
R-1 1/[2]t
L#m#3 4RI12
1 0 2 -1 `/ m
1 0 2 -1 /[1] m
L#d#2 2 2R'he' 'me' 'we' 'us' 'i' 'a' 'o' 'e'
Rd
`=d
L#j#0 2/[1]d
`=j
L#w#2 -1 1 /[2] d
Rw
`=w
)off