| Line 203... |
Line 203... |
ierr = PetscFree(M);CHKERRQ(ierr);
|
ierr = PetscFree(M);CHKERRQ(ierr);
|
|
|
/* convert matrix to MatSeqDense */
|
/* convert matrix to MatSeqDense */
|
ierr = PetscTypeCompare((PetscObject)*newmat,MATSEQDENSE,&flg); CHKERRQ(ierr);
|
ierr = PetscTypeCompare((PetscObject)*newmat,MATSEQDENSE,&flg); CHKERRQ(ierr);
|
if (!flg) {
|
if (!flg) {
|
ierr = MatConvert(*newmat,MATSEQDENSE,newmat);CHKERRQ(ierr);
|
ierr = MatConvert(*newmat,MATSEQDENSE,MAT_INITIAL_MATRIX,newmat);CHKERRQ(ierr);
|
}
|
}
|
} else {
|
} else {
|
/* convert matrix to MatSeqDense */
|
/* convert matrix to MatSeqDense */
|
ierr = MatConvert(mat,MATSEQDENSE,newmat);CHKERRQ(ierr);
|
ierr = MatConvert(mat,MATSEQDENSE,MAT_INITIAL_MATRIX,newmat);CHKERRQ(ierr);
|
}
|
}
|
|
|
PetscFunctionReturn(0);
|
PetscFunctionReturn(0);
|
}
|
}
|
|
|