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()
82   PetscCallMPI(MPI_Win_shared_query(ctrl->omp_win, 0, &size, &disp_unit, &baseptr));  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()
111   PetscCallMPI(MPI_Win_free(&ctrl->omp_win));  in PetscOmpCtrlDestroyBarrier()
167   PetscCallMPI(MPI_Comm_rank(shm_comm, &shm_rank));  in PetscOmpCtrlCreate()
168   PetscCallMPI(MPI_Comm_size(shm_comm, &shm_comm_size));  in PetscOmpCtrlCreate()
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()
199   PetscCallMPI(MPI_Comm_split(petsc_comm, color, 0 /*key*/, &ctrl->omp_master_comm));  in PetscOmpCtrlCreate()
226 …PetscCallMPI(MPI_Reduce(ctrl->is_omp_master ? MPI_IN_PLACE : cpu_ulongs, cpu_ulongs, nr_cpu_ulongs…  in PetscOmpCtrlCreate()
270   PetscCallMPI(MPI_Comm_free(&ctrl->omp_comm));  in PetscOmpCtrlDestroy()
273     PetscCallMPI(MPI_Comm_free(&ctrl->omp_master_comm));  in PetscOmpCtrlDestroy()