Home | History | Annotate | Download | only in gdtoa

Lines Matching refs:dval

183 	dval(&d) += 0; /* normalize */
185 if (!dval(&d)) {
204 b = d2b(dval(&d), &be, &bbits);
212 dval(&d2) = dval(&d);
217 dval(&d2) /= 1 << j;
256 dval(&d2) = x;
262 ds = (dval(&d2)-1.5)*0.289529654602168 + 0.1760912590558 + i*0.301029995663981;
268 if (dval(&d) < tens[k])
347 dval(&d2) = dval(&d);
357 dval(&d) /= bigtens[n_bigtens-1];
365 dval(&d) /= ds;
368 dval(&d) *= tens[jj1 & 0xf];
372 dval(&d) *= bigtens[i];
375 if (k_check && dval(&d) < 1. && ilim > 0) {
380 dval(&d) *= 10.;
383 dval(&eps) = ieps*dval(&d) + 7.;
387 dval(&d) -= 5.;
388 if (dval(&d) > dval(&eps))
390 if (dval(&d) < -dval(&eps))
399 dval(&eps) = 0.5/tens[ilim-1] - dval(&eps);
401 L = dval(&d);
402 dval(&d) -= L;
404 if (dval(&d) < dval(&eps))
406 if (1. - dval(&d) < dval(&eps))
410 dval(&eps) *= 10.;
411 dval(&d) *= 10.;
417 dval(&eps) *= tens[ilim-1];
418 for(i = 1;; i++, dval(&d) *= 10.) {
419 L = (Long)(dval(&d));
420 if (!(dval(&d) -= L))
424 if (dval(&d) > 0.5 + dval(&eps))
426 else if (dval(&d) < 0.5 - dval(&eps)) {
439 dval(&d) = dval(&d2);
451 if (ilim < 0 || dval(&d) <= 5*ds)
455 for(i = 1;; i++, dval(&d) *= 10.) {
456 L = (Long)(dval(&d) / ds);
457 dval(&d) -= L*ds;
460 if (dval(&d) < 0) {
462 dval(&d) += ds;
466 if (!dval(&d)) {
480 dval(&d) += dval(&d);
482 if (dval(&d) >= ds)
484 if (dval(&d) > ds || (dval(&d) == ds && L & 1))
828 dval(&d) += 1.;