Lines Matching refs:one
86 * to compute the worse one.)
128 one = 1.0,
187 if(huge+x>one) return 0.5*x;/* inexact if x!=0 necessary */
191 s = one+z*(s01+z*(s02+z*(s03+z*(s04+z*s05))));
230 if (x == 0) return -one/zero;
258 * to compute the worse one.
276 v = one+z*(v0[0]+z*(v0[1]+z*(v0[2]+z*(v0[3]+z*v0[4]))));
277 return (x*(u/v) + tpi*(j1(x)*log(x)-one/x));
363 z = one/(x*x);
365 s = one+z*(q[0]+z*(q[1]+z*(q[2]+z*(q[3]+z*q[4]))));
366 return (one + r/s);
457 z = one/(x*x);
459 s = one+z*(q[0]+z*(q[1]+z*(q[2]+z*(q[3]+z*(q[4]+z*q[5])))));