[thirdparty/glibc.git] / sysdeps / i386 / fpu / e_asinf.S

/*
 * Written by J.T. Conklin <jtc@netbsd.org>.
 * Public domain.
 * Adapted for float type by Ulrich Drepper <drepper@cygnus.com>.
 */

#include <machine/asm.h>

RCSID("$NetBSD: $")

/* asin = atan (x / sqrt(1 - x^2)) */
ENTRY(__ieee754_asinf)
	flds	4(%esp)			/* x */
	fld	%st
	fmul	%st(0)			/* x^2 */
	fld1
	fsubp				/* 1 - x^2 */
	fsqrt				/* sqrt (1 - x^2) */
	fpatan
	ret
END (__ieee754_asinf)
strong_alias (__ieee754_asinf, __asinf_finite)
Commit	Line	Data
d38cd08c UD	1	/*
	2	* Written by J.T. Conklin <jtc@netbsd.org>.
	3	* Public domain.
	4	* Adapted for float type by Ulrich Drepper <drepper@cygnus.com>.
	5	*/
	6
	7	#include <machine/asm.h>
	8
	9	RCSID("$NetBSD: $")
	10
	11	/* asin = atan (x / sqrt(1 - x^2)) */
	12	ENTRY(__ieee754_asinf)
	13	flds 4(%esp) /* x */
0d8733c4	14	fld %st
d38cd08c UD	15	fmul %st(0) /* x^2 */
	16	fld1
	17	fsubp /* 1 - x^2 */
	18	fsqrt /* sqrt (1 - x^2) */
	19	fpatan
	20	ret
	21	END (__ieee754_asinf)
0ac5ae23	22	strong_alias (__ieee754_asinf, __asinf_finite)