7   Mat          A, C, Bdense, Cdense;  in main()  local
86   PetscCall(MatCreate(PETSC_COMM_WORLD, &Cdense));  in main()
87   PetscCall(MatSetSizes(Cdense, n, PETSC_DECIDE, PETSC_DECIDE, BN));  in main()
88   PetscCall(MatSetType(Cdense, MATDENSE));  in main()
89   PetscCall(MatSetFromOptions(Cdense));  in main()
90   PetscCall(MatSetUp(Cdense));  in main()
91   PetscCall(MatAssemblyBegin(Cdense, MAT_FINAL_ASSEMBLY));  in main()
92   PetscCall(MatAssemblyEnd(Cdense, MAT_FINAL_ASSEMBLY));  in main()
105   PetscCall(MatDenseGetArray(Cdense, &Carray));  in main()
118   PetscCall(MatDenseRestoreArray(Cdense, &Carray));  in main()
121     PetscCall(MatView(Cdense, 0));  in main()
124   PetscCall(MatEqual(C, Cdense, &flg));  in main()
133   PetscCall(MatDestroy(&Cdense));  in main()