theorem
proved
ordered_interpret_le_iff
show as:
view math explainer →
open explainer
Generate a durable explainer page for this declaration.
open lean source
IndisputableMonolith.Foundation.OrderedLogicRealization on GitHub at line 83.
browse module
All declarations in this module, on Recognition.
explainer page
depends on
formal source
80 exact Nat.succ_ne_zero _ hnat.symm
81
82/-- Order on the carrier matches the recovered Peano order. -/
83theorem ordered_interpret_le_iff (a b : ArithmeticFromLogic.LogicNat) :
84 ArithmeticFromLogic.LogicNat.toNat a ≤ ArithmeticFromLogic.LogicNat.toNat b ↔ a ≤ b := by
85 exact (ArithmeticFromLogic.LogicNat.toNat_le a b).symm
86
87end OrderedLogicRealization
88end Foundation
89end IndisputableMonolith