]> matita.cs.unibo.it Git - helm.git/blob - helm/gTopLevel/tests/match03.cic
debian: rebuilt against ocaml 3.08.2
[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) ]