kernel-Nat.dvd_gcd_iff
- Kind
- kernel-term
- Status
- checked
Supports: ∀ {k} {m n : ℕ}, k ∣ m.gcd n ↔ k ∣ m ∧ k ∣ n
test "$(cargo run -q -p axeyum-lean-kernel --example nat_theorem_inventory -- dvd_gcd_iff 2>/dev/null | grep -Ec '^Nat\.dvd_gcd_iff[[:space:]]')" -ge 1 Evidence notes
`build_nat_prelude` admits `Nat.dvd_gcd_iff` 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. Predates this session; `declare_gcd_semantics` (`nat_prelude/gcd.rs`) builds it directly from the checked well-founded gcd characterization. This lane (nat-gcd-dvd-mirrors) closes the fact by evidence pointing at the existing declaration -- no new proof was written. `nat_theorem_inventory`'s rendered type is `(x0:AxNat)->(x1:AxNat)->(x2:AxNat)->Iff (dvd x0 (gcd x1 x2)) (And (dvd x0 x1) (dvd x0 x2))`, matching this fact's `formal.statement`. `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. Verified both ways: the real name greps to a count `-ge 1` (confirmed by direct run); grepping a made-up name (`Nat.dvd_gcd_iff_bogus`) exits non-zero (`nat_theorem_inventory` fails closed on an absent name -- measured: `error: no Nat theorem matches ... -- an absent theorem is a failed check, not an empty report`, exit 1).