mirror of
https://github.com/HigherOrderCO/Kind.git
synced 2024-10-26 16:20:58 +03:00
10 lines
161 B
Plaintext
10 lines
161 B
Plaintext
|
Maybe
|
||
|
|
: ∀(T: *)
|
||
|
|
*
|
||
|
|
= λT
|
||
|
|
$self
|
||
|
|
∀(P: ∀(x: (Maybe T)) *)
|
||
|
|
∀(some: ∀(value: T) (P (Maybe.some T value)))
|
||
|
|
∀(none: (P (Maybe.none T)))
|
||
|
|
(P self)
|