51 static PetscErrorCode CheckMatrices(Mat A, Mat B, Vec left, Vec right, Vec X, Vec Y, Vec X1, Vec Y1)  in CheckMatrices()  argument
83   PetscCall(VecCopy(X1, rtmp[0]));  in CheckMatrices()
84   PetscCall(VecCopy(X1, rtmp[1]));  in CheckMatrices()
89   PetscCall(MatMultTransposeAdd(A, Y, X1, rtmp[0]));  in CheckMatrices()
90   PetscCall(MatMultTransposeAdd(B, Y, X1, rtmp[1]));  in CheckMatrices()
102   Vec       left, right, X, Y, X1, Y1;  in main()  local
129   PetscCall(VecDuplicate(right, &X1));  in main()
139     PetscCall(VecSetRandom(X1, NULL));  in main()
146     PetscCall(VecSet(X1, 3.0));  in main()
149   PetscCall(CheckMatrices(Asub, Bsub, left, right, X, Y, X1, Y1));  in main()
160   PetscCall(VecDestroy(&X1));  in main()