Exact expanded PA statement
forall a b. ~(2 = S (S a) * S (S b))Structural proof guide
Two naturals at least two cannot multiply to two.
Direct prerequisites: mul_succ_left, add_eq_zero_left, mul_eq_zero. The authored body proceeds by case analysis (1), intermediate claims (4), equality transport (3).
Proof neighborhood
Direct dependencies
Direct dependents
Formal native tactic body
Dependencies are hypotheses of this body receipt. The focused endpoint audits separately check the complete empty-context certificates.
- 0001
intro a - 0002
intro b - 0003
intro h - 0004
specialize mul_succ_left (S a) - 0005
specialize mul_succ_left (S (S b)) - 0006
rewrite mul_succ_left at h - 0007
rewrite PA4 at h - 0008
rewrite PA4 at h - 0009
have hzero : 0 = S a * S (S b) + b - 0010
apply PA2 - 0011
apply PA2 - 0012
exact h - 0013
have hzero' : S a * S (S b) + b = 0 - 0014
symm - 0015
exact hzero - 0016
have hprod : S a * S (S b) = 0 - 0017
apply add_eq_zero_left - 0018
exact hzero' - 0019
specialize mul_eq_zero (S a) - 0020
specialize mul_eq_zero (S (S b)) - 0021
have hz : S a = 0 \/ S (S b) = 0 - 0022
apply mul_eq_zero - 0023
exact hprod - 0024
cases hz - 0025
apply PA1 - 0026
exact hz_left - 0027
apply PA1 - 0028
exact hz_right