X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=inline;f=helm%2Fmatita%2Ftests%2Ftest3.ma;h=08ca196829ec903829ee103ab3ec1bbb0380ac39;hb=9f8a383035b272c628c555b728e84caf9229cd57;hp=c4aafaf3c6f64390c0300878d645bae933c0ceb1;hpb=de9a83f286eee12117fb478ea2db18f7faebac9a;p=helm.git diff --git a/helm/matita/tests/test3.ma b/helm/matita/tests/test3.ma index c4aafaf3c..08ca19682 100644 --- a/helm/matita/tests/test3.ma +++ b/helm/matita/tests/test3.ma @@ -1,8 +1,16 @@ +set "baseuri" "cic:/matita/tests/". + alias symbol "eq" (instance 0) = "leibnitz's equality". theorem a:\forall x.x=x. alias id "nat" = "cic:/Coq/Init/Datatypes/nat.ind#xpointer(1/1)". -goal 5. exact nat. intro. reflexivity. -qed. \ No newline at end of file +qed. +alias num (instance 0) = "natural number". +alias symbol "times" (instance 0) = "natural times". + +theorem b:\forall p:nat. p * 0=0. +intro. +auto. +qed.