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. ∀ e. ¬p = 1 ∧ (∀ x. ∀ y. p = x · y → x = 1 ∨ y = 1) → ¬p = 2 → a = b + d → ¬d = 0 → Dvd(p,d) → ¬Dvd(p,b) → BoundedPowerValuation(p,d,d,e) → ∃ x. ∃ y. ∃ z. LiftedPowerDifference(p,a,b,p,S 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 85 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 (5)
01Fix variables and assumptionsL1–10
02Fix variables and assumptionsL11–12
03Establish hquotientL13–22
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply lte odd prime power difference quotient.
- L13
have hquotient : ∃ A. ∃ B. ∃ Q. ∃ u. Pow(a,p,A) ∧ (Pow(b,p,B) ∧ (A = B + d · Q ∧ (Q = p · u ∧ ¬Dvd(p,u))))Definitions: Pow(a,p,A)Pow(b,p,B)Dvd(p,u)Original native command in the exact edition - L14
specialize lte_odd_prime_power_difference_quotient (p) - L15
specialize lte_odd_prime_power_difference_quotient (a) - L16
specialize lte_odd_prime_power_difference_quotient (b) - L17
specialize lte_odd_prime_power_difference_quotient (d) - L18
apply lte_odd_prime_power_difference_quotient - L19
exact hp - L20
exact hne - L21
exact ha - L22
exact hd
04Use earlier factsL23–23
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L23
exact hb
05Separate the logical casesL24–31
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L24
cases hquotient - L25
cases hquotient_witness - L26
cases hquotient_witness_witness - L27
cases hquotient_witness_witness_witness - L28
cases hquotient_witness_witness_witness_witness - L29
cases hquotient_witness_witness_witness_witness_right - L30
cases hquotient_witness_witness_witness_witness_right_right - L31
cases hquotient_witness_witness_witness_witness_right_right_right
06Establish hQzeroL32–41
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply mul ne zero.
07Use earlier factsL42–42
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L42
exact hpzero
08Fix variables and assumptionsL43–43
Work with arbitrary variables or the premises of the current implication.
- L43
intro huzero
09Use earlier factsL44–49
10Construct an explicit witnessL50–52
11Use earlier factsL53–62
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L53
specialize lte_power_difference_valuation_step (p) - L54
specialize lte_power_difference_valuation_step (a) - L55
specialize lte_power_difference_valuation_step (b) - L56
specialize lte_power_difference_valuation_step (d) - L57
specialize lte_power_difference_valuation_step (p) - L58
specialize lte_power_difference_valuation_step (x) - L59
specialize lte_power_difference_valuation_step (x1) - L60
specialize lte_power_difference_valuation_step (x2) - L61
specialize lte_power_difference_valuation_step (e) - L62
specialize lte_power_difference_valuation_step (1)
12Use earlier factsL63–64
13Calculate and transport equalitiesL65–65
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L65
simp
14Use earlier factsL66–75
Instantiate or apply named facts and discharge the corresponding proof obligations.
15Use earlier factsL76–85
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L76
specialize lte_valuation_from_exact_cofactor (x2) - L77
apply lte_valuation_from_exact_cofactor - L78
exact hp - L79
specialize lte_power_one_exact (p) - L80
apply lte_power_one_exact - L81
exact hquotient_witness_witness_witness_witness_right_right_right_left - L82
exact hquotient_witness_witness_witness_witness_right_right_right_right - L83
exact hquotient_witness_witness_witness_witness_left - L84
exact hquotient_witness_witness_witness_witness_right_left - L85
exact hquotient_witness_witness_witness_witness_right_right_left
Original defined command ledger · 85 lines
- 0001
intro p - 0002
intro a - 0003
intro b - 0004
intro d - 0005
intro e - 0006
intro hp - 0007
intro hne - 0008
intro ha - 0009
intro hdzero - 0010
intro hd - 0011
intro hb - 0012
intro hval - 0013
have hquotient : ∃ A. ∃ B. ∃ Q. ∃ u. Pow(a,p,A) ∧ (Pow(b,p,B) ∧ (A = B + d · Q ∧ (Q = p · u ∧ ¬Dvd(p,u)))) - 0014
specialize lte_odd_prime_power_difference_quotient (p) - 0015
specialize lte_odd_prime_power_difference_quotient (a) - 0016
specialize lte_odd_prime_power_difference_quotient (b) - 0017
specialize lte_odd_prime_power_difference_quotient (d) - 0018
apply lte_odd_prime_power_difference_quotient - 0019
exact hp - 0020
exact hne - 0021
exact ha - 0022
exact hd - 0023
exact hb - 0024
cases hquotient - 0025
cases hquotient_witness - 0026
cases hquotient_witness_witness - 0027
cases hquotient_witness_witness_witness - 0028
cases hquotient_witness_witness_witness_witness - 0029
cases hquotient_witness_witness_witness_witness_right - 0030
cases hquotient_witness_witness_witness_witness_right_right - 0031
cases hquotient_witness_witness_witness_witness_right_right_right - 0032
have hQzero : ~(x2 = 0) - 0033
intro hz - 0034
rewrite hquotient_witness_witness_witness_witness_right_right_right_left at hz - 0035
specialize mul_ne_zero (p) - 0036
specialize mul_ne_zero (x3) - 0037
apply mul_ne_zero - 0038
intro hpzero - 0039
specialize prime_nonzero (p) - 0040
apply prime_nonzero - 0041
exact hp - 0042
exact hpzero - 0043
intro huzero - 0044
specialize lte_nondivisor_nonzero (p) - 0045
specialize lte_nondivisor_nonzero (x3) - 0046
apply lte_nondivisor_nonzero - 0047
exact hquotient_witness_witness_witness_witness_right_right_right_right - 0048
exact huzero - 0049
exact hz - 0050
exists x - 0051
exists x1 - 0052
exists d * x2 - 0053
specialize lte_power_difference_valuation_step (p) - 0054
specialize lte_power_difference_valuation_step (a) - 0055
specialize lte_power_difference_valuation_step (b) - 0056
specialize lte_power_difference_valuation_step (d) - 0057
specialize lte_power_difference_valuation_step (p) - 0058
specialize lte_power_difference_valuation_step (x) - 0059
specialize lte_power_difference_valuation_step (x1) - 0060
specialize lte_power_difference_valuation_step (x2) - 0061
specialize lte_power_difference_valuation_step (e) - 0062
specialize lte_power_difference_valuation_step (1) - 0063
specialize lte_power_difference_valuation_step (S e) - 0064
apply lte_power_difference_valuation_step - 0065
simp - 0066
exact hp - 0067
exact hdzero - 0068
exact hd - 0069
exact hb - 0070
exact hQzero - 0071
exact hval - 0072
specialize lte_valuation_from_exact_cofactor (p) - 0073
specialize lte_valuation_from_exact_cofactor (1) - 0074
specialize lte_valuation_from_exact_cofactor (p) - 0075
specialize lte_valuation_from_exact_cofactor (x3) - 0076
specialize lte_valuation_from_exact_cofactor (x2) - 0077
apply lte_valuation_from_exact_cofactor - 0078
exact hp - 0079
specialize lte_power_one_exact (p) - 0080
apply lte_power_one_exact - 0081
exact hquotient_witness_witness_witness_witness_right_right_right_left - 0082
exact hquotient_witness_witness_witness_witness_right_right_right_right - 0083
exact hquotient_witness_witness_witness_witness_left - 0084
exact hquotient_witness_witness_witness_witness_right_left - 0085
exact hquotient_witness_witness_witness_witness_right_right_left