Lines Matching refs:PetscCallMPI

34     PetscCallMPI(MPIU_Allreduce(b1, b2, 2, MPI_INT, MPI_MAX, comm));  in PetscCommBuildTwoSidedSetType()
61 PetscCallMPI(MPI_Comm_size(comm, &size)); in PetscCommBuildTwoSidedGetType()
84 PetscCallMPI(MPI_Type_get_extent(dtype, &lb, &unitbytes)); in PetscCommBuildTwoSided_Ibarrier()
88 …for (i = 0; i < nto; i++) PetscCallMPI(MPI_Issend((void *)(tdata + count * unitbytes * i), count, … in PetscCommBuildTwoSided_Ibarrier()
100 PetscCallMPI(MPI_Iprobe(MPI_ANY_SOURCE, tag, comm, &flag, &status)); in PetscCommBuildTwoSided_Ibarrier()
107 PetscCallMPI(MPI_Recv(buf, count, dtype, status.MPI_SOURCE, tag, comm, MPI_STATUS_IGNORE)); in PetscCommBuildTwoSided_Ibarrier()
113 PetscCallMPI(MPI_Testall(nsends, sendreqs, &sent, MPI_STATUSES_IGNORE)); in PetscCommBuildTwoSided_Ibarrier()
115 PetscCallMPI(MPI_Ibarrier(comm, &barrier)); in PetscCommBuildTwoSided_Ibarrier()
120 PetscCallMPI(MPI_Test(&barrier, &done, MPI_STATUS_IGNORE)); in PetscCommBuildTwoSided_Ibarrier()
143 PetscCallMPI(MPI_Comm_size(comm, &size)); in PetscCommBuildTwoSided_Allreduce()
144 PetscCallMPI(MPI_Comm_rank(comm, &rank)); in PetscCommBuildTwoSided_Allreduce()
146 PetscCallMPI(MPI_Comm_get_attr(comm, Petsc_Counter_keyval, &counter, &flg)); in PetscCommBuildTwoSided_Allreduce()
156 PetscCallMPI(MPIU_Allreduce(MPI_IN_PLACE, iflags, size, MPI_INT, MPI_SUM, comm)); in PetscCommBuildTwoSided_Allreduce()
158 PetscCallMPI(MPI_Type_get_extent(dtype, &lb, &unitbytes)); in PetscCommBuildTwoSided_Allreduce()
164 …for (i = 0; i < nrecvs; i++) PetscCallMPI(MPIU_Irecv((void *)(fdata + count * unitbytes * i), coun… in PetscCommBuildTwoSided_Allreduce()
165 …for (i = 0; i < nto; i++) PetscCallMPI(MPIU_Isend((void *)(tdata + count * unitbytes * i), count, … in PetscCommBuildTwoSided_Allreduce()
166 PetscCallMPI(MPI_Waitall(nto + nrecvs, reqs, statuses)); in PetscCommBuildTwoSided_Allreduce()
189 PetscCallMPI(MPI_Comm_size(comm, &size)); in PetscCommBuildTwoSided_RedScatter()
191 PetscCallMPI(MPI_Comm_get_attr(comm, Petsc_Counter_keyval, &counter, &flg)); in PetscCommBuildTwoSided_RedScatter()
201 PetscCallMPI(MPI_Reduce_scatter_block(iflags, &nrecvs, 1, MPI_INT, MPI_SUM, comm)); in PetscCommBuildTwoSided_RedScatter()
202 PetscCallMPI(MPI_Type_get_extent(dtype, &lb, &unitbytes)); in PetscCommBuildTwoSided_RedScatter()
208 …for (i = 0; i < nrecvs; i++) PetscCallMPI(MPIU_Irecv((void *)(fdata + count * unitbytes * i), coun… in PetscCommBuildTwoSided_RedScatter()
209 …for (i = 0; i < nto; i++) PetscCallMPI(MPIU_Isend((void *)(tdata + count * unitbytes * i), count, … in PetscCommBuildTwoSided_RedScatter()
210 PetscCallMPI(MPI_Waitall(nto + nrecvs, reqs, statuses)); in PetscCommBuildTwoSided_RedScatter()
306 PetscCallMPI(MPI_Type_get_extent(dtype, &lb, &unitbytes)); in PetscCommBuildTwoSidedFReq_Reference()
341 PetscCallMPI(MPI_Type_get_extent(dtype, &lb, &unitbytes)); in PetscCommBuildTwoSidedFReq_Ibarrier()
347 …for (i = 0; i < nto; i++) PetscCallMPI(MPI_Issend((void *)(tdata + count * unitbytes * i), count, … in PetscCommBuildTwoSidedFReq_Ibarrier()
368 PetscCallMPI(MPI_Iprobe(MPI_ANY_SOURCE, tag, comm, &flag, &status)); in PetscCommBuildTwoSidedFReq_Ibarrier()
375 PetscCallMPI(MPI_Recv(buf, count, dtype, status.MPI_SOURCE, tag, comm, MPI_STATUS_IGNORE)); in PetscCommBuildTwoSidedFReq_Ibarrier()
384 PetscCallMPI(MPI_Testall(nsends, sendreqs, &sent, MPI_STATUSES_IGNORE)); in PetscCommBuildTwoSidedFReq_Ibarrier()
386 PetscCallMPI(MPI_Ibarrier(comm, &barrier)); in PetscCommBuildTwoSidedFReq_Ibarrier()
390 PetscCallMPI(MPI_Test(&barrier, &done, MPI_STATUS_IGNORE)); in PetscCommBuildTwoSidedFReq_Ibarrier()
446 PetscCallMPI(MPI_Waitall(nto * ntags, toreqs, MPI_STATUSES_IGNORE)); in PetscCommBuildTwoSidedF()
447 PetscCallMPI(MPI_Waitall(*nfrom * ntags, fromreqs, MPI_STATUSES_IGNORE)); in PetscCommBuildTwoSidedF()
495 PetscCallMPI(MPI_Comm_size(comm, &size)); in PetscCommBuildTwoSidedFReq()