Exact expanded PA statement
forall p a. ~(a = 0) -> (exists wpo_gap_ecb_a_lt_p. wpo_gap_ecb_a_lt_p + S (a) = p) -> (~(exists frm_factor_ecb_not_divisor. a = p * frm_factor_ecb_not_divisor))Structural proof guide
Generated structural guide
A nonzero value strictly below a modulus is not divisible by it.
Use the direct prerequisites divisor_le_nonzero, lt_not_le as previously established PA formulas.
The proof proceeds by intermediate claims (1).
Referenced ingredients
Proof neighborhood
Direct dependencies
Direct dependents
Formal native tactic body
Dependencies are introduced as named hypotheses before line 1. Linked names are exact direct references. This Alpha-v16 checked-use theorem is independently kernel-checked when replayed; it is not a Stable theorem.
- 0001
intro p - 0002
intro a - 0003
intro ha0 - 0004
intro hap - 0005
intro hdiv - 0006
have hpa : exists t. t + p = a - 0007
specialize divisor_le_nonzero p - 0008
specialize divisor_le_nonzero a - 0009
apply divisor_le_nonzero - 0010
exact ha0 - 0011
exact hdiv - 0012
specialize lt_not_le a - 0013
specialize lt_not_le p - 0014
apply lt_not_le - 0015
exact hap - 0016
exact hpa