gonzui

t2ex

bsd_source/lib/libc/src_bsd/math/s_tan.c - 2.3KB - 82 lines

61:         ix &= 0x7fffffff;
62:         if(ix <= 0x3fe921fb) return __kernel_tan(x,z,1);
63: 
69:             n = __ieee754_rem_pio2(x,y);
70:             return __kernel_tan(y[0],y[1],1-((n&1)<<1)); /*   1 -- n even
71:                                                         -1 -- n odd */