X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Ftests%2Freplace.ma;h=37a5309784a983a56258338d814595d83e964a10;hb=b6afef7e73324824025a6d7f313129d55b72cfc6;hp=e9960a507de28d4ee7e3dcb344e2b2e373df12d4;hpb=2bd3b029f7f67d9c616b7756278573cc9e96510c;p=helm.git diff --git a/helm/software/matita/tests/replace.ma b/helm/software/matita/tests/replace.ma index e9960a507..37a530978 100644 --- a/helm/software/matita/tests/replace.ma +++ b/helm/software/matita/tests/replace.ma @@ -12,10 +12,10 @@ (* *) (**************************************************************************) -set "baseuri" "cic:/matita/tests/replace/". -include "legacy/coq.ma". + +include "coq.ma". alias id "nat" = "cic:/Coq/Init/Datatypes/nat.ind#xpointer(1/1)". -alias num (instance 0) = "natural number". +alias num (instance 0) = "Coq natural number". alias symbol "eq" (instance 0) = "Coq's leibnitz's equality". alias symbol "plus" (instance 0) = "Coq's natural plus". alias symbol "times" (instance 0) = "Coq's natural times". @@ -30,7 +30,7 @@ theorem t: \forall x:nat. x * (x + 0) = (0 + x) * (x + x * 0). rewrite < (plus_n_O x). reflexivity. reflexivity. - auto new. + autobatch library. qed. (* This test tests "replace in match t" where t contains some metavariables *)