mirror of
https://github.com/unisonweb/unison.git
synced 2024-09-19 06:17:33 +03:00
10 lines
148 B
Plaintext
10 lines
148 B
Plaintext
structural type Value = String Text
|
|
| Bool Boolean
|
|
|
|
f : Value -> Nat
|
|
f = cases
|
|
Value.Bool true -> 3
|
|
_ -> 4
|
|
|
|
> f (Value.String "foo")
|