Searched refs:Pcurr (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/ksp/ksp/impls/fcg/ |
| H A D | fcg.c | 78 Vec B, R, Z, X, Pcurr, Ccurr; in KSPSolve_FCG() local
153 Pcurr = fcg->Pvecs[idx]; in KSPSolve_FCG()
169 PetscCall(VecCopy(Z, Pcurr)); in KSPSolve_FCG()
189 PetscCall(VecMAXPY(Pcurr, ndots, dots, Pold)); in KSPSolve_FCG()
196 PetscCall(VecXDot(Pcurr, R, &beta)); /* beta <- pi'*r */ in KSPSolve_FCG()
204 PetscCall(KSP_MatMult(ksp, Amat, Pcurr, Ccurr)); /* w <- A*pi (stored in ci) */ in KSPSolve_FCG()
206 PetscCall(VecXDot(Pcurr, Ccurr, &dpi)); /* dpi <- pi'*w */ in KSPSolve_FCG()
215 PetscCall(VecAXPY(X, alpha, Pcurr)); /* x <- x + alpha * pi */ in KSPSolve_FCG()
|
| /petsc/src/ksp/ksp/impls/fcg/pipefcg/ |
| H A D | pipefcg.c | 86 Vec B, R, Z, X, Qcurr, W, ZETAcurr, M, N, Pcurr, Scurr, *redux; in KSPSolve_PIPEFCG_cycle() local
122 Pcurr = pipefcg->Pvecs[0]; in KSPSolve_PIPEFCG_cycle()
126 PetscCall(VecCopy(Z, Pcurr)); in KSPSolve_PIPEFCG_cycle()
127 PetscCall(KSP_MatMult(ksp, Amat, Pcurr, Scurr)); /* S = Ap */ in KSPSolve_PIPEFCG_cycle()
150 PetscCall(VecAXPY(X, +alpha, Pcurr)); /* x <- x + alpha * pi */ in KSPSolve_PIPEFCG_cycle()
188 Pcurr = pipefcg->Pvecs[idx]; in KSPSolve_PIPEFCG_cycle()
207 PetscCall(VecCopy(Z, Pcurr)); in KSPSolve_PIPEFCG_cycle()
246 PetscCall(VecCopy(Z, Pcurr)); in KSPSolve_PIPEFCG_cycle()
250 … PetscCall(VecMAXPY(Pcurr, j, betas, pipefcg->Pold)); /* pi <- ui - sum_k beta_k p_k */ in KSPSolve_PIPEFCG_cycle()
|