X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2Ftests%2Fclear.ma;h=5aaf6c0d60f204055e10f275201108af4166fcc6;hb=2b7403dcc161d1cbf6bacd62f0868d0bc67c0fda;hp=71457ae2c295e980bf85673bc3b25b8fefa07a57;hpb=650e3b3c9ff0b9cafb76a0edf8139a53446937ba;p=helm.git diff --git a/helm/matita/tests/clear.ma b/helm/matita/tests/clear.ma index 71457ae2c..5aaf6c0d6 100644 --- a/helm/matita/tests/clear.ma +++ b/helm/matita/tests/clear.ma @@ -13,7 +13,7 @@ (**************************************************************************) set "baseuri" "cic:/matita/tests/clear". -include "coq.ma". +include "legacy/coq.ma". alias num (instance 0) = "natural number". alias symbol "eq" (instance 0) = "Coq's leibnitz's equality". alias id "True" = "cic:/Coq/Init/Logic/True.ind#xpointer(1/1)". @@ -22,9 +22,9 @@ theorem stupid: \forall a: True. \forall b: 0 = 0. 0 = 0. -intros 1 [H] . +intros 1 (H). clear H. -intros 1 [H]. +intros 1 (H). exact H. qed.