Lines Matching refs:mglevels

6 PetscErrorCode PCMGACycle_Private(PC pc, PC_MG_Levels **mglevels, PetscBool transpose, PetscBool ma…  in PCMGACycle_Private()  argument
8 PetscInt i, l = mglevels[0]->levels; in PCMGACycle_Private()
13 …if (mglevels[i]->eventinterprestrict) PetscCall(PetscLogEventBegin(mglevels[i]->eventinterprestric… in PCMGACycle_Private()
15 … if (matapp) PetscCall(MatMatRestrict(mglevels[i]->restrct, mglevels[i]->B, &mglevels[i - 1]->B)); in PCMGACycle_Private()
16 else PetscCall(MatRestrict(mglevels[i]->restrct, mglevels[i]->b, mglevels[i - 1]->b)); in PCMGACycle_Private()
18 …if (matapp) PetscCall(MatMatRestrict(mglevels[i]->interpolate, mglevels[i]->B, &mglevels[i - 1]->B… in PCMGACycle_Private()
19 else PetscCall(MatRestrict(mglevels[i]->interpolate, mglevels[i]->b, mglevels[i - 1]->b)); in PCMGACycle_Private()
21 …if (mglevels[i]->eventinterprestrict) PetscCall(PetscLogEventEnd(mglevels[i]->eventinterprestrict,… in PCMGACycle_Private()
26 if (!mglevels[i]->X) { in PCMGACycle_Private()
27 PetscCall(MatDuplicate(mglevels[i]->B, MAT_DO_NOT_COPY_VALUES, &mglevels[i]->X)); in PCMGACycle_Private()
29 PetscCall(MatZeroEntries(mglevels[i]->X)); in PCMGACycle_Private()
32 PetscCall(VecZeroEntries(mglevels[i]->x)); in PCMGACycle_Private()
34 …if (mglevels[i]->eventsmoothsolve) PetscCall(PetscLogEventBegin(mglevels[i]->eventsmoothsolve, 0, … in PCMGACycle_Private()
37 PetscCall(KSPMatSolve(mglevels[i]->smoothd, mglevels[i]->B, mglevels[i]->X)); in PCMGACycle_Private()
38 PetscCall(KSPCheckSolve(mglevels[i]->smoothd, pc, NULL)); in PCMGACycle_Private()
40 PetscCall(KSPSolve(mglevels[i]->smoothd, mglevels[i]->b, mglevels[i]->x)); in PCMGACycle_Private()
41 PetscCall(KSPCheckSolve(mglevels[i]->smoothd, pc, mglevels[i]->x)); in PCMGACycle_Private()
45 PetscCall(KSPSolveTranspose(mglevels[i]->smoothu, mglevels[i]->b, mglevels[i]->x)); in PCMGACycle_Private()
46 PetscCall(KSPCheckSolve(mglevels[i]->smoothu, pc, mglevels[i]->x)); in PCMGACycle_Private()
48 …if (mglevels[i]->eventsmoothsolve) PetscCall(PetscLogEventEnd(mglevels[i]->eventsmoothsolve, 0, 0,… in PCMGACycle_Private()
51 …if (mglevels[i]->eventinterprestrict) PetscCall(PetscLogEventBegin(mglevels[i]->eventinterprestric… in PCMGACycle_Private()
53 … (matapp) PetscCall(MatMatInterpolateAdd(mglevels[i]->interpolate, mglevels[i - 1]->X, mglevels[i]… in PCMGACycle_Private()
54 …else PetscCall(MatInterpolateAdd(mglevels[i]->interpolate, mglevels[i - 1]->x, mglevels[i]->x, mgl… in PCMGACycle_Private()
56 …if (matapp) PetscCall(MatMatInterpolateAdd(mglevels[i]->restrct, mglevels[i - 1]->X, mglevels[i]->… in PCMGACycle_Private()
57 …else PetscCall(MatInterpolateAdd(mglevels[i]->restrct, mglevels[i - 1]->x, mglevels[i]->x, mglevel… in PCMGACycle_Private()
59 …if (mglevels[i]->eventinterprestrict) PetscCall(PetscLogEventEnd(mglevels[i]->eventinterprestrict,… in PCMGACycle_Private()