]> matita.cs.unibo.it Git - helm.git/blob - helm/gTopLevel/tests/match04.cic
changed functor interface, now based on proofs instead of metasenvs (this one is...
[helm.git] / helm / gTopLevel / tests / match04.cic
1 [\lambda x:nat. nat]
2 match O:nat with
3 [ O \Rightarrow O
4 | (S x) \Rightarrow (S (S x)) ]