Lines Matching refs:allnz

799   PetscMPIInt mnz, mm, *allnz, *allm, size, *dispnz, *dispm;  in MatMPIAdjToSeq_MPIAdj()  local
810 PetscCall(PetscMalloc2(size, &allnz, size, &dispnz)); in MatMPIAdjToSeq_MPIAdj()
811 PetscCallMPI(MPI_Allgather(&mnz, 1, MPI_INT, allnz, 1, MPI_INT, PetscObjectComm((PetscObject)A))); 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()
858 PetscCallMPI(MPI_Gather(&mnz, 1, MPI_INT, allnz, 1, MPI_INT, 0, PetscObjectComm((PetscObject)A))); in MatMPIAdjToSeqRankZero_MPIAdj()
861 for (i = 1; i < size; i++) dispnz[i] = dispnz[i - 1] + allnz[i - 1]; in MatMPIAdjToSeqRankZero_MPIAdj()
864 …PetscCallMPI(MPI_Gatherv(adj->values, mnz, MPIU_INT, Values, allnz, dispnz, MPIU_INT, 0, PetscObje… in MatMPIAdjToSeqRankZero_MPIAdj()
867 …PetscCallMPI(MPI_Gatherv(adj->j, mnz, MPIU_INT, J, allnz, dispnz, MPIU_INT, 0, PetscObjectComm((Pe… in MatMPIAdjToSeqRankZero_MPIAdj()
868 PetscCall(PetscFree2(allnz, dispnz)); in MatMPIAdjToSeqRankZero_MPIAdj()