unison/unison-src/tests/r2.u
2018-09-24 13:15:40 -04:00

7 lines
129 B
Plaintext

type Optional a = None | Some a
r2 : Nat
r2 = case Optional.Some true of
Optional.Some true -> 1
Optional.Some false -> 0
()