mirror of
https://github.com/unisonweb/unison.git
synced 2024-11-04 01:03:36 +03:00
7 lines
95 B
Plaintext
7 lines
95 B
Plaintext
structural type X a = X [a]
|
|
|
|
f : X a -> a
|
|
f = cases
|
|
X.X [b] -> b
|
|
X.X _ -> bug "unexpected"
|