Lines Matching refs:level
96 PetscInt level; in PCSetUp_HMG() local
163 for (level = num_levels - 1; level > 0; level--) { in PCSetUp_HMG()
168 PetscCall(MatCreateMAIJ(interpolations[level - 1], blocksize, &P)); in PCSetUp_HMG()
169 PetscCall(MatDestroy(&interpolations[level - 1])); in PCSetUp_HMG()
172 PetscCall(PCHMGExpandInterpolation_Private(interpolations[level - 1], &P, blocksize)); in PCSetUp_HMG()
173 PetscCall(MatDestroy(&interpolations[level - 1])); in PCSetUp_HMG()
176 P = interpolations[level - 1]; in PCSetUp_HMG()
179 PetscCall(PCMGSetInterpolation(pc, level, P)); in PCSetUp_HMG()
180 PetscCall(PCMGSetRestriction(pc, level, P)); in PCSetUp_HMG()
183 if ((level - 1) >= 0 && !hmg->subcoarsening) { in PCSetUp_HMG()
184 pmat = operators[level - 1]; in PCSetUp_HMG()
185 PetscCall(PCMGSetOperators(pc, level - 1, pmat, pmat)); in PCSetUp_HMG()
188 PetscCall(PCMGSetRhs(pc, level - 1, b)); in PCSetUp_HMG()
190 PetscCall(PCMGSetR(pc, level, r)); in PCSetUp_HMG()
194 PetscCall(PCMGSetX(pc, level - 1, x)); in PCSetUp_HMG()