xref: /petsc/src/mat/tests/ex164.c (revision 9566063d113dddea24716c546802770db7481bc0) 
1c4762a1bSJed Brown 
2c4762a1bSJed Brown static char help[] = "Tests MatConvert() from SeqDense to SeqAIJ \n\n";
3c4762a1bSJed Brown 
4c4762a1bSJed Brown #include <petscmat.h>
5c4762a1bSJed Brown 
6c4762a1bSJed Brown int main(int argc,char **args)
7c4762a1bSJed Brown {
8c4762a1bSJed Brown   Mat            A,C;
9c4762a1bSJed Brown   PetscInt       n = 10;
10c4762a1bSJed Brown 
11*9566063dSJacob Faibussowitsch   PetscCall(PetscInitialize(&argc,&args,(char*)0,help));
12*9566063dSJacob Faibussowitsch   PetscCall(MatCreateSeqDense(PETSC_COMM_WORLD,n,n,NULL,&A));
13*9566063dSJacob Faibussowitsch   PetscCall(MatConvert(A,MATSEQDENSE,MAT_INITIAL_MATRIX,&C));
14*9566063dSJacob Faibussowitsch   PetscCall(MatView(C,NULL));
15*9566063dSJacob Faibussowitsch   PetscCall(MatDestroy(&A));
16*9566063dSJacob Faibussowitsch   PetscCall(MatDestroy(&C));
17*9566063dSJacob Faibussowitsch   PetscCall(PetscFinalize());
18b122ec5aSJacob Faibussowitsch   return 0;
19c4762a1bSJed Brown }
20c4762a1bSJed Brown 
21c4762a1bSJed Brown /*TEST
22c4762a1bSJed Brown 
23c4762a1bSJed Brown    test:
24c4762a1bSJed Brown 
25c4762a1bSJed Brown TEST*/
26