Lines Matching refs:PetscCallA

28   PetscCallA(PetscInitialize(ierr))
37   PetscCallA(PetscOptionsGetInt(PETSC_NULL_OPTIONS, PETSC_NULL_CHARACTER, '-n', n, flg, ierr))
47   PetscCallA(MatCreate(PETSC_COMM_WORLD, A, ierr))
48   PetscCallA(MatSetSizes(A, PETSC_DECIDE, PETSC_DECIDE, n, n, ierr))
49   PetscCallA(MatSetFromOptions(A, ierr))
50   PetscCallA(MatSetUp(A, ierr))
63     PetscCallA(MatSetValues(A, i1, [i], i3, col, value, INSERT_VALUES, ierr))
68   PetscCallA(MatSetValues(A, i1, [i], i2, col, value, INSERT_VALUES, ierr))
74   PetscCallA(MatSetValues(A, i1, [i], i2, col, value, INSERT_VALUES, ierr))
75   PetscCallA(MatAssemblyBegin(A, MAT_FINAL_ASSEMBLY, ierr))
76   PetscCallA(MatAssemblyEnd(A, MAT_FINAL_ASSEMBLY, ierr))
81   PetscCallA(VecCreate(PETSC_COMM_WORLD, x, ierr))
82   PetscCallA(VecSetSizes(x, PETSC_DECIDE, n, ierr))
83   PetscCallA(VecSetFromOptions(x, ierr))
84   PetscCallA(VecDuplicate(x, b, ierr))
85   PetscCallA(VecDuplicate(x, u, ierr))
89   PetscCallA(VecSet(u, one, ierr))
90   PetscCallA(MatMult(A, u, b, ierr))
98   PetscCallA(KSPCreate(PETSC_COMM_WORLD, ksp, ierr))
103   PetscCallA(KSPSetOperators(ksp, A, A, ierr))
113   PetscCallA(KSPGetPC(ksp, pc, ierr))
114   PetscCallA(PCSetType(pc, PCFIELDSPLIT, ierr))
117   PetscCallA(ISCreateStride(PETSC_COMM_SELF, n, izero, ione, isin, ierr))
118   PetscCallA(PCFieldSplitSetIS(pc, 'splitname', isin, ierr))
119   PetscCallA(PCFieldSplitGetIS(pc, 'splitname', isout, ierr))
128   PetscCallA(KSPSetFromOptions(ksp, ierr))
133   PetscCallA(PCSetUp(pc, ierr))
134   PetscCallA(PCFieldSplitGetSubKSP(pc, nksp, subksp, ierr))
136   PetscCallA(KSPView(subksp(1), PETSC_VIEWER_STDOUT_WORLD, ierr))
137   PetscCallA(PCFieldSplitRestoreSubKSP(pc, nksp, subksp, ierr))
139   PetscCallA(KSPSolve(ksp, b, x, ierr))
143   PetscCallA(KSPView(ksp, PETSC_VIEWER_STDOUT_WORLD, ierr))
151   PetscCallA(VecAXPY(x, none, u, ierr))
152   PetscCallA(VecNorm(x, NORM_2, norm, ierr))
153   PetscCallA(KSPGetIterationNumber(ksp, its, ierr))
165   PetscCallA(ISDestroy(isin, ierr))
166   PetscCallA(VecDestroy(x, ierr))
167   PetscCallA(VecDestroy(u, ierr))
168   PetscCallA(VecDestroy(b, ierr))
169   PetscCallA(MatDestroy(A, ierr))
170   PetscCallA(KSPDestroy(ksp, ierr))
171   PetscCallA(PetscFinalize(ierr))