X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2Ftests%2Freplace.ma;h=d209e97d42f6fb6ea474d5dcfc8486a0943ecf01;hb=de0885961ff56f3d50bd365c6d38498036484ab8;hp=7117d5b8210b29f4b64d34628eba978f6999d96e;hpb=b27b5d3efc902b2bc1ffddfb7b9dbd724741c661;p=helm.git

diff --git a/helm/matita/tests/replace.ma b/helm/matita/tests/replace.ma
index 7117d5b82..d209e97d4 100644
--- a/helm/matita/tests/replace.ma
+++ b/helm/matita/tests/replace.ma
@@ -17,3 +17,8 @@ theorem t: \forall x:nat. x * (x + 0) = (0 + x) * (x + x * 0).
  reflexivity.
  auto.
 qed.
+
+(* This test tests "replace in match t" where t contains some metavariables *)
+theorem t2: 2 + (3 * 4) = (5 + 5) + 2 * 2.
+ replace in match 5+? with 6 + 4; [reflexivity | reflexivity].
+qed.