mirror of
https://github.com/HigherOrderCO/Kind.git
synced 2024-09-11 16:36:13 +03:00
7 lines
97 B
Plaintext
7 lines
97 B
Plaintext
U60.max
|
|
: ∀(a: #U60)
|
|
∀(b: #U60)
|
|
#U60
|
|
= λa λb
|
|
(~(U60.to_bool #(> a b)) λx(#U60) a b)
|