Lines Matching refs:PetscCall
23 PetscCall(PetscInitialize(&argc, &argv, NULL, help)); in main()
30 PetscCall(MatCreate(PETSC_COMM_WORLD, &A)); in main()
31 PetscCall(VecCreate(PETSC_COMM_WORLD, &b)); in main()
33 PetscCall(PetscInfo(A, "Mat info on PETSC_COMM_WORLD with no arguments\n")); in main()
34 …PetscCall(PetscInfo(A, "Mat info on PETSC_COMM_WORLD with 1 argument equal to 1234: %" PetscInt_FM… in main()
35 PetscCall(PetscInfo(b, "Vec info on PETSC_COMM_WORLD with no arguments\n")); in main()
36 …PetscCall(PetscInfo(b, "Vec info on PETSC_COMM_WORLD with 1 argument equal to 1234: %" PetscInt_FM… in main()
37 PetscCall(PetscInfo(NULL, "Sys info on PETSC_COMM_WORLD with no arguments\n")); in main()
38 …PetscCall(PetscInfo(NULL, "Sys info on PETSC_COMM_WORLD with 1 argument equal to 1234: %" PetscInt… in main()
40 PetscCall(MatCreate(PETSC_COMM_SELF, &Aself)); in main()
41 PetscCall(VecCreate(PETSC_COMM_SELF, &bself)); in main()
43 PetscCall(PetscInfo(Aself, "Mat info on PETSC_COMM_SELF with no arguments\n")); in main()
44 …PetscCall(PetscInfo(Aself, "Mat info on PETSC_COMM_SELF with 1 argument equal to 1234: %" PetscInt… in main()
45 PetscCall(PetscInfo(bself, "Vec info on PETSC_COMM_SELF with no arguments\n")); in main()
46 …PetscCall(PetscInfo(bself, "Vec info on PETSC_COMM_SELF with 1 argument equal to 1234: %" PetscInt… in main()
47 PetscCall(PetscInfo(NULL, "Sys info on PETSC_COMM_SELF with no arguments\n")); in main()
48 …PetscCall(PetscInfo(NULL, "Sys info on PETSC_COMM_SELF with 1 argument equal to 1234: %" PetscInt_… in main()
50 PetscCall(MatDestroy(&Aself)); in main()
51 PetscCall(VecDestroy(&bself)); in main()
55 PetscCall(PetscObjectGetClassId((PetscObject)A, &testMatClassid)); in main()
56 PetscCall(PetscObjectGetClassId((PetscObject)b, &testVecClassid)); in main()
59 PetscCall(PetscObjectGetClassName((PetscObject)A, &testMatClassname)); in main()
60 PetscCall(PetscObjectGetClassName((PetscObject)b, &testVecClassname)); in main()
65 PetscCall(PetscInfoEnabled(testMatClassid, &isEnabled)); in main()
66 if (isEnabled) PetscCall(PetscInfo(A, "Mat info is enabled\n")); in main()
67 PetscCall(PetscInfoEnabled(testVecClassid, &isEnabled)); in main()
68 if (isEnabled) PetscCall(PetscInfo(b, "Vec info is enabled\n")); in main()
69 PetscCall(PetscInfoEnabled(testSysClassid, &isEnabled)); in main()
70 if (isEnabled) PetscCall(PetscInfo(NULL, "Sys info is enabled\n")); in main()
73 PetscCall(PetscInfoGetFile(&filename, &infoFile)); in main()
79 PetscCall(PetscInfoDestroy()); in main()
85 PetscCall(PetscInfoEnabled(testMatClassid, &isEnabled)); in main()
86 if (isEnabled) PetscCall(PetscInfo(A, "Mat info is enabled after PetscInfoDestroy\n")); in main()
87 PetscCall(PetscInfoEnabled(testVecClassid, &isEnabled)); in main()
88 if (isEnabled) PetscCall(PetscInfo(b, "Vec info is enabled after PetscInfoDestroy\n")); in main()
89 PetscCall(PetscInfoEnabled(testSysClassid, &isEnabled)); in main()
90 if (isEnabled) PetscCall(PetscInfo(NULL, "Sys info is enabled after PetscInfoDestroy\n")); in main()
98 PetscCall(PetscInfoAllow(PETSC_TRUE)); in main()
99 PetscCall(PetscInfoSetFile(filename, "a")); in main()
100 PetscCall(PetscInfoDeactivateClass(testMatClassid)); in main()
101 PetscCall(PetscInfoDeactivateClass(testVecClassid)); in main()
102 PetscCall(PetscInfoDeactivateClass(testSysClassid)); in main()
107 PetscCall(PetscInfoActivateClass(testMatClassid)); in main()
108 PetscCall(PetscInfo(A, "Mat info is enabled again through PetscInfoActivateClass\n")); in main()
109 PetscCall(PetscInfoDeactivateClass(testMatClassid)); in main()
110 PetscCall(PetscInfoActivateClass(testVecClassid)); in main()
111 PetscCall(PetscInfo(b, "Vec info is enabled again through PetscInfoActivateClass\n")); in main()
112 PetscCall(PetscInfoDeactivateClass(testVecClassid)); in main()
113 PetscCall(PetscInfoActivateClass(testSysClassid)); in main()
114 PetscCall(PetscInfo(NULL, "Sys info is enabled again through PetscInfoActivateClass\n")); in main()
115 PetscCall(PetscInfoDeactivateClass(testVecClassid)); in main()
120 PetscCall(PetscStrallocpy("mat,vec,sys", &testClassesStr)); in main()
121 PetscCall(PetscStrToArray((const char *)testClassesStr, ',', &numClasses, &testClassesStrArr)); in main()
122 PetscCall(PetscInfoSetClasses(invert, numClasses, (const char *const *)testClassesStrArr)); in main()
123 PetscCall(PetscInfoProcessClass(testMatClassname, 1, &testMatClassid)); in main()
124 PetscCall(PetscInfoProcessClass(testVecClassname, 1, &testVecClassid)); in main()
125 PetscCall(PetscInfoProcessClass("sys", 1, &testSysClassid)); in main()
127 PetscCall(PetscInfo(A, "Mat info is enabled again through PetscInfoSetClasses\n")); in main()
128 PetscCall(PetscInfo(b, "Vec info is enabled again through PetscInfoSetClasses\n")); in main()
129 PetscCall(PetscInfo(NULL, "Sys info is enabled again through PetscInfoSetClasses\n")); in main()
131 PetscCall(PetscStrToArrayDestroy(numClasses, testClassesStrArr)); in main()
132 PetscCall(PetscFree(testClassesStr)); in main()
139 PetscCall(PetscInfoDestroy()); in main()
140 PetscCall(PetscInfoAllow(PETSC_TRUE)); in main()
141 PetscCall(PetscInfoSetFile(filename, "a")); in main()
142 PetscCall(PetscStrallocpy("vec,sys", &testClassesStr)); in main()
143 PetscCall(PetscStrToArray((const char *)testClassesStr, ',', &numClasses, &testClassesStrArr)); in main()
145 PetscCall(PetscInfoSetClasses(invert, numClasses, (const char *const *)testClassesStrArr)); in main()
146 PetscCall(PetscInfoProcessClass(testMatClassname, 1, &testMatClassid)); in main()
147 PetscCall(PetscInfoProcessClass(testVecClassname, 1, &testVecClassid)); in main()
148 PetscCall(PetscInfoProcessClass("sys", 1, &testSysClassid)); in main()
153 PetscCall(PetscInfo(A, "Mat info is enabled again through inverted PetscInfoSetClasses\n")); in main()
154 PetscCall(PetscInfo(b, "Vec info is enabled again through PetscInfoSetClasses\n")); in main()
155 PetscCall(PetscInfo(NULL, "Sys info is enabled again through PetscInfoSetClasses\n")); in main()
157 PetscCall(PetscStrToArrayDestroy(numClasses, testClassesStrArr)); in main()
158 PetscCall(PetscFree(testClassesStr)); in main()
159 PetscCall(PetscFree(filename)); in main()
160 PetscCall(MatDestroy(&A)); in main()
161 PetscCall(VecDestroy(&b)); in main()
162 PetscCall(PetscFinalize()); in main()