Searched refs:Rr (Results 1 – 3 of 3) 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
28 Rr = ksp->work[3]; in KSPSolve_BiCG()
35 PetscCall(KSP_MatMult(ksp, Amat, X, Rr)); /* r <- b - Ax */ in KSPSolve_BiCG()
36 PetscCall(VecAYPX(Rr, -1.0, B)); in KSPSolve_BiCG()
38 PetscCall(VecCopy(B, Rr)); /* r <- b (x is 0) */ in KSPSolve_BiCG()
40 PetscCall(VecCopy(Rr, Rl)); in KSPSolve_BiCG()
41 PetscCall(KSP_PCApply(ksp, Rr, Zr)); /* z <- Br */ in KSPSolve_BiCG()
46 PetscCall(VecNorm(Rr, NORM_2, &dp)); /* dp <- r'*r */ in KSPSolve_BiCG()
84 PetscCall(VecAXPY(Rr, ma, Zr)); in KSPSolve_BiCG()
88 PetscCall(KSP_PCApply(ksp, Rr, Zr)); /* z <- Br */ in KSPSolve_BiCG()
[all …]
|
| /petsc/src/ksp/pc/impls/bjacobi/bjkokkos/ |
| H A D | bjkokkos.kokkos.cxx | 367 PetscScalar *Rr = ptr; in BJSolve_BICG() local
385 Rl[rowb - start] = Rr[rowb - start] = glb_b[rowa]; in BJSolve_BICG()
391 Zr[idx] = Di[idx] * Rr[idx]; in BJSolve_BICG()
396 …nge(team, Nblk), [=](const int idx, PetscScalar &lsum) { lsum += Rr[idx] * PetscConj(Rr[idx]); }, … in BJSolve_BICG()
461 Rr[idx] = Rr[idx] + t1 * Zr[idx]; in BJSolve_BICG()
467 …nge(team, Nblk), [=](const int idx, PetscScalar &lsum) { lsum += Rr[idx] * PetscConj(Rr[idx]); }, … in BJSolve_BICG()
502 Zr[idx] = Di[idx] * Rr[idx]; in BJSolve_BICG()
|
| /petsc/src/ts/tutorials/power_grid/ |
| H A D | ex5.c | 53 PetscReal Rr; /* Rotor resistance */ member
157 user->Rr = 0.01; in SetInductionGeneratorParams()
|