X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fmatita%2Ftests%2Ftest3.ma;h=9a8958b2175360f26ab23ddadf7adad908725261;hb=57b43a967eaf3b0747350cd775d4301a53af2820;hp=c4aafaf3c6f64390c0300878d645bae933c0ceb1;hpb=de9a83f286eee12117fb478ea2db18f7faebac9a;p=helm.git diff --git a/helm/matita/tests/test3.ma b/helm/matita/tests/test3.ma index c4aafaf3c..9a8958b21 100644 --- a/helm/matita/tests/test3.ma +++ b/helm/matita/tests/test3.ma @@ -1,8 +1,16 @@ +set "baseuri" "cic:/matita/tests/test3/". + 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.