kernel-Nat.coprime_lcm_eq_mul
- Kind
- kernel-term
- Status
- checked
Supports: ∀ {m n : ℕ}, m.Coprime n → m.lcm n = m * n
test "$(cargo run -q --release -p axeyum-lean-kernel --example nat_theorem_inventory -- coprime_lcm_eq_mul 2>/dev/null | grep -Ec '^Nat\.coprime_lcm_eq_mul[[:space:]]')" -ge 1 Evidence notes
This mirror was ALREADY PROVED in this ledger under a different name before the ml430 extraction landed: `Nat.coprime_lcm_eq_mul` (nat_prelude/lcm.rs, `declare_coprime_lcm_eq_mul`) states `gcd a b = 1 -> lcm a b = a * b`, which IS Mathlib's `Nat.Coprime.lcm_eq_mul` -- this codebase never gives `Coprime` its own predicate, spelling it `gcd _ _ = 1` directly everywhere (see nat_prelude/coprime_lemmas.rs's module doc for the same convention). `nat_theorem_inventory`'s rendered type for `Nat.coprime_lcm_eq_mul` is `((x0 : AxNat) -> ((x1 : AxNat) -> ((x2 : Eq.{1} AxNat (AxNat.gcd x0 x1) (AxNat.succ AxNat.zero)) -> Eq.{1} AxNat (AxNat.lcm x0 x1) (AxNat.mul x0 x1))))`, matching this fact's `formal.statement` (`m.Coprime n -> m.lcm n = m*n`) verbatim once `Coprime` is unfolded to `gcd = 1`. No new Rust was written for this fact; `draw11-theorems-b` lane confirmed the existing declaration's rendered type and wrote this evidence. `nat_theorem_inventory` exits non-zero for a name that does not exist, and the `grep -c` count (tested `-ge 1`, not piped into `grep -q`) requires the admitted declaration to actually be printed.