204   Mat          X, B, A, Bt, T, T2, PtAP = NULL, RARt = NULL, R = NULL;  in main()  local
346 …all(MatDenseGetSubMatrix(T4, PETSC_DECIDE, PETSC_DECIDE, PetscMin(1, K - 1), PetscMin(2, K), &T2));  in main()
348     PetscCall(MatAXPY(T, 1.0, T2, SAME_NONZERO_PATTERN));  in main()
356     PetscCall(MatDenseRestoreSubMatrix(T4, &T2));  in main()
367 … PetscCall(MatDenseGetSubMatrix(T4, N - 2, PETSC_DECIDE, PetscMin(1, K - 1), PetscMin(2, K), &T2));  in main()
369       PetscCall(MatAXPY(T, 1.0, T2, SAME_NONZERO_PATTERN));  in main()
377       PetscCall(MatDenseRestoreSubMatrix(T4, &T2));  in main()
387       PetscCall(MatDenseGetSubMatrix(T4, PETSC_DECIDE, 2, PetscMin(1, K - 1), PetscMin(2, K), &T2));  in main()
389       PetscCall(MatAXPY(T, 1.0, T2, SAME_NONZERO_PATTERN));  in main()
397       PetscCall(MatDenseRestoreSubMatrix(T4, &T2));  in main()
450       PetscCall(MatTransposeMatMult(B, T, MAT_INITIAL_MATRIX, PETSC_DETERMINE, &T2));  in main()
451       PetscCall(MatAXPY(T2, -1.0, PtAP, SAME_NONZERO_PATTERN));  in main()
452       PetscCall(MatView(T2, NULL));  in main()
453       PetscCall(MatDestroy(&T2));  in main()
466         PetscCall(MatMatMult(R, T, MAT_INITIAL_MATRIX, PETSC_DETERMINE, &T2));  in main()
467         PetscCall(MatAXPY(T2, -1.0, RARt, SAME_NONZERO_PATTERN));  in main()
468         PetscCall(MatView(T2, NULL));  in main()
469         PetscCall(MatDestroy(&T2));  in main()
478   PetscCall(MatDuplicate(T, MAT_DO_NOT_COPY_VALUES, &T2));  in main()
484     PetscCall(MatDenseGetColumnVecWrite(T2, k, &T2v));  in main()
489     PetscCall(MatDenseRestoreColumnVecWrite(T2, k, &T2v));  in main()
496   PetscCall(MatAXPY(T2, -1., X, SAME_NONZERO_PATTERN));  in main()
497   PetscCall(MatNorm(T2, NORM_FROBENIUS, &err));  in main()
500     PetscCall(MatView(T2, NULL));  in main()
503   PetscCall(MatDestroy(&T2));  in main()
507   PetscCall(MatConvert(T, MATSHELL, MAT_INITIAL_MATRIX, &T2));  in main()
512   PetscCall(MatScale(T2, 2.0));  in main()
516   PetscCall(MatCreateVecs(T2, &rs, &ls));  in main()
521     PetscCall(MatDiagonalScale(T2, rs, rs));  in main()
524     PetscCall(MatDiagonalScale(T2, ls, rs));  in main()
528   PetscCall(MatAXPY(T2, 4.5, T, DIFFERENT_NONZERO_PATTERN));  in main()
529   PetscCall(MatMultEqual(T2, A, 10, &flg));  in main()
531   PetscCall(MatMultTransposeEqual(T2, A, 10, &flg));  in main()
543 …PetscCall(MatShellSetMatProductOperation(T2, MATPRODUCT_AB, NULL, MyMatShellMatMultNumeric, NULL, …  in main()
544 …PetscCall(MatShellSetMatProductOperation(T2, MATPRODUCT_AB, NULL, MyMatShellMatMultNumeric, NULL, …  in main()
545 …PetscCall(MatShellSetMatProductOperation(T2, MATPRODUCT_AtB, NULL, MyMatTransposeShellMatMultNumer…  in main()
546 …PetscCall(MatShellSetMatProductOperation(T2, MATPRODUCT_AtB, NULL, MyMatTransposeShellMatMultNumer…  in main()
547 …PetscCall(MatShellSetMatProductOperation(T2, MATPRODUCT_ABt, NULL, MyMatShellMatTransposeMultNumer…  in main()
548 …PetscCall(MatShellSetMatProductOperation(T2, MATPRODUCT_ABt, NULL, MyMatShellMatTransposeMultNumer…  in main()
550 …PetscCall(MatShellSetMatProductOperation(T2, MATPRODUCT_PtAP, MyPtShellPMultSymbolic, MyPtShellPMu…  in main()
551 …PetscCall(MatShellSetMatProductOperation(T2, MATPRODUCT_PtAP, MyPtShellPMultSymbolic, MyPtShellPMu…  in main()
552 …PetscCall(MatShellSetMatProductOperation(T2, MATPRODUCT_RARt, MyRShellRtMultSymbolic, MyRShellRtMu…  in main()
553 …PetscCall(MatShellSetMatProductOperation(T2, MATPRODUCT_RARt, MyRShellRtMultSymbolic, MyRShellRtMu…  in main()
558   PetscCall(MatMatMult(T2, B, MAT_REUSE_MATRIX, PETSC_DETERMINE, &X));  in main()
560   PetscCall(MatMatMultEqual(T2, B, X, 10, &flg));  in main()
569     PetscCall(MatPtAPMultEqual(T2, B, PtAP, 10, &flg));  in main()
572       PetscCall(MatPtAP(T2, B, MAT_INITIAL_MATRIX, PETSC_DETERMINE, &T));  in main()
573       PetscCall(MatPtAP(T2, B, MAT_REUSE_MATRIX, PETSC_DETERMINE, &T));  in main()
574       PetscCall(MatPtAPMultEqual(T2, B, T, 10, &flg));  in main()
589       PetscCall(MatRARtMultEqual(T2, R, RARt, 10, &flg));  in main()
593       PetscCall(MatRARt(T2, R, MAT_INITIAL_MATRIX, PETSC_DETERMINE, &T));  in main()
594       PetscCall(MatRARt(T2, R, MAT_REUSE_MATRIX, PETSC_DETERMINE, &T));  in main()
595       PetscCall(MatRARtMultEqual(T2, R, T, 10, &flg));  in main()
614     PetscCall(MatTransposeMatMult(T2, X, MAT_REUSE_MATRIX, PETSC_DETERMINE, &B));  in main()
616     PetscCall(MatTransposeMatMultEqual(T2, X, B, 10, &flg));  in main()
626     PetscCall(MatMatTransposeMult(T2, Bt, MAT_REUSE_MATRIX, PETSC_DETERMINE, &X));  in main()
628     PetscCall(MatMatTransposeMultEqual(T2, Bt, X, 10, &flg));  in main()
637   PetscCall(MatDestroy(&T2));  in main()