7   Mat             A, F, B, X, C, Aher, G;  in main()  local
157   PetscCall(MatCreate(PETSC_COMM_WORLD, &G));  in main()
158   PetscCall(MatSetSizes(G, m, n, PETSC_DECIDE, PETSC_DECIDE));  in main()
159   PetscCall(MatSetType(G, MATELEMENTAL));  in main()
160   PetscCall(MatSetFromOptions(G));  in main()
161   PetscCall(MatSetUp(G));  in main()
162   PetscCall(MatAssemblyBegin(G, MAT_FINAL_ASSEMBLY));  in main()
163   PetscCall(MatAssemblyEnd(G, MAT_FINAL_ASSEMBLY));  in main()
164   PetscCall(MatCopy(Aher, G, SAME_NONZERO_PATTERN));  in main()
167   PetscCall(MatCholeskyFactor(G, 0, 0));  in main()
170     PetscCall(MatView(G, PETSC_VIEWER_STDOUT_WORLD));  in main()
174   PetscCall(MatSolve(G, b, x));  in main()
175   PetscCall(MatMatSolve(G, B, X));  in main()
176   PetscCall(MatDestroy(&G));  in main()
179   PetscCall(MatGetFactor(Aher, MATSOLVERELEMENTAL, MAT_FACTOR_CHOLESKY, &G));  in main()
180   PetscCall(MatCholeskyFactorSymbolic(G, Aher, 0, &finfo));  in main()
181   PetscCall(MatCholeskyFactorNumeric(G, Aher, &finfo));  in main()
182   if (mats_view) PetscCall(MatView(G, PETSC_VIEWER_STDOUT_WORLD));  in main()
183   PetscCall(MatSolve(G, b, x));  in main()
184   PetscCall(MatMatSolve(G, B, X));  in main()
185   PetscCall(MatDestroy(&G));  in main()