INVCOS - see program for JRS algorithm.
     X   Cos(ArcCos(X))    ArcSin2(X)    ArcCos2(X)  Cos(ArcCos2(X))  *10^21
-1.000         1.000000     -1.570796      3.141593        -1.000000  û     0
-0.900         0.900000     -1.119770      2.690566        -0.900000      -54
-0.800         0.800000     -0.927295      2.498092        -0.800000  û     0
-0.700         0.700000     -0.775397      2.346194        -0.700000       54
-0.600         0.600000     -0.643501      2.214297        -0.600000       54
-0.500         0.500000     -0.523599      2.094395        -0.500000      -54
-0.400         0.400000     -0.411517      1.982313        -0.400000      -27
-0.300         0.300000     -0.304693      1.875489        -0.300000      -27
-0.200         0.200000     -0.201358      1.772154        -0.200000       54
-0.100         0.100000     -0.100167      1.670964        -0.100000      -14
 0.000      Error 200 !      0.000000      1.570796        -0.000000  û     0
 0.100         0.100000      0.100167      1.470629         0.100000       14
 0.200         0.200000      0.201358      1.369438         0.200000      -54
 0.300         0.300000      0.304693      1.266104         0.300000       27
 0.400         0.400000      0.411517      1.159279         0.400000       27
 0.500         0.500000      0.523599      1.047198         0.500000       54
 0.600         0.600000      0.643501      0.927295         0.600000  û     0
 0.700         0.700000      0.775397      0.795399         0.700000       54
 0.800         0.800000      0.927295      0.643501         0.800000      -54
 0.900         0.900000      1.119770      0.451027         0.900000       54
 1.000         1.000000      1.570796      0.000000         1.000000  û     0
                                                    JRS $N+ $E- : RMS =    39
<cr>         X        T=ArcSin2(1.0-X)          (2.0*T/Pi)-1.0
 1.0E-0002  1.42925685347047E+0000 -9.01068272888242E-0002
 1.0E-0004  1.55665407331738E+0000 -9.00323818961888E-0003
 1.0E-0006  1.56938211311467E+0000 -9.00316391183494E-0004
 1.0E-0008  1.57065490543854E+0000 -9.00316316906740E-0005
 1.0E-0010  1.57078218465927E+0000 -9.00316316096596E-0006
 1.0E-0012  1.57079491258134E+0000 -9.00316314358680E-0007
 1.0E-0014  1.57079618537371E+0000 -9.00315240620142E-0008
 1.0E-0016  1.57079631265151E+0000 -9.00395767417395E-0009
 1.0E-0018  1.57079632539791E+0000 -8.89347548187723E-0010
 1.0E-0020  1.57079632679490E+0000  0.00000000000000E+0000
 1.0E-0022  1.57079632679490E+0000  0.00000000000000E+0000
 1.0E-0024  1.57079632679490E+0000  0.00000000000000E+0000
 1.0E-0026  1.57079632679490E+0000  0.00000000000000E+0000
 1.0E-0028  1.57079632679490E+0000  0.00000000000000E+0000
 1.0E-0030  1.57079632679490E+0000  0.00000000000000E+0000
 1.0E-0032  1.57079632679490E+0000  0.00000000000000E+0000
<cr>