X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2Ftests%2Fcut.ma;h=3e5605a10464ec32a86f56ed8a699b530e983092;hb=4167cea65ca58897d1a3dbb81ff95de5074700cc;hp=f5850e576589a664c81742d11c15df68b063e753;hpb=cec61c8b027b15b98d308cee8900d9cf35a02d28;p=helm.git diff --git a/helm/matita/tests/cut.ma b/helm/matita/tests/cut.ma index f5850e576..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) = "Coq's leibnitz's equality". theorem stupid: 3 = 3. - cut 3 = 3. + cut (3 = 3). assumption. reflexivity. - qed. +qed.