| /petsc/src/mat/graphops/coarsen/impls/misk/ |
| H A D | misk.c | 17 static PetscErrorCode PetscCoarsenDataView_private(PetscCoarsenData *agg_lists, PetscViewer viewer) in PetscCoarsenDataView_private() argument 22 for (PetscInt kk = 0; kk < agg_lists->size; kk++) { in PetscCoarsenDataView_private() 23 PetscCall(PetscCDGetHeadPos(agg_lists, kk, &pos)); in PetscCoarsenDataView_private() 28 PetscCall(PetscCDGetNextPos(agg_lists, kk, &pos)); in PetscCoarsenDataView_private() 72 PetscCoarsenData *agg_lists; in MatCoarsenApply_MISK_private() local 110 PetscCall(PetscCDCreate(nloc_inner, &agg_lists)); in MatCoarsenApply_MISK_private() 174 PetscCall(PetscCDAppendID(agg_lists, lid, lid + my0)); in MatCoarsenApply_MISK_private() 181 PetscCall(PetscCDAppendID(agg_lists, lid, lidj + my0)); in MatCoarsenApply_MISK_private() 238 PetscCall(PetscCDAppendID(agg_lists, slid, gid)); in MatCoarsenApply_MISK_private() 262 for (PetscInt lid = 0; lid < agg_lists->size; lid++) { in MatCoarsenApply_MISK_private() [all …]
|
| /petsc/src/mat/graphops/coarsen/impls/mis/ |
| H A D | mis.c | 34 PetscCoarsenData *agg_lists; in MatCoarsenApply_MIS_private() local 72 PetscCall(PetscCDCreate(strict_aggs ? nloc : num_fine_ghosts + nloc, &agg_lists)); in MatCoarsenApply_MIS_private() 73 if (a_locals_llist) *a_locals_llist = agg_lists; in MatCoarsenApply_MIS_private() 137 PetscCall(PetscCDAppendID(agg_lists, lid, lid + my0)); in MatCoarsenApply_MIS_private() 139 PetscCall(PetscCDAppendID(agg_lists, lid, lid)); in MatCoarsenApply_MIS_private() 149 PetscCall(PetscCDAppendID(agg_lists, lid, lidj + my0)); in MatCoarsenApply_MIS_private() 151 PetscCall(PetscCDAppendID(agg_lists, lid, lidj)); in MatCoarsenApply_MIS_private() 165 if (statej == MIS_NOT_DONE) PetscCall(PetscCDAppendID(agg_lists, lid, nloc + cpid)); in MatCoarsenApply_MIS_private() 194 PetscCall(PetscCDAppendID(agg_lists, lidj, lid)); in MatCoarsenApply_MIS_private() 227 PetscCall(PetscCDAppendID(agg_lists, slid, gid)); in MatCoarsenApply_MIS_private() [all …]
|
| /petsc/src/mat/graphops/coarsen/interface/ |
| H A D | coarsen.c | 166 if ((*agg)->agg_lists) PetscCall(PetscCDDestroy((*agg)->agg_lists)); in MatCoarsenDestroy() 335 …PetscCheck(coarser->agg_lists, PetscObjectComm((PetscObject)coarser), PETSC_ERR_ARG_WRONGSTATE, "N… in MatCoarsenGetData() 336 *llist = coarser->agg_lists; in MatCoarsenGetData() 337 coarser->agg_lists = NULL; /* giving up ownership */ in MatCoarsenGetData()
|
| /petsc/src/ksp/pc/impls/gamg/ |
| H A D | classical.c | 163 static PetscErrorCode PCGAMGCoarsen_Classical(PC pc, Mat *G, PetscCoarsenData **agg_lists) in PCGAMGCoarsen_Classical() argument 180 PetscCall(MatCoarsenGetData(crs, agg_lists)); in PCGAMGCoarsen_Classical() 185 static PetscErrorCode PCGAMGProlongator_Classical_Direct(PC pc, Mat A, PetscCoarsenData *agg_lists,… in PCGAMGProlongator_Classical_Direct() argument 230 PetscCall(PetscCDIsEmptyAt(agg_lists, i, &iscoarse)); in PCGAMGProlongator_Classical_Direct() 241 PetscCall(PetscCDIsEmptyAt(agg_lists, i, &iscoarse)); in PCGAMGProlongator_Classical_Direct() 556 …scErrorCode PCGAMGProlongator_Classical_Standard(PC pc, Mat A, PetscCoarsenData *agg_lists, Mat *P) in PCGAMGProlongator_Classical_Standard() argument 603 PetscCall(PetscCDIsEmptyAt(agg_lists, i, &iscoarse)); in PCGAMGProlongator_Classical_Standard() 611 PetscCall(PetscCDIsEmptyAt(agg_lists, i, &iscoarse)); in PCGAMGProlongator_Classical_Standard() 854 static PetscErrorCode PCGAMGProlongator_Classical(PC pc, Mat A, PetscCoarsenData *agg_lists, Mat *P) in PCGAMGProlongator_Classical() argument 864 PetscCall((*f)(pc, A, agg_lists, P)); in PCGAMGProlongator_Classical()
|
| H A D | gamg.c | 727 PetscCoarsenData *agg_lists; in PCSetUp_GAMG() local 731 …PetscCall(pc_gamg->ops->coarsen(pc, &Gmat, &agg_lists)); // Gmat may have ghosts for QR aggregates… in PCSetUp_GAMG() 732 PetscCall(PetscCDGetMat(agg_lists, &mat)); in PCSetUp_GAMG() 733 if (!mat) PetscCall(PetscCDSetMat(agg_lists, Gmat)); in PCSetUp_GAMG() 734 PetscCall(pc_gamg->ops->prolongator(pc, Aarr[level], agg_lists, &Prol11)); in PCSetUp_GAMG() 751 … PetscCall(PetscCDGetASMBlocks(agg_lists, bs, &nASMBlocksArr[level], &ASMLocalIDsArr[level])); in PCSetUp_GAMG() 761 PetscCall(PetscCDGetMat(agg_lists, &mat)); in PCSetUp_GAMG() 762 … if (mat == Gmat) PetscCall(PetscCDClearMat(agg_lists)); // take the Mat away from the list (yuck) in PCSetUp_GAMG() 763 PetscCall(PetscCDDestroy(agg_lists)); in PCSetUp_GAMG() 775 PetscCall(MatCoarsenGetData(pc_gamg->asm_crs, &agg_lists)); /* output */ in PCSetUp_GAMG() [all …]
|
| H A D | geo.c | 602 static PetscErrorCode PCGAMGProlongator_GEO(PC pc, Mat Amat, PetscCoarsenData *agg_lists, Mat *a_P_… in PCGAMGProlongator_GEO() argument 627 PetscCall(PetscCDGetMat(agg_lists, &Gmat)); // get auxiliary matrix for ghost edges in PCGAMGProlongator_GEO() 628 PetscCall(PetscCDGetNonemptyIS(agg_lists, &selected_1)); in PCGAMGProlongator_GEO() 686 …AndFormProl(selected_2, data_stride, coords, nLocalSelected, clid_flid, agg_lists, crsGID, bs, Pro… in PCGAMGProlongator_GEO()
|
| H A D | agg.c | 1175 static PetscErrorCode PCGAMGCoarsen_AGG(PC a_pc, Mat *a_Gmat1, PetscCoarsenData **agg_lists) in PCGAMGCoarsen_AGG() argument 1248 PetscCall(MatCoarsenGetData(pc_gamg_agg->crs, agg_lists)); /* output */ in PCGAMGCoarsen_AGG() 1255 PetscCoarsenData *llist = *agg_lists; in PCGAMGCoarsen_AGG() 1257 PetscCall(fixAggregatesWithSquare(a_pc, Gmat2, Gmat1, *agg_lists)); in PCGAMGCoarsen_AGG() 1277 static PetscErrorCode PCGAMGConstructProlongator_AGG(PC pc, Mat Amat, PetscCoarsenData *agg_lists, … in PCGAMGConstructProlongator_AGG() argument 1300 PetscCall(PetscCDGetMat(agg_lists, &Gmat)); // get auxiliary matrix for ghost edges for size > 1 in PCGAMGConstructProlongator_AGG() 1307 PetscCall(PetscCDIsEmptyAt(agg_lists, ii, &ise)); in PCGAMGConstructProlongator_AGG() 1396 …PetscCall(formProl0(agg_lists, bs, col_bs, myCrs0, nbnodes, data_w_ghost, flid_fgid, &data_out, Pr… in PCGAMGConstructProlongator_AGG()
|
| /petsc/src/mat/graphops/coarsen/impls/hem/ |
| H A D | hem.c | 1170 …PetscCall(MatCoarsenApply_HEM_private(mat, coarse->max_it, coarse->threshold, &coarse->agg_lists)); in MatCoarsenApply_HEM() 1189 if (coarse->agg_lists) { in MatCoarsenView_HEM() 1191 for (PetscInt kk = 0; kk < coarse->agg_lists->size; kk++) { in MatCoarsenView_HEM() 1192 PetscCall(PetscCDGetHeadPos(coarse->agg_lists, kk, &pos)); in MatCoarsenView_HEM() 1198 PetscCall(PetscCDGetNextPos(coarse->agg_lists, kk, &pos)); in MatCoarsenView_HEM()
|
| /petsc/include/petsc/private/ |
| H A D | matimpl.h | 579 PetscCoarsenData *agg_lists; member
|