diff options
Diffstat (limited to 'src/Cfe/Expression/Base.agda')
-rw-r--r-- | src/Cfe/Expression/Base.agda | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/Cfe/Expression/Base.agda b/src/Cfe/Expression/Base.agda index dd9e9b4..1cd57a7 100644 --- a/src/Cfe/Expression/Base.agda +++ b/src/Cfe/Expression/Base.agda @@ -97,3 +97,8 @@ rank (e₁ ∨ e₂) = suc (rank e₁ ℕ.+ rank e₂) rank (e₁ ∙ _) = suc (rank e₁) rank (Var _) = 0 rank (μ e) = suc (rank e) + +infix 4 _<ᵣₐₙₖ_ + +_<ᵣₐₙₖ_ : ∀ {n} → Rel (Expression n) _ +_<ᵣₐₙₖ_ = ℕ._<_ on rank |