diff options
| author | Chloe Brown <chloe.brown.00@outlook.com> | 2021-03-29 18:08:09 +0100 |
|---|---|---|
| committer | Chloe Brown <chloe.brown.00@outlook.com> | 2021-03-29 18:08:09 +0100 |
| commit | 13e0839831a528d26478a3a94c7470204460cce4 (patch) | |
| tree | b907e2dee7ef170c879d3ec182bcc5b5eff374dd /src/Cfe/Expression/Base.agda | |
| parent | da35892c463cd6b9a492c6aee09726a41031ca93 (diff) | |
Introduce < for Languages.
Move around some definitions.
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 |