Searched refs:dispnz (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/mat/impls/adj/mpi/ |
| H A D | mpiadj.c | 799 PetscMPIInt mnz, mm, *allnz, *allm, size, *dispnz, *dispm; in MatMPIAdjToSeq_MPIAdj() local
810 PetscCall(PetscMalloc2(size, &allnz, size, &dispnz)); in MatMPIAdjToSeq_MPIAdj()
812 dispnz[0] = 0; in MatMPIAdjToSeq_MPIAdj()
813 for (i = 1; i < size; i++) dispnz[i] = dispnz[i - 1] + allnz[i - 1]; in MatMPIAdjToSeq_MPIAdj()
816 …PetscCallMPI(MPI_Allgatherv(adj->values, mnz, MPIU_INT, Values, allnz, dispnz, MPIU_INT, PetscObje… in MatMPIAdjToSeq_MPIAdj()
819 …PetscCallMPI(MPI_Allgatherv(adj->j, mnz, MPIU_INT, J, allnz, dispnz, MPIU_INT, PetscObjectComm((Pe… in MatMPIAdjToSeq_MPIAdj()
820 PetscCall(PetscFree2(allnz, dispnz)); in MatMPIAdjToSeq_MPIAdj()
845 PetscMPIInt mnz, mm, *allnz = NULL, *allm, size, *dispnz, *dispm, rank; in MatMPIAdjToSeqRankZero_MPIAdj() local
857 if (!rank) PetscCall(PetscMalloc2(size, &allnz, size, &dispnz)); in MatMPIAdjToSeqRankZero_MPIAdj()
860 dispnz[0] = 0; in MatMPIAdjToSeqRankZero_MPIAdj()
[all …]
|