13 static PetscErrorCode CheckValuesAIJ(Mat A)  in CheckValuesAIJ()  argument
20   PetscCall(MatGetSize(A, &M, &N));  in CheckValuesAIJ()
21   PetscCall(MatGetOwnershipRange(A, &rstart, &rend));  in CheckValuesAIJ()
24       PetscCall(MatGetValue(A, i, j, &val));  in CheckValuesAIJ()
35   Mat         A;  in main()  local
45 …J(PETSC_COMM_WORLD, PETSC_DECIDE, PETSC_DECIDE, M, N, PETSC_DECIDE, NULL, PETSC_DECIDE, NULL, &A));  in main()
50   PetscCall(MatGetOwnershipRange(A, &rstart, &rend));  in main()
54       if (PetscAbsReal(v) > 0) PetscCall(MatSetValue(A, i, j, v, INSERT_VALUES));  in main()
57   PetscCall(MatAssemblyBegin(A, MAT_FINAL_ASSEMBLY));  in main()
58   PetscCall(MatAssemblyEnd(A, MAT_FINAL_ASSEMBLY));  in main()
59   PetscCall(MatViewFromOptions(A, NULL, "-mat_base_view"));  in main()
65   for (i = 0; i < 3; i++) PetscCall(MatView(A, view));  in main()
67   PetscCall(MatDestroy(&A));  in main()
73   PetscCall(MatCreate(PETSC_COMM_WORLD, &A));  in main()
74   PetscCall(MatSetType(A, MATAIJ));  in main()
76     if (i > 0) PetscCall(MatZeroEntries(A));  in main()
77     PetscCall(MatLoad(A, view));  in main()
78     PetscCall(CheckValuesAIJ(A));  in main()
81   PetscCall(MatViewFromOptions(A, NULL, "-mat_load_view"));  in main()
82   PetscCall(MatDestroy(&A));  in main()
88   PetscCall(MatCreate(PETSC_COMM_SELF, &A));  in main()
89   PetscCall(MatSetType(A, MATSEQAIJ));  in main()
91     if (i > 0) PetscCall(MatZeroEntries(A));  in main()
92     PetscCall(MatLoad(A, view));  in main()
93     PetscCall(CheckValuesAIJ(A));  in main()
96   PetscCall(MatDestroy(&A));  in main()
102   PetscCall(MatCreate(PETSC_COMM_WORLD, &A));  in main()
103   PetscCall(MatSetType(A, MATMPIAIJ));  in main()
105     if (i > 0) PetscCall(MatZeroEntries(A));  in main()
106     PetscCall(MatLoad(A, view));  in main()
107     PetscCall(CheckValuesAIJ(A));  in main()
110   PetscCall(MatDestroy(&A));  in main()