| /petsc/src/sys/objects/ |
| H A D | subcomm.c | 38 PetscCall(PetscFree((psubcomm)->subsize)); in PetscSubcommSetFromOptions()
109 PetscMPIInt rank, size, subsize, subrank, duprank; in PetscSubcommView() local
114 PetscCallMPI(MPI_Comm_size(psubcomm->child, &subsize)); in PetscSubcommView()
118 …olor %d, sub-size %d, sub-rank %d, duprank %d\n", rank, psubcomm->color, subsize, subrank, duprank… in PetscSubcommView()
198 PetscMPIInt size, icolor, duprank, *recvbuf, sendbuf[3], mysubsize, rank, *subsize; in PetscSubcommSetTypeGeneral() local
219 PetscCall(PetscCalloc1(nsubcomm, &subsize)); in PetscSubcommSetTypeGeneral()
220 for (i = 0; i < 2 * size; i += 2) subsize[recvbuf[i]] = recvbuf[i + 1]; in PetscSubcommSetTypeGeneral()
226 duprank += subsize[icolor]; in PetscSubcommSetTypeGeneral()
240 psubcomm->subsize = subsize; in PetscSubcommSetTypeGeneral()
263 PetscCall(PetscFree((*psubcomm)->subsize)); in PetscSubcommDestroy()
[all …]
|
| /petsc/src/dm/tutorials/output/ |
| H A D | ex51_1.out | 1 [0]X subrank: 0 subsize: 1
2 [1]X subrank: 0 subsize: 1
3 [0]Y subrank: 0 subsize: 2
4 [1]Y subrank: 1 subsize: 2
|
| /petsc/src/vec/vec/tests/ |
| H A D | ex26f.F90 | 11 PetscInt :: num_cells, subsize, i
31 subsize = num_cells
32 allocate (subindices(0:subsize - 1))
33 subindices = [(i, i=0, subsize - 1)]*blocksize + field
34 …PetscCallA(ISCreateGeneral(PETSC_COMM_WORLD, subsize, subindices, PETSC_COPY_VALUES, index_set, ie…
|
| /petsc/src/dm/tutorials/ |
| H A D | ex51.c | 17 PetscMPIInt rank, subsize, subrank; in main() local
32 PetscCallMPI(MPI_Comm_size(commX, &subsize)); in main()
34 …scSynchronizedPrintf(PETSC_COMM_WORLD, "[%d]X subrank: %d subsize: %d\n", rank, subrank, subsize)); in main()
36 PetscCallMPI(MPI_Comm_size(commY, &subsize)); in main()
38 …scSynchronizedPrintf(PETSC_COMM_WORLD, "[%d]Y subrank: %d subsize: %d\n", rank, subrank, subsize)); in main()
|
| /petsc/src/ksp/ksp/tests/ |
| H A D | ex37.c | 62 PetscMPIInt color, subrank, duprank, subsize; in main() local
64 subsize = size / nsubcomm; in main()
65 …PetscCheck(subsize * nsubcomm == size, comm, PETSC_ERR_SUP, "This example requires nsubcomm %" Pet… in main()
66 color = duprank / subsize; in main()
67 subrank = duprank - color * subsize; in main()
|
| H A D | ex28.c | 13 PetscMPIInt size, rank, subsize; in main() local
145 PetscCallMPI(MPI_Comm_size(subcomm, &subsize)); in main()
146 if (subsize == 1 && rank == 0) { in main()
|
| /petsc/src/mat/tests/ |
| H A D | ex9.c | 9 PetscMPIInt rank, size, subsize; in main() local
103 PetscCallMPI(MPI_Comm_size(subcomm, &subsize)); in main()
105 if (subsize == 2 && flg_mat) { in main()
|
| H A D | ex183.c | 28 PetscMPIInt rank, size, subrank, subsize, color; in main() local
93 PetscCallMPI(MPI_Comm_size(subcomm, &subsize)); in main()
|
| /petsc/src/vec/is/is/utils/ |
| H A D | isdiff.c | 622 PetscMPIInt rank, size, llow, lhigh, low, high, color, subsize; in ISPairToList() local
689 PetscCallMPI(MPIU_Allreduce(&color, &subsize, 1, MPI_INT, MPI_SUM, comm)); in ISPairToList()
691 if (subsize == 1) subcomm = PETSC_COMM_SELF; in ISPairToList()
692 else if (subsize == size) subcomm = comm; in ISPairToList()
705 if (subsize > 0 && subsize < size) { in ISPairToList()
|
| /petsc/src/tao/constrained/impls/ipm/ |
| H A D | ipm.c | 803 PetscInt subsize; in IPMUpdateK() local
820 subsize = PetscMax(ipmP->n, ipmP->nb); in IPMUpdateK()
821 subsize = PetscMax(ipmP->me, subsize); in IPMUpdateK()
822 subsize = PetscMax(2, subsize); in IPMUpdateK()
823 PetscCall(PetscMalloc1(subsize, &indices)); in IPMUpdateK()
824 PetscCall(PetscMalloc1(subsize, &newvals)); in IPMUpdateK()
|
| /petsc/include/ |
| H A D | petscsys.h | 2568 PetscMPIInt *subsize; /* size of subcommunicator[color] */ member
|