Lines Matching refs:adj
317 double adj, adj0, rv, tol;
837 if ((dval(adj) = ratio(delta, bs)) <= 2.) {
851 adj0 = dval(adj) = 1.;
854 adj0 = dval(adj) *= 0.5;
859 if (dval(adj) < 2147483647.) {
878 dval(adj) = (double)L;
883 /* adj *= ulp(dval(rv)); */
884 /* if (asub) rv -= adj; else rv += adj; */
893 ab = d2b(dval(adj), &abe, &abits);
902 /* rv -= adj; */
955 tol = dval(adj) * 5e-16; /* > max rel error */
956 dval(adj) = adj0 - .5;
957 if (dval(adj) < -tol) {
963 else if (dval(adj) > tol && adj0 < 1. - tol) {