X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2FgTopLevel%2Ftests%2Flambda02.cic.test;fp=helm%2FgTopLevel%2Ftests%2Flambda02.cic.test;h=0000000000000000000000000000000000000000;hb=1696761e4b8576e8ed81caa905fd108717019226;hp=259140c9ef6253ce02211d430b6dce0f34a5c960;hpb=5325734bc2e4927ed7ec146e35a6f0f2b49f50c1;p=helm.git diff --git a/helm/gTopLevel/tests/lambda02.cic.test b/helm/gTopLevel/tests/lambda02.cic.test deleted file mode 100644 index 259140c9e..000000000 --- a/helm/gTopLevel/tests/lambda02.cic.test +++ /dev/null @@ -1,16 +0,0 @@ -\lambda f:(\forall n:nat. (\forall H:(le 0 n). (n=n))). (f 0 (le_n 0)) -###### INTERPRETATION NUMBER 1 ###### -### (* disambiguation environment *) -alias id le = cic:/Coq/Init/Peano/le.ind#1/1 -alias id le_n = cic:/Coq/Init/Peano/le.ind#1/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 *) -[f:(n:nat)((le O n)->(eq nat n n))](f O (le_n O)) -### (* TYPE_OF the disambiguated term *) -(f:(n:nat)((le O n)->(eq nat n n)))(eq nat O O) -### (* REDUCED disambiguated term *) -[f:(n:nat)((le O n)->(eq nat n n))](f O (le_n O))