Home
last modified time | relevance | path

Searched refs:stpc (Results 1 – 1 of 1) sorted by relevance

/petsc/src/tao/linesearch/impls/morethuente/
H A Dmorethuente.c366 PetscReal gamma1, p, q, r, s, sgnd, stpc, stpf, stpq, theta; in Tao_mcstep() local
396 stpc = *stx + r * (*stp - *stx); in Tao_mcstep()
399 if (PetscAbsReal(stpc - *stx) < PetscAbsReal(stpq - *stx)) stpf = stpc; in Tao_mcstep()
400 else stpf = stpc + 0.5 * (stpq - stpc); in Tao_mcstep()
418 stpc = *stp + r * (*stx - *stp); in Tao_mcstep()
421 if (PetscAbsReal(stpc - *stp) > PetscAbsReal(stpq - *stp)) stpf = stpc; in Tao_mcstep()
447 if (r < 0.0 && gamma1 != 0.0) stpc = *stp + r * (*stx - *stp); in Tao_mcstep()
448 else if (*stp > *stx) stpc = ls->stepmax; in Tao_mcstep()
449 else stpc = ls->stepmin; in Tao_mcstep()
453 if (PetscAbsReal(*stp - stpc) < PetscAbsReal(*stp - stpq)) stpf = stpc; in Tao_mcstep()
[all …]