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