xref: /petsc/src/mat/tests/ex227.c (revision 9566063d113dddea24716c546802770db7481bc0)
1c4762a1bSJed Brown static char help[] = "Test MatNullSpaceTest() with options prefixes.\n\n";
2c4762a1bSJed Brown 
3c4762a1bSJed Brown #include <petscmat.h>
4c4762a1bSJed Brown 
5c4762a1bSJed Brown int main(int argc, char **argv)
6c4762a1bSJed Brown {
7c4762a1bSJed Brown   Mat mat;
8c4762a1bSJed Brown   MatNullSpace nsp;
9c4762a1bSJed Brown   PetscBool prefix = PETSC_FALSE, flg;
10c4762a1bSJed Brown   PetscInt zero = 0;
11c4762a1bSJed Brown   PetscScalar value = 0;
12*9566063dSJacob Faibussowitsch   PetscCall(PetscInitialize(&argc, &argv, NULL, help));
13c4762a1bSJed Brown 
14*9566063dSJacob Faibussowitsch   PetscCall(PetscOptionsGetBool(NULL, NULL, "-with_prefix",&prefix,NULL));
15*9566063dSJacob Faibussowitsch   PetscCall(MatCreateDense(PETSC_COMM_WORLD, 1, 1, 1, 1, NULL, &mat));
16*9566063dSJacob Faibussowitsch   PetscCall(MatSetOptionsPrefix(mat, prefix ? "prefix_" : NULL));
17*9566063dSJacob Faibussowitsch   PetscCall(MatSetUp(mat));
18*9566063dSJacob Faibussowitsch   PetscCall(MatSetValues(mat, 1, &zero, 1, &zero, &value, INSERT_VALUES));
19*9566063dSJacob Faibussowitsch   PetscCall(MatAssemblyBegin(mat, MAT_FINAL_ASSEMBLY));
20*9566063dSJacob Faibussowitsch   PetscCall(MatAssemblyEnd(mat, MAT_FINAL_ASSEMBLY));
21*9566063dSJacob Faibussowitsch   PetscCall(MatNullSpaceCreate(PETSC_COMM_WORLD, PETSC_TRUE, 0, NULL, &nsp));
22*9566063dSJacob Faibussowitsch   PetscCall(MatNullSpaceTest(nsp, mat, &flg));
2328b400f6SJacob Faibussowitsch   PetscCheck(flg,PETSC_COMM_WORLD,PETSC_ERR_PLIB,"Null space test failed!");
24*9566063dSJacob Faibussowitsch   PetscCall(MatNullSpaceDestroy(&nsp));
25*9566063dSJacob Faibussowitsch   PetscCall(MatDestroy(&mat));
26*9566063dSJacob Faibussowitsch   PetscCall(PetscFinalize());
27b122ec5aSJacob Faibussowitsch   return 0;
28c4762a1bSJed Brown }
29c4762a1bSJed Brown 
30c4762a1bSJed Brown /*TEST
31c4762a1bSJed Brown 
32c4762a1bSJed Brown    test:
33c4762a1bSJed Brown        suffix: no_prefix
34c4762a1bSJed Brown        output_file: output/ex227_no_prefix.out
35c4762a1bSJed Brown        args: -mat_null_space_test_view -mat_view
36c4762a1bSJed Brown 
37c4762a1bSJed Brown    test:
38c4762a1bSJed Brown        suffix: prefix
39c4762a1bSJed Brown        output_file: output/ex227_prefix.out
40c4762a1bSJed Brown        args: -prefix_mat_null_space_test_view -with_prefix -prefix_mat_view
41c4762a1bSJed Brown 
42c4762a1bSJed Brown TEST*/
43