]> matita.cs.unibo.it Git - helm.git/blob - helm/gTopLevel/tests/match03.cic
ocaml 3.09 transition
[helm.git] / helm / gTopLevel / tests / match03.cic
1 [\lambda x:bool. nat]
2 match true:bool with
3 [ true \Rightarrow O
4 | false \Rightarrow (S O) ]