Searched refs:nzstart (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/mat/impls/adj/mpi/ |
| H A D | mpiadj.c | 796 PetscInt M, N, *II, *J, NZ, nz, m, nzstart, i; in MatMPIAdjToSeq_MPIAdj() local
821 PetscCallMPI(MPI_Scan(&nz, &nzstart, 1, MPIU_INT, MPI_SUM, PetscObjectComm((PetscObject)A))); in MatMPIAdjToSeq_MPIAdj()
822 nzstart -= nz; in MatMPIAdjToSeq_MPIAdj()
824 for (i = 0; i < m; i++) adj->i[i] += nzstart; in MatMPIAdjToSeq_MPIAdj()
835 for (i = 0; i < m; i++) adj->i[i] -= nzstart; in MatMPIAdjToSeq_MPIAdj()
842 PetscInt M, N, *II, *J, NZ, nz, m, nzstart, i; in MatMPIAdjToSeqRankZero_MPIAdj() local
873 PetscCallMPI(MPI_Scan(&nz, &nzstart, 1, MPIU_INT, MPI_SUM, PetscObjectComm((PetscObject)A))); in MatMPIAdjToSeqRankZero_MPIAdj()
874 nzstart -= nz; in MatMPIAdjToSeqRankZero_MPIAdj()
876 for (i = 0; i < m; i++) adj->i[i] += nzstart; in MatMPIAdjToSeqRankZero_MPIAdj()
892 for (i = 0; i < m; i++) adj->i[i] -= nzstart; in MatMPIAdjToSeqRankZero_MPIAdj()
|