32   Mat               A, B, C, D;  in main()  local
203   PetscCall(MatDuplicate(B, MAT_COPY_VALUES, &D));  in main()
204   PetscCall(MatSetOption(D, MAT_SYMMETRIC, symm));  in main()
205   PetscCall(MatMultEqual(B, D, 10, &flg));  in main()
208     PetscCall(MatMultTransposeEqual(B, D, 10, &flg));  in main()
211   PetscCall(MatDestroy(&D));  in main()
242     PetscCall(MatMatMult(B, C, nt ? MAT_REUSE_MATRIX : MAT_INITIAL_MATRIX, PETSC_DETERMINE, &D));  in main()
243     PetscCall(MatViewFromOptions(D, NULL, "-bc_view"));  in main()
244     PetscCall(PetscObjectBaseTypeCompareAny((PetscObject)D, &flg, MATSEQDENSE, MATMPIDENSE, ""));  in main()
247       PetscCall(MatCreateVecs(D, NULL, &v));  in main()
249         PetscCall(MatGetColumnVector(D, v, i));  in main()
261   PetscCall(MatDestroy(&D));  in main()
266 …scCall(MatTransposeMatMult(B, C, nt ? MAT_REUSE_MATRIX : MAT_INITIAL_MATRIX, PETSC_DETERMINE, &D));  in main()
267       PetscCall(MatViewFromOptions(D, NULL, "-btc_view"));  in main()
268       PetscCall(PetscObjectBaseTypeCompareAny((PetscObject)D, &flg, MATSEQDENSE, MATMPIDENSE, ""));  in main()
271         PetscCall(MatCreateVecs(D, NULL, &v));  in main()
273           PetscCall(MatGetColumnVector(D, v, i));  in main()
285     PetscCall(MatDestroy(&D));  in main()
290     PetscCall(MatDuplicate(B, MAT_COPY_VALUES, &D));  in main()
291     PetscCall(MatSetOption(D, MAT_SYMMETRIC, symm));  in main()
292     PetscCall(MatH2OpusOrthogonalize(D));  in main()
293     PetscCall(MatMultEqual(B, D, 10, &flg));  in main()
295     PetscCall(MatDestroy(&D));  in main()
300     PetscCall(MatDuplicate(B, MAT_COPY_VALUES, &D));  in main()
301     PetscCall(MatSetOption(D, MAT_SYMMETRIC, symm));  in main()
302     PetscCall(MatH2OpusCompress(D, PETSC_SMALL));  in main()
303     PetscCall(MatDestroy(&D));  in main()
315     PetscCall(MatDuplicate(B, MAT_COPY_VALUES, &D));  in main()
316     PetscCall(MatCreateDense(PetscObjectComm((PetscObject)D), n, PETSC_DECIDE, N, nlr, Udata, &U));  in main()
318     PetscCall(MatCreateDense(PetscObjectComm((PetscObject)D), n, PETSC_DECIDE, N, nlr, Vdata, &V));  in main()
322     PetscCall(MatH2OpusLowRankUpdate(D, U, V, 0.5));  in main()
323     PetscCall(MatH2OpusLowRankUpdate(D, U, V, -0.5));  in main()
324     PetscCall(MatMultEqual(B, D, 10, &flg));  in main()
326     PetscCall(MatDestroy(&D));  in main()
337     PetscCall(MatComputeOperator(B, MATDENSE, &D));  in main()
338     PetscCall(MatDuplicate(D, MAT_COPY_VALUES, &Be));  in main()
339     PetscCall(MatNorm(D, NORM_FROBENIUS, &nB));  in main()
340     PetscCall(MatViewFromOptions(D, NULL, "-expl_view"));  in main()
341     PetscCall(MatAXPY(D, -1.0, A, SAME_NONZERO_PATTERN));  in main()
342     PetscCall(MatViewFromOptions(D, NULL, "-diff_view"));  in main()
343     PetscCall(MatNorm(D, NORM_FROBENIUS, &nD));  in main()
346     PetscCall(MatDestroy(&D));  in main()
350       PetscCall(MatComputeOperatorTranspose(B, MATDENSE, &D));  in main()
351       PetscCall(MatDuplicate(D, MAT_COPY_VALUES, &Bet));  in main()
352       PetscCall(MatNorm(D, NORM_FROBENIUS, &nB));  in main()
353       PetscCall(MatViewFromOptions(D, NULL, "-expl_trans_view"));  in main()
354       PetscCall(MatAXPY(D, -1.0, A, SAME_NONZERO_PATTERN));  in main()
355       PetscCall(MatViewFromOptions(D, NULL, "-diff_trans_view"));  in main()
356       PetscCall(MatNorm(D, NORM_FROBENIUS, &nD));  in main()
359       PetscCall(MatDestroy(&D));  in main()