Lines Matching refs:one
122 static const double zero = 0., one = 1.0, tiny = _TINY;
143 int endian = (*(int *) &one) ? 1 : 0;
148 return(one/zero);
158 else return (one/x);
160 b =one+1e-20; /* Raise inexact flag. ??? -ragge */
162 return (one/x);
180 z = one/(x*x);
185 u.a -= one;
207 y = x - one;
208 ym1 = y - one;
215 yy.a = r.a - one;
219 for (ym1 = y-one; ym1 > LEFT + x0; y = ym1--, yy.a--) {
246 t = (one-x0); t += x;
247 d = (one-x0); d -= t; d += x;
301 return (one/zero);
315 y = one - x; /* exact: 128 < |x| < 255 */
326 y = one-x;
327 if (one-y == x)