Searched refs:loc_it (Results 1 – 3 of 3) sorted by relevance
| /petsc/src/ksp/ksp/impls/gmres/pipefgmres/ |
| H A D | pipefgmres.c | 54 PetscInt loc_it; /* local count of # of dir. in Krylov space */ in KSPPIPEFGMRESCycle() local
75 loc_it = 0; in KSPPIPEFGMRESCycle()
81 pipefgmres->it = (loc_it - 1); in KSPPIPEFGMRESCycle()
108 PetscCall(KSP_PCApply(ksp, VEC_VV(loc_it), PREVEC(loc_it))); in KSPPIPEFGMRESCycle()
110 PetscCall(KSP_MatMult(ksp, Amat, PREVEC(loc_it), ZVEC(loc_it))); in KSPPIPEFGMRESCycle()
111 PetscCall(VecAXPY(ZVEC(loc_it), -shift, VEC_VV(loc_it))); /* Note shift */ in KSPPIPEFGMRESCycle()
116 while (!ksp->reason && loc_it < max_k && ksp->its < ksp->max_it) { in KSPPIPEFGMRESCycle()
117 if (loc_it) { in KSPPIPEFGMRESCycle()
121 pipefgmres->it = (loc_it - 1); in KSPPIPEFGMRESCycle()
124 if (pipefgmres->vv_allocated <= loc_it + VEC_OFFSET + 1) { in KSPPIPEFGMRESCycle()
[all …]
|
| /petsc/src/ksp/ksp/impls/gmres/fgmres/ |
| H A D | fgmres.c | 62 PetscInt loc_it; /* local count of # of dir. in Krylov space */ in KSPFGMRESCycle() local
69 loc_it = 0; in KSPFGMRESCycle()
75 fgmres->it = (loc_it - 1); in KSPFGMRESCycle()
102 while (!ksp->reason && loc_it < max_k && ksp->its < ksp->max_it) { in KSPFGMRESCycle()
103 if (loc_it) { in KSPFGMRESCycle()
107 fgmres->it = (loc_it - 1); in KSPFGMRESCycle()
110 if (fgmres->vv_allocated <= loc_it + VEC_OFFSET + 1) { in KSPFGMRESCycle()
111 PetscCall(KSPFGMRESGetNewVectors(ksp, loc_it + 1)); in KSPFGMRESCycle()
119 PetscCall((*fgmres->modifypc)(ksp, ksp->its, loc_it, res_norm, fgmres->modifyctx)); in KSPFGMRESCycle()
123 PetscCall(KSP_PCApply(ksp, VEC_VV(loc_it), PREVEC(loc_it))); in KSPFGMRESCycle()
[all …]
|
| /petsc/src/ksp/ksp/impls/gmres/lgmres/ |
| H A D | lgmres.c | 95 PetscInt loc_it; /* local count of # of dir. in Krylov space */ in KSPLGMRESCycle() local
112 loc_it = 0; in KSPLGMRESCycle()
149 lgmres->it = (loc_it - 1); in KSPLGMRESCycle()
157 …while (!ksp->reason && loc_it < it_total && ksp->its < max_it) { /* LGMRES_MOD: changed to it_tota… in KSPLGMRESCycle()
159 lgmres->it = (loc_it - 1); in KSPLGMRESCycle()
163 if (lgmres->vv_allocated <= loc_it + VEC_OFFSET + 1) { in KSPLGMRESCycle()
164 PetscCall(KSPLGMRESGetNewVectors(ksp, loc_it + 1)); in KSPLGMRESCycle()
169 if (loc_it < it_arnoldi) { /* Arnoldi */ in KSPLGMRESCycle()
170 PetscCall(KSP_PCApplyBAorAB(ksp, VEC_VV(loc_it), VEC_VV(1 + loc_it), VEC_TEMP_MATOP)); in KSPLGMRESCycle()
172 order = loc_it - it_arnoldi + 1; /* which aug step */ in KSPLGMRESCycle()
[all …]
|