Searched refs:dginit (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/tao/linesearch/impls/morethuente/ |
| H A D | morethuente.c | 37 PetscReal finit, width, width1, dginit, fm, fxm, fym, dgm, dgxm, dgym; in TaoLineSearchApply_MT() local
79 PetscCall(VecDot(g, s, &dginit)); in TaoLineSearchApply_MT()
80 if (PetscIsInfOrNanReal(dginit)) { in TaoLineSearchApply_MT()
81 …PetscCall(PetscInfo(ls, "Initial Line Search step * g is infinity or NaN (%g)\n", (double)dginit)); in TaoLineSearchApply_MT()
85 if (dginit >= 0.0) { in TaoLineSearchApply_MT()
86 …all(PetscInfo(ls, "Initial Line Search step * g is not descent direction (%g)\n", (double)dginit)); in TaoLineSearchApply_MT()
95 dgtest = ls->ftol * dginit; in TaoLineSearchApply_MT()
107 dgx = dginit; in TaoLineSearchApply_MT()
110 dgy = dginit; in TaoLineSearchApply_MT()
182 …if ((*f - ftest1 <= PETSC_SMALL * PetscAbsReal(finit)) && (PetscAbsReal(dg) + ls->gtol * dginit <=… in TaoLineSearchApply_MT()
[all …]
|