kernel-Nat.prime_dvd_iff_eq
- Kind
- kernel-term
- Status
- checked
Supports: ∀ {p a : ℕ}, Nat.Prime p → a ≠ 1 → (a ∣ p ↔ p = a)
test "$(cargo run -q -p axeyum-lean-kernel --example nat_theorem_inventory -- prime_dvd_iff_eq 2>/dev/null | grep -Ec '^Nat\.prime_dvd_iff_eq[[:space:]]')" -ge 1 Evidence notes
`mp`: the divisor clause at `a` gives `a=1 or a=p`; the `a=1` branch contradicts the `a != 1` hypothesis (`absurd`), the `a=p` branch is `symm`-ed into `p=a`. `mpr`: `dvd_refl p` transported along `p=a`.