⚠️ Archived site. This is the pre-3.0 Agda Universal Algebra Library, preserved for reference. Its current home is agda-algebras.universalalgebra.org (as of July 2026).
------------------------------------------------------------------------ -- The Agda standard library -- -- ≤-pred definition so as to not cause dependency problems. ------------------------------------------------------------------------ {-# OPTIONS --without-K --safe #-} module Data.Nat.Properties.Core where open import Data.Nat.Base ------------------------------------------------------------------------ -- Properties of _≤_ ------------------------------------------------------------------------ ≤-pred : ∀ {m n} → suc m ≤ suc n → m ≤ n ≤-pred (s≤s m≤n) = m≤n