Lines Matching refs:one
48 * guarantee the error less than one ulp where x is not too far
105 one = 1.0L,
284 return copysignl(one,x); /* return +-1.0 is x=Inf */
295 s = y-one;
296 t = C1+__poly_libmq(s,12,P1)/(one+s*__poly_libmq(s,12,Q1));
300 t = C2+__poly_libmq(s,12,P2)/(one+s*__poly_libmq(s,13,Q2));
304 return (signbitl(x))? t-one: one-t;
320 if (x<=0.25) return one-erfl(x);
327 s = x-one;
328 t = one-C1;
329 return t - __poly_libmq(s,12,P1)/(one+s*__poly_libmq(s,12,Q1));
332 t = one-C2;
333 return t - __poly_libmq(s,12,P2)/(one+s*__poly_libmq(s,13,Q2));