]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/gTopLevel/tests/lambda01.cic.test
ocaml 3.09 transition
[helm.git] / helm / gTopLevel / tests / lambda01.cic.test
index f05fb40db9fc85c2aba72ce1444a6d7f8767bcb9..6140de0b172be943097ccc687a20f1dbb6d5a1df 100644 (file)
@@ -1,5 +1,11 @@
 (\lambda f. (f 0 (le_n 0))
-  \lambda n. \lambda H. (refl_equal nat 0)))
+  \lambda n. \lambda H. (refl_equal nat 0))
+###### INTERPRETATION NUMBER 1 ######
+### (* disambiguation environment  *)
+alias id le_n = cic:/Coq/Init/Peano/le.ind#xpointer(1/1/1)
+alias id nat = cic:/Coq/Init/Datatypes/nat.ind#xpointer(1/1)
+alias id refl_equal = cic:/Coq/Init/Logic/eq.ind#xpointer(1/1/1)
+alias num (instance 0) = "natural number"
 ### (* METASENV after disambiguation  *)
 
 ### (* TERM after disambiguation      *)