kernel-Nat.lt_of_mul_lt_mul_left
- Kind
- kernel-term
- Status
- checked
Supports: `Nat.lt_of_mul_lt_mul_left` 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 (AxNat.mul x0 x1) (AxNat.mul x0 x2)) -> AxNat.lt x1 x2))))`. Built in the same new file with NO positivity hypothesis, by contradiction: `Nat.lt_or_ge b c` splits into `Lt b c` (the goal directly) and `Le c b`, the latter refuted by chaining `Nat.mul_le_mul_left` against the strict hypothesis via `Nat.le_trans` into `Lt (mul a b) (mul a b)`, discharged by `Nat.lt_irrefl`. No `Nat.rec` case split.
test "$(cargo run -q --release -p axeyum-lean-kernel --example nat_theorem_inventory 2>/dev/null | awk -F'\t' '$1 == "Nat.lt_of_mul_lt_mul_left" && $3 == "((x0 : AxNat) -> ((x1 : AxNat) -> ((x2 : AxNat) -> ((x3 : AxNat.lt (AxNat.mul x0 x1) (AxNat.mul x0 x2)) -> AxNat.lt x1 x2))))"' | wc -l)" -ge 1