Searched refs:petsc_comm (Results 1 – 2 of 2) sorted by relevance
| /petsc/src/sys/utils/openmp/ |
| H A D | mpmpishm.c | 133 PetscErrorCode PetscOmpCtrlCreate(MPI_Comm petsc_comm, PetscInt nthreads, PetscOmpCtrl *pctrl) in PetscOmpCtrlCreate() argument
164 PetscCall(PetscShmCommGet(petsc_comm, &pshmcomm)); in PetscOmpCtrlCreate()
178 …PetscCheck(nthreads >= 1 && nthreads <= shm_comm_size, petsc_comm, PETSC_ERR_ARG_OUTOFRANGE, "numb… in PetscOmpCtrlCreate()
179 …if (shm_comm_size % nthreads) PetscCall(PetscPrintf(petsc_comm, "Warning: number of OpenMP threads… in PetscOmpCtrlCreate()
199 PetscCallMPI(MPI_Comm_split(petsc_comm, color, 0 /*key*/, &ctrl->omp_master_comm)); in PetscOmpCtrlCreate()
|
| /petsc/src/mat/impls/aij/mpi/mumps/ |
| H A D | mumps.c | 609 MPI_Comm petsc_comm, omp_comm; /* petsc_comm is PETSc matrix's comm */ member
1855 PetscCallMPI(MPI_Comm_group(mumps->petsc_comm, &petsc_group)); in MatMumpsSetUpDistRHSInfo()
2618 mumps->petsc_comm = PetscObjectComm((PetscObject)A); in MatSetFromOptions_MUMPS()
2619 PetscCallMPI(MPI_Comm_size(mumps->petsc_comm, &mumps->petsc_size)); in MatSetFromOptions_MUMPS()
2620 …PetscCallMPI(MPI_Comm_rank(mumps->petsc_comm, &mumps->myid)); /* "if (!myid)" still works even if … in MatSetFromOptions_MUMPS()
2629 PetscCall(PetscOmpCtrlCreate(mumps->petsc_comm, nthreads, &mumps->omp_ctrl)); in MatSetFromOptions_MUMPS()
2637 mumps->mumps_comm = mumps->petsc_comm; in MatSetFromOptions_MUMPS()
2650 } else PetscCall(PetscCommGetComm(mumps->petsc_comm, &mumps->mumps_comm)); in MatSetFromOptions_MUMPS()
2712 PetscCallMPI(MPIU_Allreduce(MPI_IN_PLACE, &gs, 1, MPI_C_BOOL, MPI_LAND, mumps->petsc_comm)); in MatSetFromOptions_MUMPS()
|