Lines Matching refs:pcmg
39 PC pcmg, pc; in main() local
65 PetscCall(KSPGetPC(kspmg, &pcmg)); in main()
67 PetscCall(PCSetType(pcmg, PCMG)); in main()
68 PetscCall(PCMGSetLevels(pcmg, levels, NULL)); in main()
69 PetscCall(PCMGSetType(pcmg, am)); in main()
71 PetscCall(PCMGGetCoarseSolve(pcmg, &cksp)); in main()
81 PetscCall(PCMGSetResidual(pcmg, levels - 1 - i, residual, NULL)); in main()
85 PetscCall(PCMGSetInterpolation(pcmg, levels - 1 - i, mat[i])); in main()
86 PetscCall(PCMGSetRestriction(pcmg, levels - 1 - i, mat[i])); in main()
87 PetscCall(PCMGSetCycleTypeOnLevel(pcmg, levels - 1 - i, (PCMGCycleType)cycles)); in main()
90 PetscCall(PCMGGetSmoother(pcmg, levels - 1 - i, &ksp[i])); in main()
118 if (i > 0) PetscCall(PCMGSetX(pcmg, levels - 1 - i, x)); in main()
122 if (i > 0) PetscCall(PCMGSetRhs(pcmg, levels - 1 - i, x)); in main()
127 PetscCall(PCMGSetR(pcmg, levels - 1 - i, x)); in main()
131 PetscCall(PCMGSetX(pcmg, 0, x)); in main()
134 PetscCall(PCMGSetRhs(pcmg, 0, x)); in main()