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