Current library: Alpha v34, 4,223 checked-use theorems; Stable remains 432. Historical first admissions, original proof editions, and non-admitted aliases are preserved. Exact original first-admission records.
All displayed hypotheses are required. Powers and positive differences are actual existential outputs. The proof constructs second-order correction identities and iterates the prime step; no binomial expansion or LTE oracle is assumed. The 2-adic variants remain separate open targets.
Exact theorem in conservative defined notation
∀ p. ∀ a. ∀ b. ∀ d. ∀ n. ∀ e. ¬p = 1 ∧ (∀ x. ∀ y. p = x · y → x = 1 ∨ y = 1) → a = b + d → ¬d = 0 → Dvd(p,d) → ¬Dvd(p,b) → ¬Dvd(p,n) → BoundedPowerValuation(p,d,d,e) → ∃ x. ∃ y. ∃ z. LiftedPowerDifference(p,a,b,n,e,x,y,z)
Every linked abbreviation expands hygienically to the identical original native formula.
Definition DAG
Actual proof prerequisites
Complete tactic proof in conservative notation
All 69 original proof lines are preserved. Only local proposition formulas are abbreviated; every abbreviation has an exact binder-safe expansion check. The linked exact edition contains the unchanged replay script.
Read the argument
Proof checkpoints
This is a reading aid, not a new proof or a proof-tree certificate. Checkpoint groups are consecutive commands, not inferred branch boundaries. Every step links to the preserved script.
Named ingredients (3)
01Fix variables and assumptionsL1–10
02Fix variables and assumptionsL11–13
03Establish hquotientL14–23
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply lte coprime power difference quotient.
- L14
have hquotient : ∃ A. ∃ B. ∃ Q. Pow(a,n,A) ∧ (Pow(b,n,B) ∧ (A = B + d · Q ∧ ¬Dvd(p,Q)))Definitions: Pow(a,n,A)Pow(b,n,B)Dvd(p,Q)Original native command in the exact edition - L15
specialize lte_coprime_power_difference_quotient (p) - L16
specialize lte_coprime_power_difference_quotient (a) - L17
specialize lte_coprime_power_difference_quotient (b) - L18
specialize lte_coprime_power_difference_quotient (d) - L19
specialize lte_coprime_power_difference_quotient (n) - L20
apply lte_coprime_power_difference_quotient - L21
exact hp - L22
exact ha - L23
exact hd
04Use earlier factsL24–25
05Separate the logical casesL26–31
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
06Establish hQzeroL32–38
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply lte nondivisor nonzero.
07Construct an explicit witnessL39–41
08Use earlier factsL42–51
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L42
specialize lte_power_difference_valuation_step (p) - L43
specialize lte_power_difference_valuation_step (a) - L44
specialize lte_power_difference_valuation_step (b) - L45
specialize lte_power_difference_valuation_step (d) - L46
specialize lte_power_difference_valuation_step (n) - L47
specialize lte_power_difference_valuation_step (x) - L48
specialize lte_power_difference_valuation_step (x1) - L49
specialize lte_power_difference_valuation_step (x2) - L50
specialize lte_power_difference_valuation_step (e) - L51
specialize lte_power_difference_valuation_step (0)
09Use earlier factsL52–61
Instantiate or apply named facts and discharge the corresponding proof obligations.
10Use earlier factsL62–69
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L62
specialize prime_valuation_zero_of_nondivisor (x2) - L63
apply prime_valuation_zero_of_nondivisor - L64
exact hp - L65
exact hQzero - L66
exact hquotient_witness_witness_witness_right_right_right - L67
exact hquotient_witness_witness_witness_left - L68
exact hquotient_witness_witness_witness_right_left - L69
exact hquotient_witness_witness_witness_right_right_left
Original defined command ledger · 69 lines
- 0001
intro p - 0002
intro a - 0003
intro b - 0004
intro d - 0005
intro n - 0006
intro e - 0007
intro hp - 0008
intro ha - 0009
intro hdzero - 0010
intro hd - 0011
intro hb - 0012
intro hn - 0013
intro hval - 0014
have hquotient : ∃ A. ∃ B. ∃ Q. Pow(a,n,A) ∧ (Pow(b,n,B) ∧ (A = B + d · Q ∧ ¬Dvd(p,Q))) - 0015
specialize lte_coprime_power_difference_quotient (p) - 0016
specialize lte_coprime_power_difference_quotient (a) - 0017
specialize lte_coprime_power_difference_quotient (b) - 0018
specialize lte_coprime_power_difference_quotient (d) - 0019
specialize lte_coprime_power_difference_quotient (n) - 0020
apply lte_coprime_power_difference_quotient - 0021
exact hp - 0022
exact ha - 0023
exact hd - 0024
exact hb - 0025
exact hn - 0026
cases hquotient - 0027
cases hquotient_witness - 0028
cases hquotient_witness_witness - 0029
cases hquotient_witness_witness_witness - 0030
cases hquotient_witness_witness_witness_right - 0031
cases hquotient_witness_witness_witness_right_right - 0032
have hQzero : ~(x2 = 0) - 0033
intro hz - 0034
specialize lte_nondivisor_nonzero (p) - 0035
specialize lte_nondivisor_nonzero (x2) - 0036
apply lte_nondivisor_nonzero - 0037
exact hquotient_witness_witness_witness_right_right_right - 0038
exact hz - 0039
exists x - 0040
exists x1 - 0041
exists d * x2 - 0042
specialize lte_power_difference_valuation_step (p) - 0043
specialize lte_power_difference_valuation_step (a) - 0044
specialize lte_power_difference_valuation_step (b) - 0045
specialize lte_power_difference_valuation_step (d) - 0046
specialize lte_power_difference_valuation_step (n) - 0047
specialize lte_power_difference_valuation_step (x) - 0048
specialize lte_power_difference_valuation_step (x1) - 0049
specialize lte_power_difference_valuation_step (x2) - 0050
specialize lte_power_difference_valuation_step (e) - 0051
specialize lte_power_difference_valuation_step (0) - 0052
specialize lte_power_difference_valuation_step (e) - 0053
apply lte_power_difference_valuation_step - 0054
apply PA3 - 0055
exact hp - 0056
exact hdzero - 0057
exact hd - 0058
exact hb - 0059
exact hQzero - 0060
exact hval - 0061
specialize prime_valuation_zero_of_nondivisor (p) - 0062
specialize prime_valuation_zero_of_nondivisor (x2) - 0063
apply prime_valuation_zero_of_nondivisor - 0064
exact hp - 0065
exact hQzero - 0066
exact hquotient_witness_witness_witness_right_right_right - 0067
exact hquotient_witness_witness_witness_left - 0068
exact hquotient_witness_witness_witness_right_left - 0069
exact hquotient_witness_witness_witness_right_right_left