Searched refs:ndots (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ksp/ksp/impls/fcg/ |
| H A D | fcg.c | 172 PetscInt l, ndots; in KSPSolve_FCG() local
175 ndots = i - l; in KSPSolve_FCG()
176 if (ndots) { in KSPSolve_FCG()
181 PetscCall(PetscMalloc3(ndots, &dots, ndots, &Cold, ndots, &Pold)); in KSPSolve_FCG()
182 for (k = l, j = 0; j < ndots; ++k, ++j) { in KSPSolve_FCG()
187 PetscCall(VecXMDot(Z, ndots, Cold, dots)); in KSPSolve_FCG()
188 for (k = 0; k < ndots; ++k) dots[k] = -dots[k]; in KSPSolve_FCG()
189 PetscCall(VecMAXPY(Pcurr, ndots, dots, Pold)); in KSPSolve_FCG()
|