X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2Ftests%2Fchange.ma;h=b2ae3b7a05cbfaf44784daa4c027a71316fa208b;hb=771ee8b9d122fa963881c876e86f90531bb7434f;hp=4e26d4439610643ff8781e62b2f3231a7531c721;hpb=47815ea29fe1375cc7497c16b6778ccdbe576537;p=helm.git diff --git a/helm/matita/tests/change.ma b/helm/matita/tests/change.ma index 4e26d4439..b2ae3b7a0 100644 --- a/helm/matita/tests/change.ma +++ b/helm/matita/tests/change.ma @@ -13,7 +13,7 @@ (**************************************************************************) set "baseuri" "cic:/matita/tests/change/". -include "coq.ma". +include "legacy/coq.ma". alias num (instance 0) = "natural number". alias symbol "eq" (instance 0) = "Coq's leibnitz's equality". alias symbol "plus" (instance 0) = "Coq's natural plus". @@ -33,8 +33,8 @@ qed. alias id "True" = "cic:/Coq/Init/Logic/True.ind#xpointer(1/1)". theorem t: (\forall x:nat. x=x) \to True. intro H. - change in match x in H : \forall _.% with 0+x. - change in H: \forall _.(? ? ? (? % ?)) with 0. + change in match x in H : (\forall _.%) with (0+x). + change in H: (\forall _.(? ? ? (? % ?))) with 0. constructor 1. qed.