Searched refs:new_eq_indices (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/ksp/pc/impls/gamg/ |
| H A D | gamg.c | 157 IS is_eq_newproc, is_eq_num, new_eq_indices; in PCGAMGCreateLevel_GAMG() local
411 PetscCall(ISInvertPermutation(is_eq_num, ncrs_eq_new, &new_eq_indices)); in PCGAMGCreateLevel_GAMG()
412 PetscCall(ISSort(new_eq_indices)); in PCGAMGCreateLevel_GAMG()
413 PetscCall(ISSetBlockSize(new_eq_indices, cr_bs)); in PCGAMGCreateLevel_GAMG()
415 PetscCall(PetscObjectReference((PetscObject)new_eq_indices)); in PCGAMGCreateLevel_GAMG()
416 *Pcolumnperm = new_eq_indices; in PCGAMGCreateLevel_GAMG()
428 PetscCall(MatCreateSubMatrix(Cmat, new_eq_indices, new_eq_indices, MAT_INITIAL_MATRIX, &mat)); in PCGAMGCreateLevel_GAMG()
453 PetscCall(MatCreateSubMatrix(Pold, findices, new_eq_indices, MAT_INITIAL_MATRIX, &Pnew)); in PCGAMGCreateLevel_GAMG()
471 PetscCall(ISDestroy(&new_eq_indices)); in PCGAMGCreateLevel_GAMG()
|