Searched refs:mgc (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ksp/pc/impls/mg/ |
| H A D | mg.c | 17 PC_MG_Levels *mgc, *mglevels = *mglevelsin; in PCMGMCycle_Private() local 65 mgc = *(mglevelsin - 1); in PCMGMCycle_Private() 68 if (matapp) PetscCall(MatMatRestrict(mglevels->restrct, mglevels->R, &mgc->B)); in PCMGMCycle_Private() 69 else PetscCall(MatRestrict(mglevels->restrct, mglevels->r, mgc->b)); in PCMGMCycle_Private() 71 if (matapp) PetscCall(MatMatRestrict(mglevels->interpolate, mglevels->R, &mgc->B)); in PCMGMCycle_Private() 72 else PetscCall(MatRestrict(mglevels->interpolate, mglevels->r, mgc->b)); in PCMGMCycle_Private() 76 if (!mgc->X) { in PCMGMCycle_Private() 77 PetscCall(MatDuplicate(mgc->B, MAT_DO_NOT_COPY_VALUES, &mgc->X)); in PCMGMCycle_Private() 79 PetscCall(MatZeroEntries(mgc->X)); in PCMGMCycle_Private() 82 PetscCall(VecZeroEntries(mgc->x)); in PCMGMCycle_Private() [all …]
|