" <-APL2-------------------- sam283.txt ---------------------------->
" <- Name and Symbol binding (pp 34-35) ---------------------------->
a#2 3RI6
b#3 2RI6
c#2 2RI4
+.X/a b c
(+.X)/(a b c)
" <- The following generates an error ----------------------------->
+.(X/(a b c))
" <----------------------------------------------------------------->
2 1 3 / 2 3 4
1 2 + 3 4
(2 1 3) / (2 3 4)
(1 2) + (3 4)
+.X/(1 2 3) (4 5 6) (7 8 9)
+.(X/(1 2 3) (4 5 6) (7 8 9))
(+.X)/(1 2 3) (4 5 6) (7 8 9)
1++.X/(1 2 3) (4 5 6) (7 8 9)
2 3 X 4 5 + 6 7
2 3 X (4 5 + 6 7)
(2 3 X 4 5) + 6 7
.3 .2 .1 +[1] m # 3 4 R I 12
.3 .2 .1 +    m # 3 4 R I 12
" <----------------------------------------------------------------->
a#(1 2 3) (4 5 6) (7 8 9)
(Ya)#'abc'
a
((,a)[3])#'xy'
a
a#b#(2 3)(2 3 4 5)(10 20)
3Y2`Xa
(3Y2`Xa)#'abc'
a
4Y2`Xb
(4Y2`Xb)#2 3 4
b
a#b#c#(2 3)(4 5 6 7)(8 9)
Ya
1`Xb
(Ya)`=1`Xb
(Ya)#10 11 12
a
(1`Xb)#10 11 12
b
(4Y2`Xc)#10 11 12
c
a#'abcd'
((I0)`Xa)#10 20 30
a
" <----------------------------------------------------------------->
a#0RL#a#(2 3)(4 5 6 7)(8 9)
Ya
" <----------------------------------------------------------------->
k#2 3R.1XI6
j#2 3 4RI24
j+[1 2]k
(j+[1 2]k)`=j+[1 2]k
" <----------------------------------------------------------------->
Gz # m binom n
a # m!n
b # (!n) % (!m) X (!n_m)
z # T (a = b),[1]a,[.5]b
G
3 binom 6
2 3 4 2 binom 6 18 24 5
2 3 4 2 ! 6 18 24 5
Gz # m binom n
a # m!n
b # (!n) % (!m) X ! n _ m
c # (!n) % (!m) X _ m
z # T (a = b),[1]a,[1]b,[.5]c
G
3 binom 6
2 3 4 2 binom 6 18 24 5
Gz # l bineg r
a # l ! r
b # (-1*r_l)X(_r+1)!(_l+1)
z # T a,[.5]b
G
((4R-5),(3R-4),(2R-3),-2) bineg -4 -3 -2 -1 -3 -2 -1 -2 -1 -1
((4R-5),(3R-4),(2R-3),-2) ! -4 -3 -2 -1 -3 -2 -1 -2 -1 -1
a#-6+I11
a J.! a
)off