Remove helper comment.
Signed-off-by: Danila Fedorin <danila.fedorin@gmail.com>
This commit is contained in:
parent
6cb6281bc2
commit
8516f58b1d
10
Main.agda
10
Main.agda
|
@ -56,14 +56,4 @@ dumbFunction-Monotonic {m₁} {m₂} m₁≼m₂ = ⊔-Monotonicˡ dumb {m₁} {
|
|||
|
||||
open import Fixedpoint {0ℓ} {FiniteHeightMap xyzw} {8} {_≈_} {_⊔_} {_⊓_} (≈-dec fhlᵘ xyzw-Unique ≈ᵘ-dec) (FiniteHeightLattice.isFiniteHeightLattice fhlⁱᵖ) dumbFunction (λ {m₁} {m₂} m₁≼m₂ → dumbFunction-Monotonic {m₁} {m₂} m₁≼m₂)
|
||||
|
||||
-- module Fixedpoint {a} {A : Set a}
|
||||
-- {h : ℕ}
|
||||
-- {_≈_ : A → A → Set a}
|
||||
-- {_⊔_ : A → A → A} {_⊓_ : A → A → A}
|
||||
-- (≈-dec : IsDecidable _≈_)
|
||||
-- (flA : IsFiniteHeightLattice A h _≈_ _⊔_ _⊓_)
|
||||
-- (f : A → A)
|
||||
-- (Monotonicᶠ : Monotonic (IsFiniteHeightLattice._≼_ flA)
|
||||
-- (IsFiniteHeightLattice._≼_ flA) f) where
|
||||
|
||||
main = run {0ℓ} (putStrLn (showMap aᶠ))
|
||||
|
|
Loading…
Reference in New Issue
Block a user