Home
last modified time | relevance | path

Searched refs:psubcomm (Results 1 – 13 of 13) sorted by relevance

/petsc/src/sys/objects/
H A Dsubcomm.c24 PetscErrorCode PetscSubcommSetFromOptions(PetscSubcomm psubcomm) in PetscSubcommSetFromOptions() argument
30 PetscCheck(psubcomm, PETSC_COMM_SELF, PETSC_ERR_ARG_NULL, "Must call PetscSubcommCreate first"); in PetscSubcommSetFromOptions()
32 PetscOptionsBegin(psubcomm->parent, psubcomm->subcommprefix, "Options for PetscSubcomm", NULL); in PetscSubcommSetFromOptions()
33 …PetscCall(PetscOptionsEnum("-psubcomm_type", NULL, NULL, PetscSubcommTypes, (PetscEnum)psubcomm->t… in PetscSubcommSetFromOptions()
34 if (flg && psubcomm->type != type) { in PetscSubcommSetFromOptions()
36 PetscCall(PetscCommDestroy(&(psubcomm)->dupparent)); in PetscSubcommSetFromOptions()
37 PetscCall(PetscCommDestroy(&(psubcomm)->child)); in PetscSubcommSetFromOptions()
38 PetscCall(PetscFree((psubcomm)->subsize)); in PetscSubcommSetFromOptions()
43 PetscCall(PetscSubcommCreate_contiguous(psubcomm)); in PetscSubcommSetFromOptions()
46 PetscCall(PetscSubcommCreate_interlaced(psubcomm)); in PetscSubcommSetFromOptions()
[all …]
/petsc/src/sys/tests/
H A Dex50.c11 PetscSubcomm psubcomm, psubsubcomm; in main() local
34 PetscCall(PetscSubcommCreate(comm, &psubcomm)); in main()
35 PetscCall(PetscSubcommSetNumber(psubcomm, 2)); in main()
36 PetscCall(PetscSubcommSetType(psubcomm, PETSC_SUBCOMM_CONTIGUOUS)); in main()
38 PetscCall(PetscSubcommSetFromOptions(psubcomm)); in main()
39 subcomm = PetscSubcommChild(psubcomm); in main()
60 PetscCall(PetscSubcommDestroy(&psubcomm)); in main()
/petsc/src/ksp/pc/impls/redundant/
H A Dredundant.c15 PetscSubcomm psubcomm; member
47 if (!red->psubcomm) { in PCView_Redundant()
52 if (!red->psubcomm->color) { /* only view first redundant pc */ in PCView_Redundant()
83 if (!red->psubcomm) { /* create red->psubcomm, new ksp and pc over subcomm */ in PCSetUp_Redundant()
87 subcomm = PetscSubcommChild(red->psubcomm); in PCSetUp_Redundant()
91 …PetscCall(MatCreateRedundantMatrix(pc->pmat, red->psubcomm->n, subcomm, MAT_INITIAL_MATRIX, &red->… in PCSetUp_Redundant()
120 …PetscCall(VecCreateMPI(PetscSubcommContiguousParent(red->psubcomm), mloc_sub, PETSC_DECIDE, &red->… in PCSetUp_Redundant()
121 …PetscCall(VecCreateMPIWithArray(PetscSubcommContiguousParent(red->psubcomm), 1, mloc_sub, PETSC_DE… in PCSetUp_Redundant()
132 PetscCall(PetscMalloc2(red->psubcomm->n * mlocal, &idx1, red->psubcomm->n * mlocal, &idx2)); in PCSetUp_Redundant()
134 for (k = 0; k < red->psubcomm->n; k++) { in PCSetUp_Redundant()
[all …]
/petsc/src/ksp/ksp/tests/
H A Dex37.c23 PetscSubcomm psubcomm; in main() local
59 PetscCall(PetscSubcommCreate(comm, &psubcomm)); in main()
60 PetscCall(PetscSubcommSetNumber(psubcomm, nsubcomm)); in main()
68 PetscCall(PetscSubcommSetTypeGeneral(psubcomm, color, subrank)); in main()
70 PetscCall(PetscSubcommSetType(psubcomm, PETSC_SUBCOMM_CONTIGUOUS)); in main()
72 PetscCall(PetscSubcommSetType(psubcomm, PETSC_SUBCOMM_INTERLACED)); in main()
73 …} else SETERRQ(psubcomm->parent, PETSC_ERR_SUP, "PetscSubcommType %" PetscInt_FMT " is not support… in main()
74 PetscCall(PetscSubcommSetFromOptions(psubcomm)); in main()
75 subcomm = PetscSubcommChild(psubcomm); in main()
173 PetscCall(PetscSubcommDestroy(&psubcomm)); in main()
/petsc/src/mat/tests/
H A Dex9.c113 PetscSubcomm psubcomm; in main() local
115 PetscCall(PetscSubcommCreate(PETSC_COMM_WORLD, &psubcomm)); in main()
116 PetscCall(PetscSubcommSetNumber(psubcomm, nsubcomms)); in main()
117 PetscCall(PetscSubcommSetType(psubcomm, PETSC_SUBCOMM_CONTIGUOUS)); in main()
119 PetscCall(PetscSubcommSetFromOptions(psubcomm)); in main()
121 …PetscCall(MatCreateRedundantMatrix(C, nsubcomms, PetscSubcommChild(psubcomm), MAT_INITIAL_MATRIX, … in main()
122 …PetscCall(MatCreateRedundantMatrix(C, nsubcomms, PetscSubcommChild(psubcomm), MAT_REUSE_MATRIX, &C… in main()
124 PetscCall(PetscSubcommDestroy(&psubcomm)); in main()
/petsc/src/ksp/pc/impls/bjacobi/
H A Dbjacobi.h19 PetscSubcomm psubcomm; /* for multiple processors per block */ member
44 PetscSubcomm psubcomm; member
H A Dbjacobi.c197 if (jac->ksp && !jac->psubcomm) { in PCView_BJacobi()
207 } else if (mpjac && jac->ksp && mpjac->psubcomm) { in PCView_BJacobi()
208 PetscCall(PetscViewerGetSubViewer(viewer, mpjac->psubcomm->child, &sviewer)); in PCView_BJacobi()
209 if (!mpjac->psubcomm->color) { in PCView_BJacobi()
214 PetscCall(PetscViewerRestoreSubViewer(viewer, mpjac->psubcomm->child, &sviewer)); in PCView_BJacobi()
532 jac->psubcomm = NULL; in PCCreate_BJacobi()
1183 PetscCall(PetscSubcommDestroy(&mpjac->psubcomm)); in PCDestroy_BJacobi_Multiproc()
1276 if (!jac->psubcomm) { in PCSetUp_BJacobi_Multiproc()
1278 PetscCall(PetscSubcommCreate(comm, &jac->psubcomm)); in PCSetUp_BJacobi_Multiproc()
1279 PetscCall(PetscSubcommSetNumber(jac->psubcomm, jac->n)); in PCSetUp_BJacobi_Multiproc()
[all …]
/petsc/src/ksp/pc/impls/telescope/
H A Dtelescope.h13 PetscSubcomm psubcomm; member
49 if (sred->psubcomm) return PetscSubcomm_isActiveRank(sred->psubcomm); in PCTelescope_isActiveRank()
H A Dtelescope.c142 comm = PetscSubcommParent(sred->psubcomm); in PCTelescopeSetUp_default()
143 subcomm = PetscSubcommChild(sred->psubcomm); in PCTelescopeSetUp_default()
201 subcomm = PetscSubcommChild(sred->psubcomm); in PCTelescopeMatCreate_default()
238 subcomm = PetscSubcommChild(sred->psubcomm); in PCTelescopeSubNullSpaceCreate_Telescope()
330 if (sred->psubcomm) { in PCView_Telescope()
331 comm = PetscSubcommParent(sred->psubcomm); in PCView_Telescope()
332 subcomm = PetscSubcommChild(sred->psubcomm); in PCView_Telescope()
496 if (!sred->psubcomm) { in PCSetUp_Telescope()
497 PetscCall(PetscSubcommCreate(comm, &sred->psubcomm)); in PCSetUp_Telescope()
498 PetscCall(PetscSubcommSetNumber(sred->psubcomm, sred->redfactor)); in PCSetUp_Telescope()
[all …]
H A Dtelescope_dmda.c317 PetscSubcomm psubcomm; in PCTelescopeSetUp_dmda_repart_coors() local
325 psubcomm = sred->psubcomm; in PCTelescopeSetUp_dmda_repart_coors()
326 comm = PetscSubcommParent(psubcomm); in PCTelescopeSetUp_dmda_repart_coors()
361 comm = PetscSubcommParent(sred->psubcomm); in PCTelescopeSetUp_dmda_repart()
362 subcomm = PetscSubcommChild(sred->psubcomm); in PCTelescopeSetUp_dmda_repart()
715 subcomm = PetscSubcommChild(sred->psubcomm); in PCTelescopeMatCreate_dmda_dmactivefalse()
792 subcomm = PetscSubcommChild(sred->psubcomm); in PCTelescopeSubNullSpaceCreate_dmda_Telescope()
/petsc/src/ksp/ksp/tutorials/
H A Dex73.c69 PetscSubcomm psubcomm; in CommCoarsen() local
72 PetscCall(PetscSubcommCreate(comm, &psubcomm)); in CommCoarsen()
73 PetscCall(PetscSubcommSetNumber(psubcomm, number)); in CommCoarsen()
74 PetscCall(PetscSubcommSetType(psubcomm, PETSC_SUBCOMM_INTERLACED)); in CommCoarsen()
75 *p = psubcomm; in CommCoarsen()
/petsc/src/mat/interface/
H A Dmatrix.c10478 PetscSubcomm psubcomm = NULL; in MatCreateRedundantMatrix() local
10513 PetscCall(PetscSubcommCreate(comm, &psubcomm)); in MatCreateRedundantMatrix()
10514 PetscCall(PetscSubcommSetNumber(psubcomm, nsubcomm)); in MatCreateRedundantMatrix()
10515 PetscCall(PetscSubcommSetType(psubcomm, PETSC_SUBCOMM_CONTIGUOUS)); in MatCreateRedundantMatrix()
10516 PetscCall(PetscSubcommSetFromOptions(psubcomm)); in MatCreateRedundantMatrix()
10517 PetscCall(PetscCommDuplicate(PetscSubcommChild(psubcomm), &subcomm, NULL)); in MatCreateRedundantMatrix()
10519 PetscCall(PetscSubcommDestroy(&psubcomm)); in MatCreateRedundantMatrix()
/petsc/src/ksp/pc/impls/bddc/
H A Dbddcprivate.c7726 PetscSubcomm psubcomm; in PCBDDCMatISGetSubassemblingPattern() local
7826 PetscCall(PetscSubcommCreate(PetscObjectComm((PetscObject)mat), &psubcomm)); in PCBDDCMatISGetSubassemblingPattern()
7827 …PetscCall(PetscSubcommSetNumber(psubcomm, 2)); /* 2 groups, active process and not active processe… in PCBDDCMatISGetSubassemblingPattern()
7828 PetscCall(PetscSubcommSetTypeGeneral(psubcomm, color, rank)); in PCBDDCMatISGetSubassemblingPattern()
7829 subcomm = PetscSubcommChild(psubcomm); in PCBDDCMatISGetSubassemblingPattern()
7831 psubcomm = NULL; in PCBDDCMatISGetSubassemblingPattern()
7972 PetscCall(PetscSubcommDestroy(&psubcomm)); in PCBDDCMatISGetSubassemblingPattern()