/* * Written by J.T. Conklin <jtc@netbsd.org>. * Public domain. * * Adapted for `long double' by Ulrich Drepper <drepper@cygnus.com>. */ #include <math_private.h> long double __atanl (long double x) { long double res; asm ("fld1\n" "fpatan" : "=t" (res) : "0" (x)); return res; } weak_alias (__atanl, atanl)