am48_atan.asm
bitfixer_bitfixer/dg/z88dk/libsrc/_DEVELOPMENT/math/float/math48/z80/am48_atan.asm

; double atan(double x)

SECTION code_clib
SECTION code_fp_math48

PUBLIC am48_atan

EXTERN mm48_atn

   ; arctan
   ; AC' = atan(AC')
   ;
   ; enter : AC' = double x
   ;
   ; exit  : AC' = atan(x)
   ;
   ; note  : -pi/2 < atan(x) < pi/2
   ;
   ;         atan( 1 )= pi/4
   ;         atan(-1 )=-pi/4
   ;
   ; uses  : af, af', bc', de', hl'
   
defc am48_atan = mm48_atn
