kernel-Int.le_of_ofNat_le_ofNat
- Kind
- kernel-term
- Status
- checked
Supports: `Int.le_of_ofNat_le_ofNat` is admitted as a Theorem with EXACTLY the stated shape, pinned verbatim via the kernel's own renderer: `((x0 : AxNat) -> ((x1 : AxNat) -> ((x2 : Int.le (Int.ofNat x0) (Int.ofNat x1)) -> AxNat.le x0 x1)))`. `Int.le`/`Int.lt` are built by `define_binary_int` (int_prelude/defs.rs), whose `ofNat`/`ofNat` branch is literally `NatOps::le`/`NatOps::lt` on the two `Nat` fields, so `Int.le (ofNat m) (ofNat n)` is definitionally `Nat.le m n` and the proof is the hypothesis itself under that defeq -- no case split, no lemma. Built in a new file, int_prelude/order_coercion.rs.
test "$(cargo run -q --release -p axeyum-lean-kernel --example int_theorem_inventory 2>/dev/null | awk -F'\t' '$1 == "theorem" && $2 == "Int.le_of_ofNat_le_ofNat" && $4 == "((x0 : AxNat) -> ((x1 : AxNat) -> ((x2 : Int.le (Int.ofNat x0) (Int.ofNat x1)) -> AxNat.le x0 x1)))"' | wc -l)" -ge 1