51 static PetscErrorCode CheckMatrices(Mat A, Mat B, Vec left, Vec right, Vec X, Vec Y, Vec X1, Vec Y1)  in CheckMatrices()  argument
81   PetscCall(VecCopy(X1, rtmp[0]));  in CheckMatrices()
82   PetscCall(VecCopy(X1, rtmp[1]));  in CheckMatrices()
87   PetscCall(MatMultTransposeAdd(A, Y, X1, rtmp[0]));  in CheckMatrices()
88   PetscCall(MatMultTransposeAdd(B, Y, X1, rtmp[1]));  in CheckMatrices()
100   Vec       left, right, X, Y, X1, Y1;  in main()  local
128   PetscCall(VecDuplicate(right, &X1));  in main()
138     PetscCall(VecSetRandom(X1, NULL));  in main()
145     PetscCall(VecSet(X1, 3.0));  in main()
148   PetscCall(CheckMatrices(Asub, Bsub, left, right, X, Y, X1, Y1));  in main()
159   PetscCall(VecDestroy(&X1));  in main()