X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2FgTopLevel%2Ftests%2Fmatch01.cic.test;h=8d734e28f271491a98bbb3d095f106690fa26fab;hb=5325734bc2e4927ed7ec146e35a6f0f2b49f50c1;hp=089665f6af4a89c0afe9bef6064c7e7813a5d036;hpb=cab83f17a2d7a591c4ff2980b07946b50dbf9d00;p=helm.git diff --git a/helm/gTopLevel/tests/match01.cic.test b/helm/gTopLevel/tests/match01.cic.test index 089665f6a..8d734e28f 100644 --- a/helm/gTopLevel/tests/match01.cic.test +++ b/helm/gTopLevel/tests/match01.cic.test @@ -2,6 +2,14 @@ match (le_n O): le with [ le_n \Rightarrow (refl_equal nat O) | (le_S x y) \Rightarrow (refl_equal nat O) ] +###### INTERPRETATION NUMBER 1 ###### +### (* disambiguation environment *) +alias id O = cic:/Coq/Init/Datatypes/nat.ind#1/1/1 +alias id eq = cic:/Coq/Init/Logic/eq.ind#1/1 +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 id refl_equal = cic:/Coq/Init/Logic/eq.ind#1/1/1 ### (* METASENV after disambiguation *) ### (* TERM after disambiguation *)