Lines Matching defs:adj
332 U adj, rv;
586 dval(&adj) = dval(&rv);
587 word0(&adj) -= P*Exp_msk1;
588 /* adj = */ rounded_product(dval(&adj), tens[e2]);
589 if ((word0(&adj) & Exp_mask)
592 word0(&adj) += P*Exp_msk1;
593 dval(&rv) = dval(&adj);
863 if ((dval(&adj) = ratio(delta, bs)) <= 2.) {
877 adj0 = dval(&adj) = 1.;
880 adj0 = dval(&adj) *= 0.5;
885 if (dval(&adj) < 2147483647.) {
904 dval(&adj) = L;
909 /* adj *= ulp(dval(&rv)); */
910 /* if (asub) rv -= adj; else rv += adj; */
917 ab = d2b(dval(&adj), &abe, &abits);
924 /* rv -= adj; */
971 tol = dval(&adj) * 5e-16; /* > max rel error */
972 dval(&adj) = adj0 - .5;
973 if (dval(&adj) < -tol) {
979 else if (dval(&adj) > tol && adj0 < 1. - tol) {