]> matita.cs.unibo.it Git - helm.git/commit
This cast now works!
authorEnrico Tassi <enrico.tassi@inria.fr>
Fri, 7 Sep 2007 15:48:52 +0000 (15:48 +0000)
committerEnrico Tassi <enrico.tassi@inria.fr>
Fri, 7 Sep 2007 15:48:52 +0000 (15:48 +0000)
commitaa654b256f9deca4ed5bb2b13b87e1d69377f17d
tree5acf078e9cfd30e8f9cf65a7d1f913df73ba1822
parentb522fe867d4a55a900faffcb5decb170c3905c84
This cast now works!

 (λl:list nat. match l with [ nil ⇒ [] | cons x l1 ⇒ l1])
:
 ∀l:(∃l:list nat. l ≠ []). ∃l1.∃a.a :: l1 = l
helm/software/matita/tests/coercions_russell.ma [new file with mode: 0644]