Google
 

Trailing-Edge - PDP-10 Archives - decuslib10-06 - 43,50401/darsin.for
There is 1 other file named darsin.for in the archive. Click here to see a list.
00100	      FUNCTION DARSIN(X)
00200	      DOUBLE PRECISION X
00300	      DARSIN=DATAN(X/SQRT(1-X**2))
00400	      RETURN
00500	      END