" <-APL2-------------------- sam289.txt ---------------------------->
" <----------------------------------------------------------------->
Lex 'sin'
Gz#sin x;a;b
z#((1Oa)X6Ob)+0j1X(2Oa#9Ox)X5Ob#11Ox
G
(L#1Ox) = sin x#0j1+1 2 3
" <----------------------------------------------------------------->
Lex 'cos'
Gz#cos x;a;b
z#((2Oa)X6Ob)+0j1X(_1Oa#9Ox)X5Ob#11Ox
G
(L#2Ox) = cos x#0j1+1 2 3
" <----------------------------------------------------------------->
Lex 'tan'
Gz#tan x;a;b;c
z#((1Oa)%c)+0j1X(5Ob)%c#(2Oa#2X9Ox)+6Ob#2X11Ox
G
(L#3Ox) = tan x#0j1+1 2 3
" <----------------------------------------------------------------->
Lex 'sinh'
Gz#sinh x;a;b;c
z#((5Oa)X2Ob)+0j1X(6Oa#9Ox)X1Ob#11Ox
G
(L#5Ox) = sinh x#0j1+1 2 3
" <----------------------------------------------------------------->
Lex 'cosh'
Gz#cosh x;a;b;c
z#((6Oa)X2Ob)+0j1X(5Oa#9Ox)X1Ob#11Ox
G
(L#6Ox) = cosh x#0j1+1 2 3
" <----------------------------------------------------------------->
Lex 'exp'
Gz#exp x;a;b;c
z#(*a#9Ox)X(2Ob)+0j1X1Ob#11Ox
G
(L#*x) = exp x#0j1+1 2 3
" <----------------------------------------------------------------->
)off