Lines Matching refs:fine_level
449 PetscInt level, fine_level = pc_ml->Nlevels - 1, dim = pc_ml->dim; in PCReset_ML() local
453 …for (level = 0; level <= fine_level; level++) PetscCall(VecDestroy(&pc_ml->gridctx[level].coords)); in PCReset_ML()
474 for (level = 0; level < fine_level; level++) { in PCReset_ML()
512 PetscInt nlocal_allcols, Nlevels, mllevel, level, level1, m, fine_level, bs; in PCSetUp_ML() local
540 fine_level = Nlevels - 1; in PCSetUp_ML()
541 gridctx[fine_level].A = A; in PCSetUp_ML()
573 level = fine_level - 1; in PCSetUp_ML()
588 for (level = 0; level < fine_level; level++) { in PCSetUp_ML()
592 PetscCall(PCMGSetResidual(pc, fine_level, PCMGResidualDefault, gridctx[fine_level].A)); in PCSetUp_ML()
593 PetscCall(KSPSetOperators(gridctx[fine_level].ksp, gridctx[level].A, gridctx[fine_level].A)); in PCSetUp_ML()
810 fine_level = Nlevels - 1; in PCSetUp_ML()
814 for (level = 1; level <= fine_level; level++) { in PCSetUp_ML()
830 gridctx[fine_level].A = A; in PCSetUp_ML()
832 level = fine_level - 1; in PCSetUp_ML()
859 for (level = 0; level < fine_level; level++) { in PCSetUp_ML()
874 PetscCall(PCMGGetSmoother(pc, fine_level, &gridctx[fine_level].ksp)); in PCSetUp_ML()
877 for (level = 0; level < fine_level; level++) { in PCSetUp_ML()
885 PetscCall(PCMGSetResidual(pc, fine_level, PCMGResidualDefault, gridctx[fine_level].A)); in PCSetUp_ML()
886 PetscCall(KSPSetOperators(gridctx[fine_level].ksp, gridctx[level].A, gridctx[fine_level].A)); in PCSetUp_ML()
895 level = fine_level; in PCSetUp_ML()