| /petsc/src/sys/tests/ |
| H A D | ex8.c | 80 PetscMPIInt rank, size, *toranks, *fromranks, nto, nfrom; in main() local
123 …PetscCall(PetscCommBuildTwoSidedF(PETSC_COMM_WORLD, 1, MPI_INT, nto, toranks, todummy, &nfrom, &fr… in main()
129 …PetscCall(PetscCommBuildTwoSided(PETSC_COMM_WORLD, 1, dtype, nto, toranks, todata, &nfrom, &fromra… in main()
135 PetscCall(PetscMalloc2(nfrom, &iranks, nfrom, &iperm)); in main()
136 for (i = 0; i < nfrom; i++) { in main()
141 PetscCall(PetscSortIntWithPermutation(nfrom, iranks, iperm)); in main()
142 for (i = 0; i < nfrom; i++) { in main()
150 …PetscCheck(nto == nfrom, PETSC_COMM_SELF, PETSC_ERR_PLIB, "[%d] From ranks %d does not match To ra… in main()
154 for (n = 0; n < nfrom; n++) { in main()
|
| /petsc/src/sys/utils/ |
| H A D | mpits.c | 73 …cMPIInt nto, const PetscMPIInt *toranks, const void *todata, PetscMPIInt *nfrom, PetscMPIInt **fro… in PetscCommBuildTwoSided_Ibarrier() argument
123 *nfrom = nrecvs; in PetscCommBuildTwoSided_Ibarrier()
133 …cMPIInt nto, const PetscMPIInt *toranks, const void *todata, PetscMPIInt *nfrom, PetscMPIInt **fro… in PetscCommBuildTwoSided_Allreduce() argument
172 *nfrom = nrecvs; in PetscCommBuildTwoSided_Allreduce()
179 …cMPIInt nto, const PetscMPIInt *toranks, const void *todata, PetscMPIInt *nfrom, PetscMPIInt **fro… in PetscCommBuildTwoSided_RedScatter() argument
216 *nfrom = nrecvs; in PetscCommBuildTwoSided_RedScatter()
255 …MPIInt nto, const PetscMPIInt toranks[], const void *todata, PetscMPIInt *nfrom, PetscMPIInt *from… in PetscCommBuildTwoSided() argument
267 …PetscCall(PetscCommBuildTwoSided_Ibarrier(comm, count, dtype, nto, toranks, todata, nfrom, fromran… in PetscCommBuildTwoSided()
273 …PetscCall(PetscCommBuildTwoSided_Allreduce(comm, count, dtype, nto, toranks, todata, nfrom, fromra… in PetscCommBuildTwoSided()
277 …PetscCall(PetscCommBuildTwoSided_RedScatter(comm, count, dtype, nto, toranks, todata, nfrom, fromr… in PetscCommBuildTwoSided()
[all …]
|
| /petsc/src/vec/is/is/utils/ |
| H A D | iscoloring.c | 411 PetscMPIInt *toranks, *fromranks, size, target_rank, *fromperm_newtoold, nto, nfrom; in ISBuildTwoSided() local
457 …PetscCall(PetscCommBuildTwoSided(comm, 2, MPIU_INT, nto, toranks, tosizes, &nfrom, &fromranks, &fr… in ISBuildTwoSided()
459 PetscCall(PetscMalloc1(nfrom, &fromperm_newtoold)); in ISBuildTwoSided()
460 for (PetscMPIInt i = 0; i < nfrom; i++) fromperm_newtoold[i] = i; in ISBuildTwoSided()
461 PetscCall(PetscSortMPIIntWithArray(nfrom, fromranks, fromperm_newtoold)); in ISBuildTwoSided()
463 for (PetscMPIInt i = 0; i < nfrom; i++) nrecvs += fromsizes[i * 2]; in ISBuildTwoSided()
467 for (PetscMPIInt i = 0; i < nfrom; i++) { in ISBuildTwoSided()
|
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mpiov.c | 96 PetscMPIInt rank, size, *toranks, *fromranks, nto, nfrom, owner, *rrow_ranks; in MatIncreaseOverlap_MPIAIJ_Once_Scalable() local
167 …PetscCall(PetscCommBuildTwoSided(comm, 2, MPIU_INT, nto, toranks, tosizes, &nfrom, &fromranks, &fr… in MatIncreaseOverlap_MPIAIJ_Once_Scalable()
169 for (PetscMPIInt i = 0; i < nfrom; i++) nrecvrows += fromsizes[2 * i]; in MatIncreaseOverlap_MPIAIJ_Once_Scalable()
172 for (PetscMPIInt i = 0; i < nfrom; i++) { in MatIncreaseOverlap_MPIAIJ_Once_Scalable()
198 …PetscCall(MatIncreaseOverlap_MPIAIJ_Send_Scalable(mat, nidx, nfrom, fromranks, fromsizes, fromdata… in MatIncreaseOverlap_MPIAIJ_Once_Scalable()
201 …PetscCall(PetscCommBuildTwoSided(comm, 2, MPIU_INT, nfrom, fromranks, sbsizes, &nto, &toranks, &to… in MatIncreaseOverlap_MPIAIJ_Once_Scalable()
280 …tIncreaseOverlap_MPIAIJ_Send_Scalable(Mat mat, PetscInt nidx, PetscMPIInt nfrom, PetscMPIInt *from… in MatIncreaseOverlap_MPIAIJ_Send_Scalable() argument
308 for (i = 0; i < nfrom; i++) max_fszs = fromsizes[2 * i] > max_fszs ? fromsizes[2 * i] : max_fszs; in MatIncreaseOverlap_MPIAIJ_Send_Scalable()
310 …oc5(max_fszs * nidx, &rows_data_ptr, nidx, &rows_data, nidx, &rows_pos_i, nfrom * nidx, &indv_coun… in MatIncreaseOverlap_MPIAIJ_Send_Scalable()
314 for (i = 0; i < nfrom; i++) { in MatIncreaseOverlap_MPIAIJ_Send_Scalable()
[all …]
|