+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.