]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/gTopLevel/tests/forall00.cic.test
ocaml 3.09 transition
[helm.git] / helm / gTopLevel / tests / forall00.cic.test
index 8391ea568ff781f990a75c45628dd754b21b03e4..fccef764ea7a673116429fa0d8aea0d264161783 100644 (file)
@@ -1,9 +1,14 @@
 \forall n:nat. \forall m. n + m = n
+###### INTERPRETATION NUMBER 1 ######
+### (* disambiguation environment  *)
+alias id nat = cic:/Coq/Init/Datatypes/nat.ind#xpointer(1/1)
+alias symbol "eq" (instance 0) = "leibnitz's equality"
+alias symbol "plus" (instance 0) = "natural plus"
 ### (* METASENV after disambiguation  *)
 
 ### (* TERM after disambiguation      *)
-(n:nat)(nat->(eq nat (plus n __1) n))
+(n:nat)(m:nat)(eq nat (plus n m) n)
 ### (* TYPE_OF the disambiguated term *)
 Prop
 ### (* REDUCED disambiguated term     *)
-(n:nat)(nat->(eq nat (plus n __1) n))
+(n:nat)(m:nat)(eq nat (plus n m) n)