mirror of
https://github.com/unisonweb/unison.git
synced 2024-09-23 16:28:02 +03:00
12 lines
141 B
Plaintext
12 lines
141 B
Plaintext
|
|
ability Foo where
|
|
foo : {Foo} Nat
|
|
|
|
type Wrap a = Wrap Nat
|
|
|
|
blah : Wrap {Foo} -> Nat
|
|
blah = cases
|
|
Wrap.Wrap n -> n + 1
|
|
|
|
> blah (Wrap 99)
|