22   MPI_Comm           omp_comm;        /* a shared memory communicator to spawn omp threads */  member
66     PetscCallMPI(MPI_Bcast(pathname, PETSC_MAX_PATH_LEN, MPI_CHAR, 0, ctrl->omp_comm));  in PetscOmpCtrlCreateBarrier()
68     PetscCallMPI(MPI_Barrier(ctrl->omp_comm));  in PetscOmpCtrlCreateBarrier()
71     PetscCallMPI(MPI_Bcast(pathname, PETSC_MAX_PATH_LEN, MPI_CHAR, 0, ctrl->omp_comm));  in PetscOmpCtrlCreateBarrier()
77     PetscCallMPI(MPI_Barrier(ctrl->omp_comm));  in PetscOmpCtrlCreateBarrier()
81 …PetscCallMPI(MPI_Win_allocate_shared(size, 1, MPI_INFO_NULL, ctrl->omp_comm, &baseptr, &ctrl->omp_…  in PetscOmpCtrlCreateBarrier()
88     PetscCallMPI(MPI_Comm_size(ctrl->omp_comm, &ctrl->omp_comm_size));  in PetscOmpCtrlCreateBarrier()
96   PetscCallMPI(MPI_Barrier(ctrl->omp_comm));  in PetscOmpCtrlCreateBarrier()
105   PetscCallMPI(MPI_Barrier(ctrl->omp_comm));  in PetscOmpCtrlDestroyBarrier()
188   PetscCallMPI(MPI_Comm_split(shm_comm, color, 0 /*key*/, &ctrl->omp_comm));  in PetscOmpCtrlCreate()
191   PetscCallMPI(MPI_Comm_rank(ctrl->omp_comm, &omp_rank));  in PetscOmpCtrlCreate()
226 …_IN_PLACE : cpu_ulongs, cpu_ulongs, nr_cpu_ulongs, MPI_UNSIGNED_LONG, MPI_BOR, 0, ctrl->omp_comm));  in PetscOmpCtrlCreate()
270   PetscCallMPI(MPI_Comm_free(&ctrl->omp_comm));  in PetscOmpCtrlDestroy()
298 PetscErrorCode PetscOmpCtrlGetOmpComms(PetscOmpCtrl ctrl, MPI_Comm *omp_comm, MPI_Comm *omp_master_…  in PetscOmpCtrlGetOmpComms()  argument
301   if (omp_comm) *omp_comm = ctrl->omp_comm;  in PetscOmpCtrlGetOmpComms()