Home
last modified time | relevance | path

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

/petsc/src/ksp/ksp/impls/qcg/
H A Dqcg.c22 PetscReal dsq, ptp, pts, rad, sts; in KSPQCGQuadraticRoots() local
26 PetscCall(VecDotRealPart(p, p, &ptp)); in KSPQCGQuadraticRoots()
29 rad = PetscSqrtReal((pts * pts) - ptp * (sts - dsq)); in KSPQCGQuadraticRoots()
31 *step2 = -(pts + rad) / ptp; in KSPQCGQuadraticRoots()
32 *step1 = (sts - dsq) / (ptp * *step2); in KSPQCGQuadraticRoots()
34 *step1 = -(pts - rad) / ptp; in KSPQCGQuadraticRoots()
35 *step2 = (sts - dsq) / (ptp * *step1); in KSPQCGQuadraticRoots()