AutoCAD
;;;  WIKI-ASIN 
; End AutoLISP comment mode if on |;
(DEFUN WIKI-ASIN (X)
;| Returns the arc sine of a number
   Edit the source code for this function at 
  asin (AutoLISP function)
|;
 (ATAN X (SQRT (- 1 (* X X))))
)