" <-APL2-------------------- sam309.txt ---------------------------->
" <-Inverse sine for real numbers----------------------------------->
L#v#y=z#-1Ox#1Oy#O(_`Rt),0,t#.25 .5 .6 1 1.1 1.9 2 2.1 2.9 3 3.1
(D/u),(S/u#v/y) " Range of y where y=-1O1Oy
y=((-1*|n)Xz)+On#(Xy)XD((|y)+O.5)%O1
" <-Inverse cosine for real numbers--------------------------------->
L#v#y=z#-2Ox#2Oy
(D/u),(S/u#v/y) " Range of y where y=-2O2Oy
y=z+(_((2Xz)_pi)X2|n)+On#Dy%pi#O1
" <-Inverse tangent for real numbers-------------------------------->
L#v#y=z#-3Ox#3Oy#O(_`Rt),0,t#.25 .499 .6 1 1.1 1.9 2 2.1 2.9 3 3.1
(D/u),(S/u#v/y) " Range of y where y=-3O3Oy
&/y=z+OD(y+O.5)%pi#O1
" <-Inverse sinh for real numbers----------------------------------->
Lct#1e-10
y#O(_`Rt),0,t#.25 .5 .6 1 1.1 1.9 2 2.1 2.9 3 3.1 5
L#v#y=z#-5Ox#5Oy
(D/u),(S/u#v/y) " Range of y where y=-5O5Oy
v,x,y,z,[1.5]y_z
" <-Inverse cosh for real numbers--------------------------------->
Lct#1e-10
y#O(_`Rt),0,t#.25 .5 .6 1 1.1 1.9 2 2.1 2.9 3 3.1
L#v#y=z#-6Ox#6Oy
(D/u),(S/u#v/y) " Range of y where y=-6O6Oy
v,x,y,z,[1.5]y_z
" <-Inverse tanh for real numbers-------------------------------->
Lpp#7
Lct#1e-10
&/v#y=z#-7Ox#7Oy#(_`Rt),0,t#.5 1.5 2 3 4 10 15
(D/u),(S/u#v/y) " Range of y where y=-7O7Oy
v,x,y,z,[1.5]y_z
)off