Lines Matching refs:one
131 static const double zero = 0., one = 1.0, tiny = 1e-300; variable
150 endian = (*(int *) &one) ? 1 : 0;
154 return(one/zero);
164 else return (one/x);
165 one+1e-20; /* Raise inexact flag. */
166 return (one/x);
185 z = one/(x*x);
190 u.a -= one;
213 y = x - one;
214 ym1 = y - one;
221 yy.a = r.a - one;
225 for (ym1 = y-one; ym1 > LEFT + x0; y = ym1--, yy.a--) {
253 t = (one-x0); t += x;
254 d = (one-x0); d -= t; d += x;
310 return (one/zero);
323 y = one - x; /* exact: 128 < |x| < 255 */
334 y = one-x;
335 if (one-y == x)