X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2FgTopLevel%2Ftests%2Flambda03.cic.test;h=4f21c833992db99fbb65e1daa29b6929ff75caaf;hb=a864255e782859e2b3b7da08297f5d3fe2ee710d;hp=e6d731cdec22c51ee60da30a507f3c6102d17559;hpb=a03648b7ed6bc8159b3fed9aa0a21b0cecfbea2f;p=helm.git diff --git a/helm/gTopLevel/tests/lambda03.cic.test b/helm/gTopLevel/tests/lambda03.cic.test index e6d731cde..4f21c8339 100644 --- a/helm/gTopLevel/tests/lambda03.cic.test +++ b/helm/gTopLevel/tests/lambda03.cic.test @@ -1,5 +1,12 @@ \lambda n:nat. \lambda H:n=n.\lambda g:(?\to (le n 0))\to True.(g \lambda f.(f n H)) +###### INTERPRETATION NUMBER 1 ###### +### (* disambiguation environment *) +alias id True = cic:/Coq/Init/Logic/True.ind#1/1 +alias id le = cic:/Coq/Init/Peano/le.ind#1/1 +alias id nat = cic:/Coq/Init/Datatypes/nat.ind#1/1 +alias num (instance 0) = "natural number" +alias symbol "eq" (instance 0) = "leibnitz's equality" ### (* METASENV after disambiguation *) ### (* TERM after disambiguation *)