Lines Matching refs:PetscCall
12 PetscCall(PetscInitialize(&argc, &argv, NULL, help)); in main()
15 PetscCall(VecCreateSeq(comm, n, &a)); in main()
16 PetscCall(VecDuplicate(a, &b)); in main()
17 PetscCall(VecDuplicate(a, &c)); in main()
20 PetscCall(PetscRandomCreate(comm, &rand)); in main()
21 PetscCall(VecSetRandom(a, rand)); in main()
22 PetscCall(VecSetRandom(b, rand)); in main()
24 PetscCall(VecDuplicate(a, &a2)); in main()
25 PetscCall(VecCopy(a, a2)); in main()
26 PetscCall(VecDuplicate(b, &b2)); in main()
27 PetscCall(VecCopy(b, b2)); in main()
28 PetscCall(VecDuplicate(c, &c2)); in main()
30 PetscCall(MatCreateDiagonal(a2, &A)); in main()
31 PetscCall(MatCreateDiagonal(b2, &B)); in main()
32 PetscCall(VecDestroy(&a2)); in main()
33 PetscCall(VecDestroy(&b2)); in main()
35 PetscCall(VecDuplicate(a, &a2)); in main()
36 PetscCall(VecDuplicate(b, &b2)); in main()
38 PetscCall(MatAXPY(A, 0.5, B, SAME_NONZERO_PATTERN)); in main()
39 PetscCall(VecAXPY(a, 0.5, b)); in main()
42 PetscCall(VecNorm(a, NORM_2, &vec_norm)); in main()
43 PetscCall(MatNorm(A, NORM_FROBENIUS, &mat_norm)); in main()
47 PetscCall(VecNorm(a, NORM_INFINITY, &vec_norm)); in main()
48 PetscCall(MatNorm(A, NORM_INFINITY, &mat_norm)); in main()
50 PetscCall(MatNorm(A, NORM_1, &mat_norm)); in main()
53 PetscCall(VecPointwiseMult(c, b, a)); in main()
54 PetscCall(MatMult(A, b, c2)); in main()
55 PetscCall(VecAXPY(c2, -1.0, c)); in main()
56 PetscCall(VecNorm(c2, NORM_INFINITY, &vec_norm)); in main()
59 PetscCall(VecPointwiseMult(c, b, a)); in main()
60 PetscCall(VecAXPY(c, 1.0, a)); in main()
61 PetscCall(MatMultAdd(A, b, a, c2)); in main()
62 PetscCall(VecAXPY(c2, -1.0, c)); in main()
63 PetscCall(VecNorm(c2, NORM_INFINITY, &vec_norm)); in main()
66 PetscCall(VecSet(c, 1.2)); in main()
67 PetscCall(VecSet(c2, 1.2)); in main()
68 PetscCall(VecPointwiseMult(c, b, a)); in main()
69 PetscCall(VecAXPY(c, 1.0, c2)); in main()
70 PetscCall(MatMultAdd(A, b, c2, c2)); in main()
71 PetscCall(VecAXPY(c2, -1.0, c)); in main()
72 PetscCall(VecNorm(c2, NORM_INFINITY, &vec_norm)); in main()
75 PetscCall(VecPointwiseDivide(c, b, a)); in main()
76 PetscCall(MatSolve(A, b, c2)); in main()
77 PetscCall(VecAXPY(c2, -1.0, c)); in main()
78 PetscCall(VecNorm(c2, NORM_INFINITY, &vec_norm)); in main()
82 PetscCall(MatDuplicate(A, MAT_DO_NOT_COPY_VALUES, &A_dup)); in main()
83 PetscCall(MatDestroy(&A_dup)); in main()
84 PetscCall(MatDuplicate(A, MAT_COPY_VALUES, &A_dup)); in main()
85 PetscCall(MatGetDiagonal(A_dup, a2)); in main()
86 PetscCall(VecAXPY(a2, -1.0, a)); in main()
87 PetscCall(VecNorm(a2, NORM_INFINITY, &vec_norm)); in main()
89 PetscCall(MatDestroy(&A_dup)); in main()
91 PetscCall(MatShift(A, 1.5)); in main()
92 PetscCall(VecShift(a, 1.5)); in main()
93 PetscCall(MatGetDiagonal(A, a2)); in main()
94 PetscCall(VecAXPY(a2, -1.0, a)); in main()
95 PetscCall(VecNorm(a2, NORM_INFINITY, &vec_norm)); in main()
98 PetscCall(MatScale(A, 0.75)); in main()
99 PetscCall(VecScale(a, 0.75)); in main()
100 PetscCall(MatGetDiagonal(A, a2)); in main()
101 PetscCall(VecAXPY(a2, -1.0, a)); in main()
102 PetscCall(VecNorm(a2, NORM_INFINITY, &vec_norm)); in main()
105 PetscCall(VecPointwiseMult(a, a, b)); in main()
106 PetscCall(MatDiagonalScale(A, b, NULL)); in main()
107 PetscCall(MatGetDiagonal(A, a2)); in main()
108 PetscCall(VecAXPY(a2, -1.0, a)); in main()
109 PetscCall(VecNorm(a2, NORM_INFINITY, &vec_norm)); in main()
112 PetscCall(VecPointwiseMult(a, a, b)); in main()
113 PetscCall(MatDiagonalScale(A, NULL, b)); in main()
114 PetscCall(MatGetDiagonal(A, a2)); in main()
115 PetscCall(VecAXPY(a2, -1.0, a)); in main()
116 PetscCall(VecNorm(a2, NORM_INFINITY, &vec_norm)); in main()
119 PetscCall(VecCopy(b, a)); in main()
120 PetscCall(MatDiagonalSet(A, b, INSERT_VALUES)); in main()
121 PetscCall(MatGetDiagonal(A, a2)); in main()
122 PetscCall(VecAXPY(a2, -1.0, a)); in main()
123 PetscCall(VecNorm(a2, NORM_INFINITY, &vec_norm)); in main()
126 PetscCall(VecSetRandom(a, rand)); in main()
127 PetscCall(VecSetRandom(b, rand)); in main()
128 PetscCall(MatDiagonalSet(A, a, INSERT_VALUES)); in main()
129 PetscCall(VecAXPY(a, 1.0, b)); in main()
130 PetscCall(MatDiagonalSet(A, b, ADD_VALUES)); in main()
131 PetscCall(MatGetDiagonal(A, a2)); in main()
132 PetscCall(VecAXPY(a2, -1.0, a)); in main()
133 PetscCall(VecNorm(a2, NORM_INFINITY, &vec_norm)); in main()
136 PetscCall(VecSetRandom(a, rand)); in main()
137 PetscCall(VecSetRandom(b, rand)); in main()
138 PetscCall(MatDiagonalSet(A, a, INSERT_VALUES)); in main()
139 PetscCall(VecPointwiseMax(a, a, b)); in main()
140 PetscCall(MatDiagonalSet(A, b, MAX_VALUES)); in main()
141 PetscCall(MatGetDiagonal(A, a2)); in main()
142 PetscCall(VecAXPY(a2, -1.0, a)); in main()
143 PetscCall(VecNorm(a2, NORM_INFINITY, &vec_norm)); in main()
146 PetscCall(VecSetRandom(a, rand)); in main()
147 PetscCall(VecSetRandom(b, rand)); in main()
148 PetscCall(MatDiagonalSet(A, a, INSERT_VALUES)); in main()
149 PetscCall(VecPointwiseMin(a, a, b)); in main()
150 PetscCall(MatDiagonalSet(A, b, MIN_VALUES)); in main()
151 PetscCall(MatGetDiagonal(A, a2)); in main()
152 PetscCall(VecAXPY(a2, -1.0, a)); in main()
153 PetscCall(VecNorm(a2, NORM_INFINITY, &vec_norm)); in main()
156 PetscCall(VecSetRandom(a, rand)); in main()
157 PetscCall(VecSetRandom(b, rand)); in main()
158 PetscCall(MatDiagonalSet(A, a, INSERT_VALUES)); in main()
159 PetscCall(MatDiagonalSet(A, b, NOT_SET_VALUES)); in main()
160 PetscCall(MatGetDiagonal(A, a2)); in main()
161 PetscCall(VecAXPY(a2, -1.0, a)); in main()
162 PetscCall(VecNorm(a2, NORM_INFINITY, &vec_norm)); in main()
165 PetscCall(VecSet(a2, 0.5)); in main()
168 PetscCall(PetscObjectStateGet((PetscObject)A, &state_pre)); in main()
169 PetscCall(MatDiagonalGetInverseDiagonal(A, &A_inv_diag)); in main()
170 PetscCall(MatDiagonalRestoreInverseDiagonal(A, &A_inv_diag)); in main()
171 PetscCall(PetscObjectStateGet((PetscObject)A, &state_post)); in main()
174 PetscCall(PetscObjectStateGet((PetscObject)A, &state_pre)); in main()
175 PetscCall(MatDiagonalGetInverseDiagonal(A, &A_inv_diag)); in main()
176 PetscCall(VecSet(A_inv_diag, 2.0)); in main()
177 PetscCall(MatDiagonalRestoreInverseDiagonal(A, &A_inv_diag)); in main()
178 PetscCall(PetscObjectStateGet((PetscObject)A, &state_post)); in main()
181 PetscCall(PetscObjectStateGet((PetscObject)A, &state_pre)); in main()
182 PetscCall(MatDiagonalGetDiagonal(A, &A_diag)); in main()
183 PetscCall(MatDiagonalRestoreDiagonal(A, &A_diag)); in main()
184 PetscCall(PetscObjectStateGet((PetscObject)A, &state_post)); in main()
187 PetscCall(MatDiagonalGetDiagonal(A, &A_diag)); in main()
188 PetscCall(VecAXPY(a2, -1.0, A_diag)); in main()
189 PetscCall(VecSet(A_diag, 1.0)); in main()
190 PetscCall(MatDiagonalRestoreDiagonal(A, &A_diag)); in main()
191 PetscCall(PetscObjectStateGet((PetscObject)A, &state_post)); in main()
194 PetscCall(VecNorm(a2, NORM_INFINITY, &vec_norm)); in main()
197 PetscCall(MatZeroEntries(A)); in main()
198 PetscCall(MatNorm(A, NORM_INFINITY, &mat_norm)); in main()
200 PetscCall(MatView(A, PETSC_VIEWER_STDOUT_SELF)); in main()
201 PetscCall(PetscViewerPushFormat(PETSC_VIEWER_STDOUT_SELF, PETSC_VIEWER_ASCII_INFO)); in main()
202 PetscCall(MatView(A, PETSC_VIEWER_STDOUT_SELF)); in main()
203 PetscCall(PetscViewerPopFormat(PETSC_VIEWER_STDOUT_SELF)); in main()
205 PetscCall(MatDestroy(&A)); in main()
206 PetscCall(MatDestroy(&B)); in main()
208 PetscCall(PetscRandomDestroy(&rand)); in main()
209 PetscCall(VecDestroy(&c2)); in main()
210 PetscCall(VecDestroy(&b2)); in main()
211 PetscCall(VecDestroy(&a2)); in main()
212 PetscCall(VecDestroy(&c)); in main()
213 PetscCall(VecDestroy(&b)); in main()
214 PetscCall(VecDestroy(&a)); in main()
215 PetscCall(PetscFinalize()); in main()