Lines Matching refs:dval
324 #define dval(x) (x)->d macro
1228 return dval(&u);
1298 return dval(&d);
1446 dval(&da) = b2d(a, &ka);
1447 dval(&db) = b2d(b, &kb);
1457 dval(&da) *= 1 << k;
1463 dval(&db) *= 1 << k;
1473 return dval(&da) / dval(&db);
2465 dval(rv) += 2.*sulp(rv,bc);
2482 dval(rv) -= sulp(rv,bc);
2487 dval(rv) += sulp(rv,bc);
2559 dval(&rv) = 0.;
2757 dval(&rv) = y;
2763 dval(&rv) = tens[k - 9] * dval(&rv) + z;
2788 /* rv = */ rounded_product(dval(&rv), tens[e]);
2805 dval(&rv) *= tens[i];
2812 /* rv = */ rounded_product(dval(&rv), tens[e]);
2818 /* rv = */ rounded_product(dval(&rv), tens[e]);
2832 /* rv = */ rounded_quotient(dval(&rv), tens[-e]);
2864 dval(&rv) *= tens[i];
2887 dval(&rv0) = 1e300;
2888 dval(&rv0) *= dval(&rv0);
2910 dval(&rv) *= bigtens[j];
2913 dval(&rv) *= bigtens[j];
2930 dval(&rv) /= tens[i];
2939 dval(&rv) *= tinytens[j];
2958 dval(&rv) *= tinytens[j];
2960 dval(&rv0) = dval(&rv);
2961 dval(&rv) *= tinytens[j];
2962 if (!dval(&rv)) {
2963 dval(&rv) = 2.*dval(&rv0);
2964 dval(&rv) *= tinytens[j];
2966 if (!dval(&rv)) {
2968 dval(&rv) = 0.;
3168 dval(&rv) += adj.d*ulp(dval(&rv));
3174 dval(&rv) += adj.d*ulp(&rv);
3197 adj.d *= ulp(dval(&rv));
3199 dval(&rv) += adj.d;
3201 dval(&rv) -= adj.d;
3211 dval(&rv) += adj.d;
3214 dval(&rv) -= adj.d;
3345 dval(&rv) += sulp(&rv, &bc);
3347 dval(&rv) += ulp(&rv);
3352 dval(&rv) -= sulp(&rv, &bc);
3354 dval(&rv) -= ulp(&rv);
3357 if (!dval(&rv)) {
3421 dval(&rv0) = dval(&rv);
3424 dval(&rv) += adj.d;
3445 dval(&aadj2) = aadj1;
3447 aadj1 = dval(&aadj2);
3449 dval(&rv) += adj.d;
3462 dval(&rv) += adj.d;
3467 dval(&rv0) = dval(&rv);
3470 dval(&rv) += adj.d;
3494 dval(&rv) += adj.d;
3510 dval(&rv) += adj.d;
3562 dval(&rv0) += 1.;
3572 dval(&rv) *= dval(&rv0);
3587 dval(&rv0) = 1e-300;
3588 dval(&rv0) *= dval(&rv0);
3594 return sign ? -dval(&rv) : dval(&rv);
3806 dval(&u) += 0; /* normalize */ in zend_dtoa()
3808 if (!dval(&u)) { in zend_dtoa()
3833 dval(&d2) = dval(&u); in zend_dtoa()
3838 dval(&d2) /= 1 << j; in zend_dtoa()
3877 dval(&d2) = x; in zend_dtoa()
3883 ds = (dval(&d2)-1.5)*0.289529654602168 + 0.1760912590558 + i*0.301029995663981; in zend_dtoa()
3889 if (dval(&u) < tens[k]) in zend_dtoa()
3966 dval(&d2) = dval(&u); in zend_dtoa()
3976 dval(&u) /= bigtens[n_bigtens-1]; in zend_dtoa()
3984 dval(&u) /= ds; in zend_dtoa()
3987 dval(&u) *= tens[j1 & 0xf]; in zend_dtoa()
3991 dval(&u) *= bigtens[i]; in zend_dtoa()
3994 if (k_check && dval(&u) < 1. && ilim > 0) { in zend_dtoa()
3999 dval(&u) *= 10.; in zend_dtoa()
4002 dval(&eps) = ieps*dval(&u) + 7.; in zend_dtoa()
4006 dval(&u) -= 5.; in zend_dtoa()
4007 if (dval(&u) > dval(&eps)) in zend_dtoa()
4009 if (dval(&u) < -dval(&eps)) in zend_dtoa()
4018 dval(&eps) = 0.5/tens[ilim-1] - dval(&eps); in zend_dtoa()
4023 dval(&eps1) *= tens[j1 & 0xf]; in zend_dtoa()
4026 dval(&eps1) *= bigtens[i]; in zend_dtoa()
4032 L = dval(&u); in zend_dtoa()
4033 dval(&u) -= L; in zend_dtoa()
4035 if (1. - dval(&u) < dval(&eps)) in zend_dtoa()
4037 if (dval(&u) < dval(&eps)) in zend_dtoa()
4041 dval(&eps) *= 10.; in zend_dtoa()
4042 dval(&u) *= 10.; in zend_dtoa()
4048 dval(&eps) *= tens[ilim-1]; in zend_dtoa()
4049 for(i = 1;; i++, dval(&u) *= 10.) { in zend_dtoa()
4050 L = (Long)(dval(&u)); in zend_dtoa()
4051 if (!(dval(&u) -= L)) in zend_dtoa()
4055 if (dval(&u) > 0.5 + dval(&eps)) in zend_dtoa()
4057 else if (dval(&u) < 0.5 - dval(&eps)) { in zend_dtoa()
4070 dval(&u) = dval(&d2); in zend_dtoa()
4082 if (ilim < 0 || dval(&u) <= 5*ds) in zend_dtoa()
4086 for(i = 1;; i++, dval(&u) *= 10.) { in zend_dtoa()
4087 L = (Long)(dval(&u) / ds); in zend_dtoa()
4088 dval(&u) -= L*ds; in zend_dtoa()
4091 if (dval(&u) < 0) { in zend_dtoa()
4093 dval(&u) += ds; in zend_dtoa()
4097 if (!dval(&u)) { in zend_dtoa()
4111 dval(&u) += dval(&u); in zend_dtoa()
4113 if (dval(&u) >= ds) in zend_dtoa()
4115 if (dval(&u) > ds || (dval(&u) == ds && L & 1)) in zend_dtoa()
4392 dval(&u) += 1.; in zend_dtoa()
