kernel-Nat.prime_coprime_iff_not_dvd
- Kind
- kernel-term
- Status
- checked
Supports: ∀ {p n : ℕ}, Nat.Prime p → (p.Coprime n ↔ ¬p ∣ n)
test "$(cargo run -q -p axeyum-lean-kernel --example nat_theorem_inventory -- prime_coprime_iff_not_dvd 2>/dev/null | grep -Ec '^Nat\.prime_coprime_iff_not_dvd[[:space:]]')" -ge 1 Evidence notes
`mp`: `gcd p n=1` and `p|n` give `p|gcd(p,n)` via `dvd_refl`+`dvd_gcd`, transported to `p|1` -- refuted by `not_dvd_one_of_two_le`. `mpr`: `g := gcd p n` divides `p` (`gcd_dvd_left`), so the divisor clause forces `g=1 or g=p`; `g=1` is the goal directly, `g=p` transports `g|n` (`gcd_dvd_right`) into `p|n`, contradicting the hypothesis.