Searched refs:lindices (Results 1 – 5 of 5) sorted by relevance
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mmaij.c | 209 PetscInt i, j, n, nt, cstart, cend, no, *garray = ina->garray, *lindices, bs = inA->rmap->bs; in MatMPIAIJDiagonalScaleLocalSetUp() local
237 PetscCall(PetscCalloc1(inA->cmap->N / bs, &lindices)); in MatMPIAIJDiagonalScaleLocalSetUp()
238 for (i = 0; i < ina->B->cmap->n / bs; i++) lindices[garray[i * bs] / bs] = i + 1; in MatMPIAIJDiagonalScaleLocalSetUp()
243 if (lindices[inA->rmap->mapping->indices[i]]) { in MatMPIAIJDiagonalScaleLocalSetUp()
245 r_rmapo[i] = lindices[inA->rmap->mapping->indices[i]]; in MatMPIAIJDiagonalScaleLocalSetUp()
249 PetscCall(PetscFree(lindices)); in MatMPIAIJDiagonalScaleLocalSetUp()
|
| /petsc/src/mat/impls/baij/mpi/ |
| H A D | mmbaij.c | 203 PetscInt bs = inA->rmap->bs, i, n, nt, j, cstart, cend, no, *garray = ina->garray, *lindices; in MatMPIBAIJDiagonalScaleLocalSetUp() local
227 PetscCall(PetscCalloc1(ina->Nbs, &lindices)); in MatMPIBAIJDiagonalScaleLocalSetUp()
228 for (i = 0; i < B->nbs; i++) lindices[garray[i]] = i + 1; in MatMPIBAIJDiagonalScaleLocalSetUp()
233 if (lindices[inA->rmap->mapping->indices[i]]) { in MatMPIBAIJDiagonalScaleLocalSetUp()
235 r_rmapo[i] = lindices[inA->rmap->mapping->indices[i]]; in MatMPIBAIJDiagonalScaleLocalSetUp()
239 PetscCall(PetscFree(lindices)); in MatMPIBAIJDiagonalScaleLocalSetUp()
|
| /petsc/src/mat/impls/sell/mpi/ |
| H A D | mmsell.c | 203 PetscInt i, n, nt, cstart, cend, no, *garray = ina->garray, *lindices; in MatMPISELLDiagonalScaleLocalSetUp() local
224 PetscCall(PetscCalloc1(inA->cmap->N, &lindices)); in MatMPISELLDiagonalScaleLocalSetUp()
225 for (i = 0; i < ina->B->cmap->n; i++) lindices[garray[i]] = i + 1; in MatMPISELLDiagonalScaleLocalSetUp()
230 if (lindices[inA->rmap->mapping->indices[i]]) { in MatMPISELLDiagonalScaleLocalSetUp()
232 r_rmapo[i] = lindices[inA->rmap->mapping->indices[i]]; in MatMPISELLDiagonalScaleLocalSetUp()
236 PetscCall(PetscFree(lindices)); in MatMPISELLDiagonalScaleLocalSetUp()
|
| /petsc/src/vec/is/is/utils/ |
| H A D | iscoloring.c | 673 const PetscInt *lindices; in ISAllGather() local
702 PetscCall(ISGetIndices(is, &lindices)); in ISAllGather()
703 …PetscCallMPI(MPI_Allgatherv((void *)lindices, nn, MPIU_INT, indices, sizes, offsets, MPIU_INT, com… in ISAllGather()
704 PetscCall(ISRestoreIndices(is, &lindices)); in ISAllGather()
734 PetscErrorCode ISAllGatherColors(MPI_Comm comm, PetscInt n, ISColoringValue lindices[], PetscInt *o… in ISAllGatherColors() argument
752 …PetscCallMPI(MPI_Allgatherv(lindices, nn, MPIU_COLORING_VALUE, indices, sizes, offsets, MPIU_COLOR… in ISAllGatherColors()
|
| /petsc/src/vec/is/is/interface/ |
| H A D | index.c | 1349 const PetscInt *lindices; in ISGatherTotal_Private() local
1369 PetscCall(ISGetIndices(is, &lindices)); in ISGatherTotal_Private()
1370 …PetscCallMPI(MPI_Allgatherv((void *)lindices, nn, MPIU_INT, is->total, sizes, offsets, MPIU_INT, c… in ISGatherTotal_Private()
1371 PetscCall(ISRestoreIndices(is, &lindices)); in ISGatherTotal_Private()
|