7   Mat         mat, tmat = 0;  in main()  local
34   PetscCall(MatCreate(PETSC_COMM_WORLD, &mat));  in main()
35   PetscCall(MatSetSizes(mat, PETSC_DECIDE, PETSC_DECIDE, m, n));  in main()
36   PetscCall(MatSetFromOptions(mat));  in main()
37   PetscCall(MatSetUp(mat));  in main()
38   PetscCall(MatGetOwnershipRange(mat, &rstart, &rend));  in main()
42       PetscCall(MatSetValues(mat, 1, &i, 1, &j, &v, INSERT_VALUES));  in main()
45   PetscCall(MatAssemblyBegin(mat, MAT_FINAL_ASSEMBLY));  in main()
46   PetscCall(MatAssemblyEnd(mat, MAT_FINAL_ASSEMBLY));  in main()
49   PetscCall(MatGetInfo(mat, MAT_GLOBAL_SUM, &info));  in main()
51   PetscCall(MatNorm(mat, NORM_FROBENIUS, &normf));  in main()
52   PetscCall(MatNorm(mat, NORM_1, &norm1));  in main()
53   PetscCall(MatNorm(mat, NORM_INFINITY, &normi));  in main()
55   PetscCall(MatView(mat, PETSC_VIEWER_STDOUT_WORLD));  in main()
60     PetscCall(MatTranspose(mat, MAT_INPLACE_MATRIX, &mat)); /* in-place transpose */  in main()
61     tmat = mat;  in main()
62     mat  = 0;  in main()
64     PetscCall(MatTranspose(mat, MAT_INITIAL_MATRIX, &tmat));  in main()
77   if (mat && !rect) {  in main()
81     PetscCall(MatAXPY(tmat, alpha, mat, DIFFERENT_NONZERO_PATTERN));  in main()
87   if (mat) PetscCall(MatDestroy(&mat));  in main()