Lines Matching refs:subset_mpi_comm
31 MPI_Comm subset_mpi_comm = MPI_COMM_NULL; /* MPI communicator where the slice lives */ in main() local
151 PetscCall(DMDAGetProcessorSubset(da3D, DM_X, gp, &subset_mpi_comm)); in main()
157 PetscCall(DMDAGetProcessorSubset(da3D, DM_Y, gp, &subset_mpi_comm)); in main()
163 PetscCall(DMDAGetProcessorSubset(da3D, DM_Z, gp, &subset_mpi_comm)); in main()
172 if (subset_mpi_comm != MPI_COMM_NULL) { in main()
173 PetscCallMPI(MPI_Comm_size(subset_mpi_comm, &size)); in main()
174 …PetscCall(PetscSynchronizedPrintf(subset_mpi_comm, "subset MPI subcomm size is : %d, includes glob… in main()
175 PetscCall(PetscSynchronizedFlush(subset_mpi_comm, PETSC_STDOUT)); in main()
176 …PetscCall(DMDACreate2d(subset_mpi_comm, DM_BOUNDARY_NONE, DM_BOUNDARY_NONE, DMDA_STENCIL_STAR, M1,… in main()
252 if (subset_mpi_comm != MPI_COMM_NULL) { in main()
257 PetscCallMPI(MPI_Comm_free(&subset_mpi_comm)); in main()