X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2Ftests%2Fcut.ma;h=3e5605a10464ec32a86f56ed8a699b530e983092;hb=4167cea65ca58897d1a3dbb81ff95de5074700cc;hp=82d36667b6d6daffa900f638eb3d856530a02cb5;hpb=9f7cb5462119ce44becf0bc9848d61690a048ac7;p=helm.git diff --git a/helm/matita/tests/cut.ma b/helm/matita/tests/cut.ma index 82d36667b..3e5605a10 100644 --- a/helm/matita/tests/cut.ma +++ b/helm/matita/tests/cut.ma @@ -1,5 +1,5 @@ (**************************************************************************) -(* ___ *) +(* ___ *) (* ||M|| *) (* ||A|| A project by Andrea Asperti *) (* ||T|| *) @@ -13,12 +13,13 @@ (**************************************************************************) set "baseuri" "cic:/matita/tests/cut". +include "coq.ma". alias num (instance 0) = "natural number". -alias symbol "eq" (instance 0) = "leibnitz's equality". +alias symbol "eq" (instance 0) = "Coq's leibnitz's equality". theorem stupid: 3 = 3. - cut 3 = 3. + cut (3 = 3). assumption. reflexivity. - qed. - \ No newline at end of file +qed. +