Lines Matching refs:comm
14 static PetscErrorCode ProcessOptions(MPI_Comm comm, AppCtx *options) in ProcessOptions() argument
21 PetscOptionsBegin(comm, "", "Meshing Interpolation Test Options", "DMPLEX"); in ProcessOptions()
29 static PetscErrorCode CreateMesh(MPI_Comm comm, AppCtx *user, DM *dm) in CreateMesh() argument
32 PetscCall(DMCreate(comm, dm)); in CreateMesh()
41 MPI_Comm comm; in main() local
54 comm = PETSC_COMM_WORLD; in main()
55 PetscCallMPI(MPI_Comm_size(comm, &size)); in main()
56 PetscCall(ProcessOptions(comm, &user)); in main()
57 PetscCall(CreateMesh(comm, &user, &dm)); in main()
64 PetscCall(PetscSectionCreate(comm, &s)); in main()
84 PetscCall(PetscSectionCreate(comm, &s)); in main()
99 PetscCallMPI(MPIU_Allreduce(MPI_IN_PLACE, &gSizeBefore, 1, MPIU_INT, MPI_SUM, comm)); in main()
100 PetscCallMPI(MPIU_Allreduce(MPI_IN_PLACE, &minBefore, 1, MPIU_INT, MPI_MIN, comm)); in main()
101 PetscCallMPI(MPIU_Allreduce(MPI_IN_PLACE, &maxBefore, 1, MPIU_INT, MPI_MAX, comm)); in main()
112 PetscCallMPI(MPIU_Allreduce(MPI_IN_PLACE, &gSizeAfter, 1, MPIU_INT, MPI_SUM, comm)); in main()
113 PetscCallMPI(MPIU_Allreduce(MPI_IN_PLACE, &minAfter, 1, MPIU_INT, MPI_MIN, comm)); in main()
114 PetscCallMPI(MPIU_Allreduce(MPI_IN_PLACE, &maxAfter, 1, MPIU_INT, MPI_MAX, comm)); in main()
115 …PetscCheck(gSizeAfter == gSizeBefore, comm, PETSC_ERR_PLIB, "Global section has not the same size … in main()
116 … maxAfter <= maxBefore && (minAfter > minBefore || maxAfter < maxBefore), comm, PETSC_ERR_PLIB, "D… in main()