mirror of
https://github.com/HigherOrderCO/Kind.git
synced 2024-09-11 19:27:42 +03:00
7 lines
150 B
Plaintext
7 lines
150 B
Plaintext
Kind.normal
|
|
: ∀(maj: Bool)
|
|
∀(term: Kind.Term)
|
|
∀(dep: Nat)
|
|
Kind.Term
|
|
= λmaj λterm λdep
|
|
(Kind.normal.go maj (Kind.reduce maj term) dep) |