kernel-Nat.div_lt_of_lt_mul
- Kind
- kernel-term
- Status
- checked
Supports: `Nat.div_lt_of_lt_mul` is admitted as a Theorem with EXACTLY the stated shape, pinned verbatim via the kernel's own renderer: `((x0 : AxNat) -> ((x1 : AxNat) -> ((x2 : AxNat) -> ((x3 : AxNat.lt x0 (AxNat.mul x1 x2)) -> AxNat.lt (AxNat.div x0 x1) x2))))`. Built in the same new file via a genuine case split on the divisor `n` (`cases_zero_succ`, not induction): at `n = zero` the hypothesis `Lt m (mul zero k)` is immediately absurd via `Nat.zero_mul`/`Nat.not_lt_zero`; at `n = succ n'` this is exactly `Nat.div_mod_lt_mul_iff`'s forward direction, fed the canonical `divMod` witness from `Nat.div_mod_exec`.
test "$(cargo run -q --release -p axeyum-lean-kernel --example nat_theorem_inventory 2>/dev/null | awk -F'\t' '$1 == "Nat.div_lt_of_lt_mul" && $3 == "((x0 : AxNat) -> ((x1 : AxNat) -> ((x2 : AxNat) -> ((x3 : AxNat.lt x0 (AxNat.mul x1 x2)) -> AxNat.lt (AxNat.div x0 x1) x2))))"' | wc -l)" -ge 1