7   Mat             A, F, B, X, C, Aher, G;  in main()  local
138   PetscCall(MatDuplicate(Aher, MAT_COPY_VALUES, &G));  in main()
141   PetscCall(MatCholeskyFactor(G, 0, 0));  in main()
144     PetscCall(MatView(G, PETSC_VIEWER_STDOUT_WORLD));  in main()
148   PetscCall(MatSolve(G, b, x));  in main()
149   PetscCall(MatMatSolve(G, B, X));  in main()
150   PetscCall(MatDestroy(&G));  in main()
153   PetscCall(MatGetFactor(Aher, MATSOLVERSCALAPACK, MAT_FACTOR_CHOLESKY, &G));  in main()
154   PetscCall(MatCholeskyFactorSymbolic(G, Aher, 0, NULL));  in main()
155   PetscCall(MatCholeskyFactorNumeric(G, Aher, NULL));  in main()
156   if (mats_view) PetscCall(MatView(G, PETSC_VIEWER_STDOUT_WORLD));  in main()
157   PetscCall(MatSolve(G, b, x));  in main()
158   PetscCall(MatMatSolve(G, B, X));  in main()
159   PetscCall(MatDestroy(&G));  in main()