Lines Matching refs:theta
366 PetscReal gamma1, p, q, r, s, sgnd, stpc, stpf, stpq, theta;
387 theta = 3 * (*fx - *fp) / (*stp - *stx) + *dx + *dp;
388 s = PetscMax(PetscAbsReal(theta), PetscAbsReal(*dx));
390 gamma1 = s * PetscSqrtScalar(PetscPowScalar(theta / s, 2.0) - (*dx / s) * (*dp / s));
393 p = (gamma1 - *dx) + theta;
410 theta = 3 * (*fx - *fp) / (*stp - *stx) + *dx + *dp;
411 s = PetscMax(PetscAbsReal(theta), PetscAbsReal(*dx));
413 gamma1 = s * PetscSqrtScalar(PetscPowScalar(theta / s, 2.0) - (*dx / s) * (*dp / s));
415 p = (gamma1 - *dp) + theta;
436 theta = 3 * (*fx - *fp) / (*stp - *stx) + *dx + *dp;
437 s = PetscMax(PetscAbsReal(theta), PetscAbsReal(*dx));
442 gamma1 = s * PetscSqrtScalar(PetscMax(0.0, PetscPowScalar(theta / s, 2.0) - (*dx / s) * (*dp / s)));
444 p = (gamma1 - *dp) + theta;
468 theta = 3 * (*fp - *fy) / (*sty - *stp) + *dy + *dp;
469 s = PetscMax(PetscAbsReal(theta), PetscAbsReal(*dy));
471 gamma1 = s * PetscSqrtScalar(PetscPowScalar(theta / s, 2.0) - (*dy / s) * (*dp / s));
473 p = (gamma1 - *dp) + theta;