Lines Matching refs:eps
2292 U d2, eps, u;
2483 dval(&eps) = ieps*dval(&u) + 7.;
2484 word0(&eps) -= (P-1)*Exp_msk1;
2488 if (dval(&u) > dval(&eps))
2490 if (dval(&u) < -dval(&eps))
2498 dval(&eps) = 0.5/tens[ilim-1] - dval(&eps);
2503 if (dval(&u) < dval(&eps))
2505 if (1. - dval(&u) < dval(&eps))
2509 dval(&eps) *= 10.;
2515 dval(&eps) *= tens[ilim-1];
2522 if (dval(&u) > 0.5 + dval(&eps))
2524 else if (dval(&u) < 0.5 - dval(&eps)) {