14   PetscCallMPI(MPI_Comm_size(comm, &size));  in PetscSequentialPhaseBegin_Private()
16   PetscCallMPI(MPI_Comm_rank(comm, &rank));  in PetscSequentialPhaseBegin_Private()
17   if (rank) PetscCallMPI(MPI_Recv(NULL, 0, MPI_INT, rank - 1, tag, comm, &status));  in PetscSequentialPhaseBegin_Private()
19 …if ((rank % ng) < ng - 1 && rank != size - 1) PetscCallMPI(MPI_Send(NULL, 0, MPI_INT, rank + 1, ta…  in PetscSequentialPhaseBegin_Private()
29   PetscCallMPI(MPI_Comm_rank(comm, &rank));  in PetscSequentialPhaseEnd_Private()
30   PetscCallMPI(MPI_Comm_size(comm, &size));  in PetscSequentialPhaseEnd_Private()
34 …if ((rank % ng) == ng - 1 || rank == size - 1) PetscCallMPI(MPI_Send(NULL, 0, MPI_INT, (rank + 1) …  in PetscSequentialPhaseEnd_Private()
35   if (rank == 0) PetscCallMPI(MPI_Recv(NULL, 0, MPI_INT, size - 1, tag, comm, &status));  in PetscSequentialPhaseEnd_Private()
78   PetscCallMPI(MPI_Comm_size(comm, &size));  in PetscSequentialPhaseBegin()
82 …if (Petsc_Seq_keyval == MPI_KEYVAL_INVALID) PetscCallMPI(MPI_Comm_create_keyval(MPI_COMM_NULL_COPY…  in PetscSequentialPhaseBegin()
84   PetscCallMPI(MPI_Comm_dup(comm, &local_comm));  in PetscSequentialPhaseBegin()
89   PetscCallMPI(MPI_Comm_set_attr(comm, Petsc_Seq_keyval, (void *)addr_local_comm));  in PetscSequentialPhaseBegin()
117   PetscCallMPI(MPI_Comm_size(comm, &size));  in PetscSequentialPhaseEnd()
120   PetscCallMPI(MPI_Comm_get_attr(comm, Petsc_Seq_keyval, (void **)&addr_local_comm, &iflg));  in PetscSequentialPhaseEnd()
127   PetscCallMPI(MPI_Comm_free(&local_comm));  in PetscSequentialPhaseEnd()
128   PetscCallMPI(MPI_Comm_delete_attr(comm, Petsc_Seq_keyval));  in PetscSequentialPhaseEnd()
157   PetscCallMPI(MPIU_Allreduce(sendbuf, recvbuf, 3, MPIU_INT, MPI_MAX, comm));  in PetscGlobalMinMaxInt()
186   PetscCallMPI(MPIU_Allreduce(sendbuf, minMaxValGlobal, 2, MPIU_REAL, MPIU_MAX, comm));  in PetscGlobalMinMaxReal()