Lines Matching refs:sdisp
389 PetscInt *sdisp, *rdisp;
400 PetscCall(PetscMalloc5(sendRowCnt, &sendRowLen, recvRowCnt + 1, &recvRowLen, nranks, &sdisp, niranks + 1, &rdisp, nranks + niranks, &reqs));
418 for (PetscInt i = 0; i < nranks; i++) PetscCallMPI(MPIU_Irecv(&sdisp[i], 1, MPIU_INT, ranks[i], tag, comm, &reqs[i]));
435 iremote[nleaves + j].index = sdisp[i] + j;
592 PetscCall(PetscFree5(sendRowLen, recvRowLen, sdisp, rdisp, reqs));
795 PetscInt *sdisp, *rdisp;
801 PetscCall(PetscMalloc3(niranks + 1, &sdisp, nranks, &rdisp, niranks + nranks, &reqs));
803 sdisp[0] = 0; // send displacement
805 sdisp[i + 1] = sdisp[i];
808 sdisp[i + 1] += E_RowLen[r];
814 for (PetscInt i = 0; i < niranks; i++) PetscCallMPI(MPIU_Isend(&sdisp[i], 1, MPIU_INT, iranks[i], tag, comm, &reqs[nranks + i]));
818 PetscInt nroots = sdisp[niranks]; // roots are nonzeros I will send
831 PetscCall(PetscFree3(sdisp, rdisp, reqs));