gcd times lcm recovers the product

Identifier: F:nat-gcd-mul-lcm
Proof route: kernel-lean
External status: proved
Axiom footprint: Empty

Recorded description

For all natural numbers a and b, gcd(a, b) * lcm(a, b) = a * b.

Formal statement

theorem Nat.gcd_mul_lcm : ((x0 : AxNat) -> ((x1 : AxNat) -> Eq.{1} AxNat (AxNat.mul (AxNat.gcd x0 x1) (AxNat.lcm x0 x1)) (AxNat.mul x0 x1)))

Dependencies

The graph shows direct ledger edges. Follow a node to open its artifact page.

9 direct dependencies 3 direct dependents Graph shows the first 8 on each side.

Evidence

kernel-Nat.gcd_mul_lcm

Kind: kernel-term
Status: checked

Supports: For all natural numbers a and b, gcd(a, b) * lcm(a, b) = a * b.

Checker command

test "$(cargo run -q -p axeyum-lean-kernel --example nat_theorem_inventory -- gcd_mul_lcm 2>/dev/null | grep -Ec '^Nat\.gcd_mul_lcm[[:space:]]')" -ge 1

Evidence notes

`build_nat_prelude` admits this theorem through the trusted `Kernel::add_declaration` gate, which re-checks the proof term against the stated type, so producing this row at all is a machine-checked proof. `nat_theorem_inventory` exits non-zero for a name that does not exist, and the `grep -q` requires the admitted declaration to be printed -- both halves of the check depend on the theorem actually being present.

footprint-Nat.gcd_mul_lcm

Kind: exhaustive-enumeration
Status: checked

Supports: axiom_footprint: [] -- the Nat prelude's trusted surface is empty

Checker command

cargo run -q -p axeyum-lean-kernel --example nat_axiom_inventory -- --require-axiom-free nat

Evidence notes

`nat_axiom_inventory --require-axiom-free nat` enumerates the built Nat environment and exits non-zero unless it admits no Axiom, Opaque or Quotient declaration (measured: axiom=0 opaque=0 quotient=0). A theorem cannot depend on a trusted declaration the environment does not contain, so an empty trusted surface bounds every individual theorem's footprint by [].

Provenance

{
  "date": "2026-08-25",
  "established_by": "axeyum-lean-kernel build_nat_prelude, lane rado-claim-ledger",
  "source": "one of the theorems build_nat_prelude admits; registered to close the flywheel's fact-ledger arrow for recently landed Nat theorems"
}