Lines Matching refs:M
12 Mat M; in MatConvert_MPIAIJ_MPISBAIJ() local
26 PetscCall(MatCreate(PetscObjectComm((PetscObject)A), &M)); in MatConvert_MPIAIJ_MPISBAIJ()
27 PetscCall(MatSetSizes(M, lm, ln, m, n)); in MatConvert_MPIAIJ_MPISBAIJ()
28 PetscCall(MatSetType(M, MATMPISBAIJ)); in MatConvert_MPIAIJ_MPISBAIJ()
29 PetscCall(MatSeqSBAIJSetPreallocation(M, bs, 0, d_nnz)); in MatConvert_MPIAIJ_MPISBAIJ()
30 PetscCall(MatMPISBAIJSetPreallocation(M, bs, 0, d_nnz, 0, o_nnz)); in MatConvert_MPIAIJ_MPISBAIJ()
38 } else M = *newmat; in MatConvert_MPIAIJ_MPISBAIJ()
43 PetscCall(MatConvert_Basic(A, newtype, MAT_REUSE_MATRIX, &M)); in MatConvert_MPIAIJ_MPISBAIJ()
45 if (reuse == MAT_INPLACE_MATRIX) PetscCall(MatHeaderReplace(A, &M)); in MatConvert_MPIAIJ_MPISBAIJ()
46 else *newmat = M; in MatConvert_MPIAIJ_MPISBAIJ()
53 Mat M; in MatConvert_MPIBAIJ_MPISBAIJ() local
77 PetscCall(MatCreate(PetscObjectComm((PetscObject)A), &M)); in MatConvert_MPIBAIJ_MPISBAIJ()
78 PetscCall(MatSetSizes(M, lm, ln, m, n)); in MatConvert_MPIBAIJ_MPISBAIJ()
79 PetscCall(MatSetType(M, MATMPISBAIJ)); in MatConvert_MPIBAIJ_MPISBAIJ()
80 PetscCall(MatSeqSBAIJSetPreallocation(M, bs, 0, d_nnz)); in MatConvert_MPIBAIJ_MPISBAIJ()
81 PetscCall(MatMPISBAIJSetPreallocation(M, bs, 0, d_nnz, 0, o_nnz)); in MatConvert_MPIBAIJ_MPISBAIJ()
84 } else M = *newmat; in MatConvert_MPIBAIJ_MPISBAIJ()
87 PetscCall(MatSetOption(M, MAT_IGNORE_LOWER_TRIANGULAR, PETSC_TRUE)); in MatConvert_MPIBAIJ_MPISBAIJ()
90 PetscCall(MatSetValues(M, 1, &i, nz, cwork, vwork, INSERT_VALUES)); in MatConvert_MPIBAIJ_MPISBAIJ()
93 PetscCall(MatAssemblyBegin(M, MAT_FINAL_ASSEMBLY)); in MatConvert_MPIBAIJ_MPISBAIJ()
94 PetscCall(MatAssemblyEnd(M, MAT_FINAL_ASSEMBLY)); in MatConvert_MPIBAIJ_MPISBAIJ()
96 if (reuse == MAT_INPLACE_MATRIX) PetscCall(MatHeaderReplace(A, &M)); in MatConvert_MPIBAIJ_MPISBAIJ()
97 else *newmat = M; in MatConvert_MPIBAIJ_MPISBAIJ()