gonzui

t2ex

bsd_source/lib/libc/src_bsd/math/e_atan2f.c - 3.2KB - 93 lines

39:            return x+y;
40:         if(hx==0x3f800000) return atanf(y);   /* x=1.0 */
41:         m = ((hy>>31)&1)|((hx>>30)&2); /* 2*sign(x)+sign(y) */
79:         else if(hx<0&&k<-60) z=0.0;    /* |y|/x < -2**60 */
80:         else z=atanf(fabsf(y/x));      /* safe to do y/x */
81:         switch (m) {