diff options
| author | Chloe Brown <chloe.brown.00@outlook.com> | 2021-03-30 18:52:46 +0100 |
|---|---|---|
| committer | Chloe Brown <chloe.brown.00@outlook.com> | 2021-03-30 18:52:46 +0100 |
| commit | 050206a1ba06d588879171698f2f8120a8b550d4 (patch) | |
| tree | 82f3a6749532420190d13004129a7e5637c561af /src/Cfe/Expression/Base.agda | |
| parent | 13e0839831a528d26478a3a94c7470204460cce4 (diff) | |
Attempt to prove unrolling.thm4.5a
Diffstat (limited to 'src/Cfe/Expression/Base.agda')
| -rw-r--r-- | src/Cfe/Expression/Base.agda | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Cfe/Expression/Base.agda b/src/Cfe/Expression/Base.agda index 1cd57a7..aabab1b 100644 --- a/src/Cfe/Expression/Base.agda +++ b/src/Cfe/Expression/Base.agda @@ -100,5 +100,5 @@ rank (μ e) = suc (rank e) infix 4 _<ᵣₐₙₖ_ -_<ᵣₐₙₖ_ : ∀ {n} → Rel (Expression n) _ -_<ᵣₐₙₖ_ = ℕ._<_ on rank +_<ᵣₐₙₖ_ : ∀ {m n} → REL (Expression m) (Expression n) _ +e <ᵣₐₙₖ e′ = rank e ℕ.< rank e′ |