mirror of
https://github.com/HigherOrderCO/Kind.git
synced 2024-09-11 20:47:25 +03:00
4 lines
144 B
Plaintext
4 lines
144 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) |