1/* 2 * Written by J.T. Conklin <jtc@netbsd.org>. 3 * Public domain. 4 */ 5 6#include <machine/asm.h> 7 8RCSID("$NetBSD: e_asin.S,v 1.4 1995/05/08 23:45:40 jtc Exp $") 9 10/* asin = atan (x / sqrt(1 - x^2)) */ 11ENTRY(__ieee754_asin) 12 fldl 4(%esp) /* x */ 13 fld %st 14 fmul %st(0) /* x^2 */ 15 fld1 16 fsubp /* 1 - x^2 */ 17 fsqrt /* sqrt (1 - x^2) */ 18 fpatan 19 ret 20END (__ieee754_asin) 21