kernel-Nat.prime_not_perfect
- Kind
- kernel-term
- Status
- checked
Supports: Prime p -> Not (Perfect p)
test "$(cargo run -q -p axeyum-lean-kernel --example nat_theorem_inventory -- prime_not_perfect 2>/dev/null | grep -Ec '^Nat\.prime_not_perfect[[:space:]]')" -ge 1 Evidence notes
`Perfect p` gives `Eq (sumDivisors p) (mul 2 p)`; transporting `prime_deficient`'s `Lt (sumDivisors p) (mul 2 p)` along it yields `Lt (mul 2 p) (mul 2 p)`, absurd via `lt_irrefl`.