gonzui

t2ex

bsd_source/lib/libc/src_bsd/math/e_lgammaf_r.c - 8.1KB - 232 lines

97: 
98:         if(ix<0x3e800000) return __kernel_sinf(pi*x,zero,0);
99:         y = -x;                /* x is assume negative */
121:         switch (n) {
122:             case 0:   y =  __kernel_sinf(pi*y,zero,0); break;
123:             case 1:   
125:             case 3:  
126:             case 4:   y =  __kernel_sinf(pi*(one-y),zero,0); break;
127:             case 5:
128:             case 6:   y = -__kernel_cosf(pi*(y-(float)1.5),zero); break;
129:             default:  y =  __kernel_sinf(pi*(y-(float)2.0),zero,0); break;
130:             }