]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/matita/tests/test3.ma
ocaml 3.09 transition
[helm.git] / helm / matita / tests / test3.ma
index 6b05351e6526825e09c83d9befa40dcbd03d89b1..98dc65c9579c43ee0b22478e5a76e09662665708 100644 (file)
@@ -18,9 +18,9 @@ include "coq.ma".
 alias symbol "eq" (instance 0) = "Coq's leibnitz's equality".
 theorem a:\forall x.x=x.
 alias id "nat" = "cic:/Coq/Init/Datatypes/nat.ind#xpointer(1/1)".
-exact nat.
-intro.
-reflexivity.
+exact nat.
+| intro. reflexivity.
+]
 qed.
 alias num (instance 0) = "natural number".
 alias symbol "times" (instance 0) = "Coq's natural times".