Searched refs:level1 (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/ksp/pc/impls/ml/ |
| H A D | ml.c | 512 PetscInt nlocal_allcols, Nlevels, mllevel, level, level1, m, fine_level, bs; in PCSetUp_ML() local
860 level1 = level + 1; in PCSetUp_ML()
863 PetscCall(MatCreateVecs(gridctx[level1].A, NULL, &gridctx[level1].r)); in PCSetUp_ML()
866 PetscCall(PCMGSetR(pc, level1, gridctx[level1].r)); in PCSetUp_ML()
878 level1 = level + 1; in PCSetUp_ML()
880 PetscCall(PCMGSetInterpolation(pc, level1, gridctx[level].P)); in PCSetUp_ML()
881 PetscCall(PCMGSetRestriction(pc, level1, gridctx[level].R)); in PCSetUp_ML()
|
| /petsc/src/ksp/pc/impls/gamg/ |
| H A D | gamg.c | 543 …PetscInt fine_level, level, level1, bs, M, N, qq, lidx, nASMBlocksArr[PETSC_MG_MAXLEVELS], cr_b… in PCSetUp_GAMG() local
663 level1 = level + 1; in PCSetUp_GAMG()
707 Parr[level1] = Prol; in PCSetUp_GAMG()
788 Parr[level1] = Prol11; in PCSetUp_GAMG()
789 } else Parr[level1] = NULL; /* failed to coarsen */ in PCSetUp_GAMG()
796 if (!Parr[level1]) { /* failed to coarsen */ in PCSetUp_GAMG()
803 PetscCall(MatGetSize(Parr[level1], &M, &N)); /* N is next M, a loop test variables */ in PCSetUp_GAMG()
806 if (level1 == pc_gamg->Nlevels - 1) is_last = PETSC_TRUE; in PCSetUp_GAMG()
809 …PetscCall(pc_gamg->ops->createlevel(pc, Aarr[level], cr_bs, &Parr[level1], &Aarr[level1], &nactive… in PCSetUp_GAMG()
812 PetscCall(MatGetSize(Aarr[level1], &M, &N)); /* M is loop test variables */ in PCSetUp_GAMG()
[all …]
|