mirror of
https://github.com/HigherOrderCO/Kind.git
synced 2024-07-07 10:06:36 +03:00
12 lines
173 B
Plaintext
12 lines
173 B
Plaintext
QUnit
|
|
: *
|
|
= $(self: QUnit)
|
|
∀(P: ∀(x: QUnit) *)
|
|
(Sigma
|
|
U60
|
|
λtag
|
|
switch tag = tag {
|
|
0: ∀(one: (P QUnit.one)) (P self)
|
|
_: Empty
|
|
}: *
|
|
) |