Lines Matching refs:fnrm
19 PetscReal fnrm, fnrm_old, fnrm_mid; in SNESLineSearchApply_Secant() local
66 fnrm = gnorm; in SNESLineSearchApply_Secant()
67 PetscCall((*linesearch->ops->vinorm)(snes, F, W, &fnrm)); in SNESLineSearchApply_Secant()
69 PetscCall(VecNorm(F, NORM_2, &fnrm)); in SNESLineSearchApply_Secant()
72 fnrm = fnrm * fnrm; in SNESLineSearchApply_Secant()
79 PetscCall(SNESComputeObjective(snes, W, &fnrm)); in SNESLineSearchApply_Secant()
83 if (!PetscIsInfOrNanReal(fnrm)) break; in SNESLineSearchApply_Secant()
113 …ble)lambda, (double)lambda_mid, (double)lambda_old, (double)PetscSqrtReal(fnrm), (double)PetscSqrt… in SNESLineSearchApply_Secant()
115 …, %g]\n", (double)lambda, (double)lambda_mid, (double)lambda_old, (double)fnrm, (double)fnrm_mid, … 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()