gonzui

t2ex

bsd_source/lib/libc/src_bsd/math/e_j0.c - 15.1KB - 379 lines

103:          */
104:                 if(ix>0x48000000) z = (invsqrtpi*cc)/sqrt(x);
105:                 else {
106:                     u = pzero(x); v = qzero(x);
107:                     z = invsqrtpi*(u*cc-v*ss)/sqrt(x);
108:                 }
177:                 }
178:                 if(ix>0x48000000) z = (invsqrtpi*ss)/sqrt(x);
179:                 else {
180:                     u = pzero(x); v = qzero(x);
181:                     z = invsqrtpi*(u*ss+v*cc)/sqrt(x);
182:                 }