" <-APL2-------------------- sam264.txt ---------------------------->
" <- Logarithm (@) p 170 ------------------------------------------->
2@256
10@100 500 1000
1@1
2@0j2
" <- Magnitude (|) p 171 ------------------------------------------->
|-4.2
|2 -2 .3 -.3
|2j-3
|0j1 2j-2 4j3
" <- Matrix Divide (M) p 174 --------------------------------------->
L#r#2 2R1 0 0 2
L#l#2 2R1 2 4 8
1 4 M r
l M r
v#1 1.2 1.4 1.6 1.8 2
L#l#!v
1.6 B `O l M v J.* 0,I2
1.6 B `O l M v J.* 0,I3
1.6 B `O l M v J.* 0,I4
1.6 B `O l M v J.* 0,I5
" <- Matrix Inverse (M) pp 176-178 --------------------------------->
L#r#3 3R1 0 0 0 2 0 2 0 4
L#z#Mr
z +.X r
L#r#3 3 R 1 2 3 2 4 5 3 5 6
L#z#Mr
r +.X z
L#r#4 3 R 1 0 0 0 2 0 2 0 2 0 1 4
L#z#Mr
z +.X r
M3 4
M3
)off