Lines Matching refs:eps
2403 _double d, d2, eps; local
2634 value(eps) = ieps*value(d) + 7.;
2635 word0(eps) -= (P-1)*Exp_msk1;
2639 if (value(d) > value(eps))
2641 if (value(d) < -value(eps))
2650 value(eps) = 0.5/tens[ilim-1] - value(eps);
2655 if (value(d) < value(eps))
2657 if (1. - value(d) < value(eps))
2661 value(eps) *= 10.;
2668 value(eps) *= tens[ilim-1];
2674 if (value(d) > 0.5 + value(eps))
2676 else if (value(d) < 0.5 - value(eps)) {