Searched refs:fty_old (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/snes/linesearch/impls/cp/ |
| H A D | linesearchcp.c | 11 PetscScalar fty, fty_init, fty_old, fty_mid1, fty_mid2, s; in SNESLineSearchApply_CP() local
30 PetscCall((*linesearch->ops->vidirderiv)(snes, F, X, Y, &fty_old)); in SNESLineSearchApply_CP()
32 PetscCall(VecDot(F, Y, &fty_old)); in SNESLineSearchApply_CP()
34 if (PetscAbsScalar(fty_old) < atol * ynorm) { in SNESLineSearchApply_CP()
37 …point because dot(F,Y) = %g < atol*||y|| = %g\n", (double)PetscAbsScalar(fty_old), (double)(atol *… in SNESLineSearchApply_CP()
43 fty_init = fty_old; in SNESLineSearchApply_CP()
92 …, (double)lambda, (double)lambda_old, (double)PetscRealPart(fty), (double)PetscRealPart(fty_old))); 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()
[all …]
|