Searched refs:fnrm_old (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/snes/linesearch/impls/secant/ |
| H A D | linesearchsecant.c | 19 PetscReal fnrm, fnrm_old, fnrm_mid; in SNESLineSearchApply_Secant() local
39 fnrm_old = gnorm * gnorm; in SNESLineSearchApply_Secant()
41 PetscCall(SNESComputeObjective(snes, X, &fnrm_old)); in SNESLineSearchApply_Secant()
42 SNESLineSearchCheckObjectiveDomainError(snes, fnrm_old); in SNESLineSearchApply_Secant()
113 …d, (double)PetscSqrtReal(fnrm), (double)PetscSqrtReal(fnrm_mid), (double)PetscSqrtReal(fnrm_old))); in SNESLineSearchApply_Secant()
115 …lambda, (double)lambda_mid, (double)lambda_old, (double)fnrm, (double)fnrm_mid, (double)fnrm_old)); in SNESLineSearchApply_Secant()
134 delFnrm = (3. * fnrm - 4. * fnrm_mid + 1. * fnrm_old) / delLambda; in SNESLineSearchApply_Secant()
135 delFnrm_old = (-3. * fnrm_old + 4. * fnrm_mid - 1. * fnrm) / delLambda; in SNESLineSearchApply_Secant()
183 fnrm_old = fnrm; in SNESLineSearchApply_Secant()
|