Searched refs:est3 (Results 1 – 1 of 1) sorted by relevance
29 static double err2, est1, est2, est3, est4; in SNESNoise_dnest_() local122 est3 = (fval[mh + 3] - fval[mh] * 2 + fval[mh - 3]) / (*h__ * 3) / (*h__ * 3); in SNESNoise_dnest_()123 est4 = (est1 + est2 + est3) / 3; in SNESNoise_dnest_()129 d__1 = PetscMax(d__3, est3) - est4; in SNESNoise_dnest_()130 d__2 = est4 - PetscMin(d__4, est3); in SNESNoise_dnest_()135 else if (err2 < PetscAbsScalar(est4)) *fder2 = est3; in SNESNoise_dnest_()