Lines Matching refs:nrqs

62   PetscMPIInt      size, rank, tag1, tag2, *w2, *w1, nrqs, nrqr, *pa;  in MatIncreaseOverlap_MPIBAIJ_Once()  local
108 nrqs = 0; /* no of outgoing messages */ in MatIncreaseOverlap_MPIBAIJ_Once()
115 nrqs++; in MatIncreaseOverlap_MPIBAIJ_Once()
119 PetscCall(PetscMalloc1(nrqs, &pa)); in MatIncreaseOverlap_MPIBAIJ_Once()
128 for (PetscMPIInt i = 0; i < nrqs; i++) { in MatIncreaseOverlap_MPIBAIJ_Once()
136 PetscCall(PetscGatherMessageLengths(comm, nrqs, nrqr, w1, &onodes1, &olengths1)); in MatIncreaseOverlap_MPIBAIJ_Once()
147 for (PetscMPIInt i = 0; i < nrqs; i++) { in MatIncreaseOverlap_MPIBAIJ_Once()
157 for (PetscMPIInt i = 0; i < nrqs; i++) { in MatIncreaseOverlap_MPIBAIJ_Once()
211 PetscCall(PetscMalloc1(nrqs, &s_waits1)); in MatIncreaseOverlap_MPIBAIJ_Once()
212 for (PetscMPIInt i = 0; i < nrqs; ++i) { in MatIncreaseOverlap_MPIBAIJ_Once()
232 PetscCallMPI(MPI_Waitall(nrqs, s_waits1, MPI_STATUSES_IGNORE)); in MatIncreaseOverlap_MPIBAIJ_Once()
258 PetscCall(PetscGatherMessageLengths(comm, nrqr, nrqs, rw1, &onodes2, &olengths2)); in MatIncreaseOverlap_MPIBAIJ_Once()
262 PetscCall(PetscPostIrecvInt(comm, tag2, nrqs, onodes2, olengths2, &rbuf2, &r_waits2)); in MatIncreaseOverlap_MPIBAIJ_Once()
280 for (PetscMPIInt i = 0; i < nrqs; ++i) { in MatIncreaseOverlap_MPIBAIJ_Once()
281 PetscCallMPI(MPI_Waitany(nrqs, r_waits2, &idex, MPI_STATUS_IGNORE)); in MatIncreaseOverlap_MPIBAIJ_Once()
621 …PetscMPIInt rank, size, tag0, tag2, tag3, tag4, *w1, *w2, *w3, *w4, nrqr, nrqs = 0, *req_sour… local
701 nrqs = smat_i->nrqs;
729 nrqs = smat_i->nrqs;
783 nrqs = 0; /* no of outgoing messages */
790 nrqs++;
793 PetscCall(PetscMalloc1(nrqs, &pa)); /*(proc -array)*/
799 for (PetscMPIInt i = 0; i < nrqs; i++) {
804 …etscInfo(0, "Number of outgoing messages %d Total message length %" PetscInt_FMT "\n", nrqs, msz));
808 PetscCall(PetscGatherMessageLengths(comm, nrqs, nrqr, w1, &onodes1, &olengths1));
822 for (PetscMPIInt i = 0; i < nrqs; i++) {
831 for (PetscMPIInt i = 0; i < nrqs; i++) {
870 PetscCall(PetscMalloc1(nrqs, &s_waits1));
871 for (PetscMPIInt i = 0; i < nrqs; ++i) {
877 PetscCall(PetscMalloc1(nrqs, &r_waits2));
878 PetscCall(PetscMalloc3(nrqs, &req_source2, nrqs, &rbuf2, nrqs, &rbuf3));
879 if (nrqs) rbuf2[0] = tmp + msz;
880 for (PetscMPIInt i = 1; i < nrqs; ++i) rbuf2[i] = rbuf2[i - 1] + w1[pa[i - 1]];
881 for (PetscMPIInt i = 0; i < nrqs; ++i) {
919 PetscCall(PetscMalloc1(nrqs, &r_waits3));
921 PetscCallMPI(MPI_Waitall(nrqs, r_waits2, MPI_STATUSES_IGNORE));
922 for (PetscMPIInt i = 0; i < nrqs; ++i) {
930 PetscCallMPI(MPI_Waitall(nrqs, s_waits1, MPI_STATUSES_IGNORE));
1087 PetscCallMPI(MPI_Waitall(nrqs, r_waits3, MPI_STATUSES_IGNORE));
1088 for (tmp2 = 0; tmp2 < nrqs; tmp2++) {
1157 smat_i->nrqs = nrqs;
1196 smat_i->nrqs = nrqs;
1232 PetscCall(PetscMalloc1(nrqs, &rbuf4));
1233 PetscCall(PetscMalloc1(nrqs, &r_waits4));
1234 for (PetscMPIInt i = 0; i < nrqs; ++i) {
1414 if (!ijonly) PetscCallMPI(MPI_Waitall(nrqs, r_waits4, MPI_STATUSES_IGNORE));
1415 for (tmp2 = 0; tmp2 < nrqs; tmp2++) {
1537 for (PetscMPIInt i = 0; i < nrqs; ++i) PetscCall(PetscFree(rbuf4[i]));