7   Mat             A, F, B, X, C, Aher, G;  in main()  local
132   PetscCall(MatHermitianTranspose(A, MAT_INITIAL_MATRIX, &Aher));  in main()
133   PetscCall(MatAXPY(Aher, 1.0, A, SAME_NONZERO_PATTERN)); /* Aher = A + A^T */  in main()
139     PetscCall(MatGetSize(Aher, &M, &N));  in main()
142       PetscCall(MatSetValues(Aher, 1, &i, 1, &i, &rval, ADD_VALUES));  in main()
145   PetscCall(MatAssemblyBegin(Aher, MAT_FINAL_ASSEMBLY));  in main()
146   PetscCall(MatAssemblyEnd(Aher, MAT_FINAL_ASSEMBLY));  in main()
149     PetscCall(MatView(Aher, PETSC_VIEWER_STDOUT_WORLD));  in main()
164   PetscCall(MatCopy(Aher, G, SAME_NONZERO_PATTERN));  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()
191   PetscCall(MatMult(Aher, x, c));  in main()
197   PetscCall(MatMatMult(Aher, X, MAT_INITIAL_MATRIX, PETSC_DETERMINE, &C));  in main()
257   PetscCall(MatDestroy(&Aher));  in main()