Searched refs:Rl (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/ksp/ksp/impls/bicg/ |
| H A D | bicg.c | 16 Vec X, B, Zl, Zr, Rl, Rr, Pl, Pr; in KSPSolve_BiCG() local
25 Rl = ksp->work[0]; in KSPSolve_BiCG()
40 PetscCall(VecCopy(Rr, Rl)); in KSPSolve_BiCG()
42 PetscCall(KSP_PCApplyHermitianTranspose(ksp, Rl, Zl)); in KSPSolve_BiCG()
61 PetscCall(VecDot(Zr, Rl, &beta)); /* beta <- r'z */ in KSPSolve_BiCG()
86 PetscCall(VecAXPY(Rl, ma, Zl)); in KSPSolve_BiCG()
89 PetscCall(KSP_PCApplyHermitianTranspose(ksp, Rl, Zl)); in KSPSolve_BiCG()
106 PetscCall(KSP_PCApplyHermitianTranspose(ksp, Rl, Zl)); in KSPSolve_BiCG()
|
| /petsc/src/ksp/pc/impls/bjacobi/bjkokkos/ |
| H A D | bjkokkos.kokkos.cxx | 349 PetscScalar *Rl = ptr; in BJSolve_BICG() local
385 Rl[rowb - start] = Rr[rowb - start] = glb_b[rowa]; in BJSolve_BICG()
392 Zl[idx] = Di[idx] * Rl[idx]; in BJSolve_BICG()
416 …(team, Nblk), [=](const int idx, PetscScalar &dot) { dot += Zr[idx] * PetscConj(Rl[idx]); }, beta); in BJSolve_BICG()
462 Rl[idx] = Rl[idx] + t2 * Zl[idx]; in BJSolve_BICG()
503 Zl[idx] = Di[idx] * Rl[idx]; in BJSolve_BICG()
|