Home
last modified time | relevance | path

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

/petsc/src/ksp/ksp/impls/cg/stcg/
H A Dstcg.c18 PetscReal norm_r, norm_d, norm_dp1, norm_p, dMp; in KSPCGSolve_STCG()
227 dMp = 0.0; in KSPCGSolve_STCG()
318 norm_dp1 = norm_d + alpha * (2.0 * dMp + alpha * norm_p); in KSPCGSolve_STCG()
334 step = (PetscSqrtReal(dMp * dMp + norm_p * (r2 - norm_d)) - dMp) / norm_p; in KSPCGSolve_STCG()
463 dMp = beta * (dMp + alpha * norm_p); in KSPCGSolve_STCG()
468 PetscCall(VecDot(d, p, &dMp)); in KSPCGSolve_STCG()
501 step = (PetscSqrtReal(dMp * dMp + norm_p * (r2 - norm_d)) - dMp) / norm_p; in KSPCGSolve_STCG()
/petsc/src/ksp/ksp/impls/cg/nash/
H A Dnash.c19 PetscReal norm_r, norm_d, norm_dp1, norm_p, dMp; in KSPCGSolve_NASH()
230 dMp = 0.0; in KSPCGSolve_NASH()
320 norm_dp1 = norm_d + alpha * (2.0 * dMp + alpha * norm_p); in KSPCGSolve_NASH()
335 step = (PetscSqrtReal(dMp * dMp + norm_p * (r2 - norm_d)) - dMp) / norm_p; in KSPCGSolve_NASH()
464 dMp = beta * (dMp + alpha * norm_p); in KSPCGSolve_NASH()
469 PetscCall(VecDot(d, p, &dMp)); in KSPCGSolve_NASH()
/petsc/src/ksp/ksp/impls/cg/gltr/
H A Dgltr.c69 PetscReal norm_r, norm_d, norm_dp1, norm_p, dMp; in KSPCGSolve_GLTR()
267 dMp = 0.0; in KSPCGSolve_GLTR()
353 step = (PetscSqrtReal(dMp * dMp + norm_p * (r2 - norm_d)) - dMp) / norm_p; in KSPCGSolve_GLTR()
368 norm_dp1 = norm_d + alpha * (2.0 * dMp + alpha * norm_p); in KSPCGSolve_GLTR()
378 step = (PetscSqrtReal(dMp * dMp + norm_p * (r2 - norm_d)) - dMp) / norm_p; in KSPCGSolve_GLTR()
475 dMp = beta * (dMp + alpha * norm_p); in KSPCGSolve_GLTR()
480 PetscCall(VecDot(d, p, &dMp)); in KSPCGSolve_GLTR()
506 step = (PetscSqrtReal(dMp * dMp + norm_p * (r2 - norm_d)) - dMp) / norm_p; in KSPCGSolve_GLTR()
/petsc/src/ksp/ksp/impls/cg/
H A Dcg.c124 PetscReal r2, norm_p, norm_d, dMp; in KSPSolve_CG() local
239 dMp = 0.0; in KSPSolve_CG()
240 if (!ksp->guess_zero) PetscCall(VecDotRealPart(X, P, &dMp)); in KSPSolve_CG()
251 PetscCall(VecDotRealPart(X, P, &dMp)); in KSPSolve_CG()
273 a = (PetscSqrtReal(dMp * dMp + norm_p * (r2 - norm_d)) - dMp) / norm_p; in KSPSolve_CG()
292 PetscReal norm_dp1 = norm_d + PetscRealPart(a) * (2.0 * dMp + PetscRealPart(a) * norm_p); in KSPSolve_CG()
297 dp = (PetscSqrtReal(dMp * dMp + norm_p * (r2 - norm_d)) - dMp) / norm_p; in KSPSolve_CG()