mirror of
https://github.com/HigherOrderCO/Kind.git
synced 2024-09-11 15:56:12 +03:00
10 lines
165 B
Plaintext
10 lines
165 B
Plaintext
Sigma
|
|
: ∀(A: *)
|
|
∀(B: ∀(x: A) *)
|
|
*
|
|
= λA λB
|
|
$self
|
|
∀(P: ∀(x: (Sigma A B)) *)
|
|
∀(new: ∀(a: A) ∀(b: (B a)) (P (Sigma.new A B a b)))
|
|
(P self)
|