Lines Matching refs:nrow
37 PetscInt *perm, nrow, ncol, nnz, liw, *iw, ldw; in MatGetOrdering_WBM() local
44 PetscCall(MatGetRowIJ(mat, 1, PETSC_TRUE, PETSC_TRUE, &nrow, &ia, &ja, &done)); in MatGetOrdering_WBM()
45 ncol = nrow; in MatGetOrdering_WBM()
46 nnz = ia[nrow]; in MatGetOrdering_WBM()
51 liw = 4 * nrow + ncol; in MatGetOrdering_WBM()
55 liw = 2 * nrow + 2 * ncol; in MatGetOrdering_WBM()
59 liw = 8 * nrow + 2 * ncol + nnz; in MatGetOrdering_WBM()
63 liw = 3 * nrow + 2 * ncol; in MatGetOrdering_WBM()
67 liw = 3 * nrow + 2 * ncol; in MatGetOrdering_WBM()
68 ldw = nrow + 2 * ncol + nnz; in MatGetOrdering_WBM()
72 PetscCall(PetscMalloc3(liw, &iw, ldw, &dw, nrow, &perm)); in MatGetOrdering_WBM()
79 …PetscCallExternal(mc64ad_dist, &job, &nrow, &nnz, ia, ja, a, &num, perm, &liw, iw, &ldw, dw, icntl… in MatGetOrdering_WBM()
81 for (i = 0; i < nrow; ++i) perm[i]--; in MatGetOrdering_WBM()
83 PetscCall(ISCreateStride(PETSC_COMM_SELF, nrow, 0, 1, row)); in MatGetOrdering_WBM()
84 PetscCall(ISCreateGeneral(PETSC_COMM_SELF, nrow, perm, PETSC_COPY_VALUES, col)); in MatGetOrdering_WBM()