Lines Matching refs:fty
11 PetscScalar fty, fty_init, fty_old, fty_mid1, fty_mid2, s; in SNESLineSearchApply_CP() local
51 PetscCall((*linesearch->ops->vidirderiv)(snes, F, W, Y, &fty)); in SNESLineSearchApply_CP()
53 PetscCall(VecDot(F, Y, &fty)); in SNESLineSearchApply_CP()
70 if (PetscAbsScalar(fty) / PetscAbsScalar(fty_init) < rtol) { in SNESLineSearchApply_CP()
73 …e search: abs(fty/fty_init) = %g <= rtol = %g\n", (double)(PetscAbsScalar(fty) / PetscAbsScalar(f… in SNESLineSearchApply_CP()
80 if (PetscAbsScalar(fty) < atol * ynorm && i > 0) { in SNESLineSearchApply_CP()
83 … Line search: abs(fty)/||y|| = %g <= atol = %g\n", (double)(PetscAbsScalar(fty) / ynorm), (double)… in SNESLineSearchApply_CP()
92 …s = [%g, %g]\n", (double)lambda, (double)lambda_old, (double)PetscRealPart(fty), (double)PetscReal… in SNESLineSearchApply_CP()
99 s = (fty - fty_old) / delLambda; in SNESLineSearchApply_CP()
112 s = (3. * fty - 4. * fty_mid1 + fty_old) / delLambda; in SNESLineSearchApply_CP()
136 s = (2. * fty_mid2 + 3. * fty - 6. * fty_mid1 + fty_old) / (3. * delLambda); in SNESLineSearchApply_CP()
149 lambda_update = lambda - PetscRealPart(fty / s); in SNESLineSearchApply_CP()
152 if (lambda_update < minlambda) lambda_update = lambda + PetscRealPart(fty / s); in SNESLineSearchApply_CP()
173 fty_old = fty; in SNESLineSearchApply_CP()