X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2Ftests%2Freplace.ma;h=2b174af6478ff4917ac71137a11cc104af6c5d8b;hb=be5869cd0bbe16c8a67827723c97d2d4fce4c0bc;hp=8504b6c160c78eb5298c5d276fa3cc80b2109933;hpb=fb94e5a71be508516514dfe50528ccfb3cd2da91;p=helm.git diff --git a/helm/matita/tests/replace.ma b/helm/matita/tests/replace.ma index 8504b6c16..2b174af64 100644 --- a/helm/matita/tests/replace.ma +++ b/helm/matita/tests/replace.ma @@ -13,7 +13,7 @@ (**************************************************************************) set "baseuri" "cic:/matita/tests/replace/". -include "coq.ma". +include "legacy/coq.ma". alias id "nat" = "cic:/Coq/Init/Datatypes/nat.ind#xpointer(1/1)". alias num (instance 0) = "natural number". alias symbol "eq" (instance 0) = "Coq's leibnitz's equality". @@ -35,5 +35,5 @@ 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]. + replace in match (5+?) with (6 + 4); [reflexivity | reflexivity]. qed.