apl>" <-APL2-------------------- sam232.txt ---------------------------->
apl>" <- catenate (,) -------------------------------------------------->
apl>L#z#2 4 6,1 3 5
2 4 6 1 3 5
apl>Rz
6
apl>L#z#'abc',1 2 3 4
abc 1 2 3 4
apl>Rz
7
apl>L#k#2 3RI6
1 2 3
4 5 6
apl>L#q#2 2R7 8 9 10
7 8
9 10
apl>L#h#k,q
1 2 3 7 8
4 5 6 9 10
apl>" <- catenate and vector notation ---------------------------------->
apl>L#m#2,3
2 3
apl>L#n#2 3
2 3
apl>m `= n
1
apl>L#x#9 8 7,6 5 4
9 8 7 6 5 4
apl>L#q#9 8 7 6 5 4
9 8 7 6 5 4
apl>x `= q
1
apl>L#e#'to', 'ken'
token
apl>Re
5
apl>`=e
1
apl>L#f#'to' 'ken'
to ken
apl>Rf
2
apl>`=f
2
apl>" <- arguments have the same rank ---------------------------------->
apl>L#a#3 4R'blueshoefoot'
blue
shoe
foot
apl>L#b#3 5R'berrylacesstool'
berry
laces
stool
apl>L#z#a,b
blueberry
shoelaces
footstool
apl>Rz
3 9
apl>L#c#2 1R'thomas' 'william'
thomas
william
apl>`=c
2
apl>L#d#2 1R('aquinas' 'more')('ockham' 'shakespeare')
aquinas more
ockham shakespeare
apl>`=d
3
apl>c,d
thomas aquinas more
william ockham shakespeare
apl>`=c,d
3
apl>Yj#'',I0
0
apl>' ' = Yk#(I0),''
1
apl>'s',2 4R'prigtray'
sprig
stray
apl>(2 2 3RI12),'*'
1 2 3 *
4 5 6 *
7 8 9 *
10 11 12 *
apl>L#u#'sat'
sat
apl>L#v#'teammazerail'
teammazerail
apl>u,v
satteammazerail
apl>L#w#'1: ' '2: '
1: 2:
apl>L#y#,[I0]'log on' 'log off'
log on
log off
apl>L#g#w,y
1: log on
2: log off
apl>Rg
2 2
apl>`=g
2
apl>)off