Searched refs:NewMat (Results 1 – 1 of 1) sorted by relevance
| /petsc/src/tao/matrix/ |
| H A D | adamat.c | 258 PETSC_INTERN PetscErrorCode MatConvert_ADA(Mat mat, MatType newtype, Mat *NewMat) in MatConvert_ADA() argument
274 PetscCall(MatDuplicate(mat, MAT_COPY_VALUES, NewMat)); in MatConvert_ADA()
283 PetscCall(MatCreateDense(PetscObjectComm((PetscObject)mat), m, m, N, N, NULL, NewMat)); in MatConvert_ADA()
284 PetscCall(MatGetOwnershipRange(*NewMat, &low, &high)); in MatConvert_ADA()
288 …for (j = 0; j < high - low; j++) PetscCall(MatSetValue(*NewMat, low + j, i, dptr[j], INSERT_VALUES… in MatConvert_ADA()
291 PetscCall(MatAssemblyBegin(*NewMat, MAT_FINAL_ASSEMBLY)); in MatConvert_ADA()
292 PetscCall(MatAssemblyEnd(*NewMat, MAT_FINAL_ASSEMBLY)); in MatConvert_ADA()
302 PetscCall(MatCreateSeqDense(PetscObjectComm((PetscObject)mat), N, N, NULL, NewMat)); in MatConvert_ADA()
303 PetscCall(MatGetOwnershipRange(*NewMat, &low, &high)); in MatConvert_ADA()
307 …for (j = 0; j < high - low; j++) PetscCall(MatSetValue(*NewMat, low + j, i, dptr[j], INSERT_VALUES… in MatConvert_ADA()
[all …]
|