| /petsc/src/sys/utils/ |
| H A D | mpimesg.c | 90 PetscErrorCode PetscGatherMessageLengths(MPI_Comm comm, PetscMPIInt nsends, PetscMPIInt nrecvs, con… in PetscGatherMessageLengths() argument
102 PetscCall(PetscMalloc2(nrecvs + nsends, &r_waits, nrecvs + nsends, &w_status)); in PetscGatherMessageLengths()
118 if (nrecvs + nsends) PetscCallMPI(MPI_Waitall(nrecvs + nsends, r_waits, w_status)); in PetscGatherMessageLengths()
168 PetscErrorCode PetscGatherMessageLengths_Private(MPI_Comm comm, PetscMPIInt nsends, PetscMPIInt nre… in PetscGatherMessageLengths_Private() argument
180 PetscCall(PetscMalloc2(nrecvs + nsends, &r_waits, nrecvs + nsends, &w_status)); in PetscGatherMessageLengths_Private()
196 if (nrecvs + nsends) PetscCallMPI(MPI_Waitall(nrecvs + nsends, r_waits, w_status)); in PetscGatherMessageLengths_Private()
239 PetscErrorCode PetscGatherMessageLengths2(MPI_Comm comm, PetscMPIInt nsends, PetscMPIInt nrecvs, co… in PetscGatherMessageLengths2() argument
250 …PetscCall(PetscMalloc4(nrecvs + nsends, &r_waits, 2 * nrecvs, &buf_r, 2 * nsends, &buf_s, nrecvs +… in PetscGatherMessageLengths2()
271 …PetscCheck(j == nsends, PETSC_COMM_SELF, PETSC_ERR_PLIB, "j %d not equal to expected number of sen… in PetscGatherMessageLengths2()
274 if (nrecvs + nsends) PetscCallMPI(MPI_Waitall(nrecvs + nsends, r_waits, w_status)); in PetscGatherMessageLengths2()
|
| H A D | mpits.c | 111 PetscMPIInt sent, nsends; in PetscCommBuildTwoSided_Ibarrier() local
112 PetscCall(PetscMPIIntCast(nto, &nsends)); in PetscCommBuildTwoSided_Ibarrier()
113 PetscCallMPI(MPI_Testall(nsends, sendreqs, &sent, MPI_STATUSES_IGNORE)); in PetscCommBuildTwoSided_Ibarrier()
382 PetscMPIInt sent, nsends; in PetscCommBuildTwoSidedFReq_Ibarrier() local
383 PetscCall(PetscMPIIntCast(nto, &nsends)); in PetscCommBuildTwoSidedFReq_Ibarrier()
384 PetscCallMPI(MPI_Testall(nsends, sendreqs, &sent, MPI_STATUSES_IGNORE)); in PetscCommBuildTwoSidedFReq_Ibarrier()
|
| /petsc/src/vec/is/ao/impls/memscalable/ |
| H A D | aomemscalable.c | 97 PetscMPIInt nreceives, nsends; in AOMap_MemoryScalable_private() local
135 nsends = 0; in AOMap_MemoryScalable_private()
136 for (PetscMPIInt i = 0; i < size; i++) nsends += sizes[2 * i + 1]; in AOMap_MemoryScalable_private()
147 PetscCall(PetscMalloc2(nsends * nmax, &rindices2, nsends, &recv_waits2)); in AOMap_MemoryScalable_private()
149 PetscCall(PetscMalloc3(n, &sindices, nsends, &send_waits, nsends, &send_status)); in AOMap_MemoryScalable_private()
189 PetscCheck(nsends == count, comm, PETSC_ERR_SUP, "nsends %d != count %d", nsends, count); in AOMap_MemoryScalable_private()
192 if (nsends) PetscCallMPI(MPI_Waitall(nsends, send_waits, send_status)); in AOMap_MemoryScalable_private()
213 for (j = 0; j < nsends; j++) { in AOMap_MemoryScalable_private()
214 PetscCallMPI(MPI_Waitany(nsends, recv_waits2, &widx, &recv_status)); in AOMap_MemoryScalable_private()
272 PetscInt *owner, *start, *sizes, nsends, nreceives; in AOCreateMemoryScalable_private() local
[all …]
|
| /petsc/src/vec/vec/utils/ |
| H A D | vecstash.c | 59 stash->nsends = 0; in VecStashCreate_Private()
92 PetscMPIInt nsends = stash->nsends; in VecStashScatterEnd_Private() local
98 if (nsends) { in VecStashScatterEnd_Private()
99 PetscCall(PetscMalloc1(2 * nsends, &send_status)); in VecStashScatterEnd_Private()
100 PetscCallMPI(MPI_Waitall(2 * nsends, stash->send_waits, send_status)); in VecStashScatterEnd_Private()
222 …PetscMPIInt size = stash->size, tag1 = stash->tag1, tag2 = stash->tag2, j, *owner, nsends, nrecei… in VecStashScatterBegin_Private() local
249 nsends = 0; in VecStashScatterBegin_Private()
250 for (PetscMPIInt i = 0; i < size; i++) nsends += nprocs[2 * i + 1]; in VecStashScatterBegin_Private()
273 PetscCall(PetscMalloc1(2 * nsends, &send_waits)); in VecStashScatterBegin_Private()
305 stash->nsends = nsends; in VecStashScatterBegin_Private()
|
| /petsc/src/mat/utils/ |
| H A D | matstash.c | 70 stash->nsends = 0; in MatStashCreate_Private()
130 PetscMPIInt nsends = stash->nsends; in MatStashScatterEnd_Ref() local
137 if (nsends) { in MatStashScatterEnd_Ref()
138 PetscCall(PetscMalloc1(2 * nsends, &send_status)); in MatStashScatterEnd_Ref()
139 PetscCallMPI(MPI_Waitall(2 * nsends, stash->send_waits, send_status)); in MatStashScatterEnd_Ref()
452 PetscMPIInt *sizes, *nlengths, nreceives, nsends, tag1 = stash->tag1, tag2 = stash->tag2; in MatStashScatterBegin_Ref() local
495 nsends = 0; in MatStashScatterBegin_Ref()
499 nsends++; in MatStashScatterBegin_Ref()
507 PetscCall(PetscGatherMessageLengths(comm, nsends, nreceives, nlengths, &onodes, &olengths)); in MatStashScatterBegin_Ref()
523 PetscCall(PetscMalloc1(2 * nsends, &send_waits)); in MatStashScatterBegin_Ref()
[all …]
|
| /petsc/src/ksp/pc/impls/redistribute/ |
| H A D | redistribute.c | 79 PetscMPIInt *sizes = NULL, nrecvs, nsends; in PCSetUp_Redistribute() local
171 nsends = 0; in PCSetUp_Redistribute()
176 if (!sizes[j]++) nsends++; in PCSetUp_Redistribute()
184 PetscCall(PetscGatherMessageLengths(comm, nsends, nrecvs, sizes, &onodes1, &olengths1)); in PCSetUp_Redistribute()
201 PetscCall(PetscMalloc3(cnt, &svalues, nsends, &send_waits, size, &starts)); in PCSetUp_Redistribute()
235 if (nsends) { /* wait on sends */ in PCSetUp_Redistribute()
236 PetscCall(PetscMalloc1(nsends, &send_status)); in PCSetUp_Redistribute()
237 PetscCallMPI(MPI_Waitall(nsends, send_waits, send_status)); in PCSetUp_Redistribute()
|
| /petsc/src/mat/impls/sell/mpi/ |
| H A D | mpisell.h | 15 PetscInt nsends, nrecvs; /* numbers of sends and receives */ member
|
| /petsc/src/vec/is/is/utils/ |
| H A D | iscoloring.c | 409 PetscInt *send_indices, rstart, *recv_indices, nrecvs, nsends; in ISBuildTwoSided() local
445 nsends = tooffsets_tmp[size]; in ISBuildTwoSided()
446 PetscCall(PetscCalloc1(nsends, &send_indices)); in ISBuildTwoSided()
474 …PetscCall(PetscSFSetGraph(sf, nsends, nrecvs, NULL, PETSC_OWN_POINTER, iremote, PETSC_OWN_POINTER)… in ISBuildTwoSided()
|
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mpimatmatmult.c | 393 PetscInt nsends, nrecvs; member
406 for (i = 0; i < contents->nsends; i++) PetscCallMPI(MPI_Type_free(&contents->stype[i])); in MatMPIAIJ_MPIDenseDestroy()
423 PetscMPIInt *disp, nsends, nrecvs, nrows_to, nrows_from; in MatMatMultSymbolic_MPIAIJ_MPIDense() local
440 …PetscCall(VecScatterGetRemote_Private(ctx, PETSC_TRUE /*send*/, &nsends, &sstarts, &sindices, NULL… in MatMatMultSymbolic_MPIAIJ_MPIDense()
480 …PetscCall(PetscMalloc4(nsends, &stype, nrecvs, &rtype, nrecvs, &contents->rwaits, nsends, &content… in MatMatMultSymbolic_MPIAIJ_MPIDense()
482 contents->nsends = nsends; in MatMatMultSymbolic_MPIAIJ_MPIDense()
489 for (PetscMPIInt i = 0; i < nsends; i++) { in MatMatMultSymbolic_MPIAIJ_MPIDense()
509 …PetscCall(VecScatterRestoreRemote_Private(ctx, PETSC_TRUE /*send*/, &nsends, &sstarts, &sindices, … in MatMatMultSymbolic_MPIAIJ_MPIDense()
544 PetscMPIInt nsends, nrecvs; in MatMPIDenseScatter() local
559 …PetscCall(VecScatterGetRemote_Private(ctx, PETSC_TRUE /*send*/, &nsends, &sstarts, &sindices, &spr… in MatMPIDenseScatter()
[all …]
|
| H A D | mpiaij.h | 49 PetscInt nsends, nrecvs; /* numbers of sends and receives */ \
|
| H A D | mpiaij.c | 5767 PetscMPIInt nrecvs, nsends; in MatGetBrowsOfAoCols_MPIAIJ() local
5794 …PetscCall(VecScatterGetRemote_Private(ctx, PETSC_TRUE /*send*/, &nsends, &sstarts, &srow, &sprocs,… in MatGetBrowsOfAoCols_MPIAIJ()
5797 PetscCall(PetscMPIIntCast(nsends + nrecvs, &nreqs)); in MatGetBrowsOfAoCols_MPIAIJ()
5814 PetscCall(PetscMalloc2(nsends + 1, &sstartsj, nrecvs + 1, &rstartsj)); in MatGetBrowsOfAoCols_MPIAIJ()
5819 if (nsends) { in MatGetBrowsOfAoCols_MPIAIJ()
5821 PetscCall(PetscMalloc1(sbs * (sstarts[nsends] - sstarts[0]), &svalues)); in MatGetBrowsOfAoCols_MPIAIJ()
5823 for (i = 0; i < nsends; i++) { in MatGetBrowsOfAoCols_MPIAIJ()
5880 if (nsends) k = sstarts[0]; in MatGetBrowsOfAoCols_MPIAIJ()
5881 for (i = 0; i < nsends; i++) { in MatGetBrowsOfAoCols_MPIAIJ()
5912 if (nsends) k = sstarts[0]; in MatGetBrowsOfAoCols_MPIAIJ()
[all …]
|
| /petsc/src/mat/impls/scalapack/ |
| H A D | matscalapack.c | 1517 PetscInt size = stash->size, nsends; in MatStashScatterBegin_ScaLAPACK() local
1561 nsends = 0; in MatStashScatterBegin_ScaLAPACK()
1565 nsends++; in MatStashScatterBegin_ScaLAPACK()
1574 PetscCall(PetscMPIIntCast(nsends, &insends)); in MatStashScatterBegin_ScaLAPACK()
1591 PetscCall(PetscMalloc1(2 * nsends, &send_waits)); in MatStashScatterBegin_ScaLAPACK()
1637 PetscCall(PetscInfo(NULL, "No of messages: %" PetscInt_FMT "\n", nsends)); in MatStashScatterBegin_ScaLAPACK()
1664 stash->nsends = (PetscMPIInt)nsends; in MatStashScatterBegin_ScaLAPACK()
|
| /petsc/include/petsc/private/ |
| H A D | matimpl.h | 356 PetscMPIInt nsends, nrecvs; /* numbers of sends and receives */ member
427 PetscInt nzlocal, nsends, nrecvs; member
740 PetscInt nsends, nrecvs; /* numbers of sends and receives */ member
|
| H A D | vecimpl.h | 142 PetscMPIInt nsends, nrecvs; /* numbers of sends and receives */ member
|