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.
This is a shared constructive tool, not an additional major blueprint goal. The list covers every prime divisor, has no repeated primes, and contains actual prime-power values. One uses the empty support; zero is excluded.
Exact theorem in conservative defined notation
∀ p. ∀ q. ∀ k. ∀ z. Prime(p) → Prime(q) → ¬q = p → Pow(p,k,z) → BoundedPowerValuation(q,z,z,0)
Every linked abbreviation expands hygienically to the identical original native formula.
Definition DAG
Actual proof prerequisites
Complete tactic proof in conservative notation
All 44 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–8
02Establish hpzeroL9–14
03Establish hbaseL15–24
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply prime valuation zero of nondivisor.
- L15
have hbase : BoundedPowerValuation(q,p,p,0)Definitions: BoundedPowerValuation(q,p,p,0)Original native command in the exact edition - L16
specialize prime_valuation_zero_of_nondivisor (q) - L17
specialize prime_valuation_zero_of_nondivisor (p) - L18
apply prime_valuation_zero_of_nondivisor - L19
exact hq - L20
exact hpzero - L21
intro hdiv - L22
specialize distinct_primes_left_not_divide_right (q) - L23
specialize distinct_primes_left_not_divide_right (p) - L24
apply distinct_primes_left_not_divide_right
04Use earlier factsL25–34
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L25
exact hq - L26
exact hp - L27
exact hne - L28
exact hdiv - L29
specialize prime_valuation_exponent_eq_transport (q) - L30
specialize prime_valuation_exponent_eq_transport (z) - L31
specialize prime_valuation_exponent_eq_transport (k * 0) - L32
specialize prime_valuation_exponent_eq_transport (0) - L33
apply prime_valuation_exponent_eq_transport - L34
apply PA5
05Use earlier factsL35–44
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L35
specialize prime_power_valuation_pow (q) - L36
specialize prime_power_valuation_pow (p) - L37
specialize prime_power_valuation_pow (k) - L38
specialize prime_power_valuation_pow (0) - L39
specialize prime_power_valuation_pow (z) - L40
apply prime_power_valuation_pow - L41
exact hq - L42
exact hpzero - L43
exact hbase - L44
exact hpow
Original defined command ledger · 44 lines
- 0001
intro p - 0002
intro q - 0003
intro k - 0004
intro z - 0005
intro hp - 0006
intro hq - 0007
intro hne - 0008
intro hpow - 0009
have hpzero : ~(p = 0) - 0010
intro hz - 0011
specialize prime_nonzero (p) - 0012
apply prime_nonzero - 0013
exact hp - 0014
exact hz - 0015
have hbase : BoundedPowerValuation(q,p,p,0) - 0016
specialize prime_valuation_zero_of_nondivisor (q) - 0017
specialize prime_valuation_zero_of_nondivisor (p) - 0018
apply prime_valuation_zero_of_nondivisor - 0019
exact hq - 0020
exact hpzero - 0021
intro hdiv - 0022
specialize distinct_primes_left_not_divide_right (q) - 0023
specialize distinct_primes_left_not_divide_right (p) - 0024
apply distinct_primes_left_not_divide_right - 0025
exact hq - 0026
exact hp - 0027
exact hne - 0028
exact hdiv - 0029
specialize prime_valuation_exponent_eq_transport (q) - 0030
specialize prime_valuation_exponent_eq_transport (z) - 0031
specialize prime_valuation_exponent_eq_transport (k * 0) - 0032
specialize prime_valuation_exponent_eq_transport (0) - 0033
apply prime_valuation_exponent_eq_transport - 0034
apply PA5 - 0035
specialize prime_power_valuation_pow (q) - 0036
specialize prime_power_valuation_pow (p) - 0037
specialize prime_power_valuation_pow (k) - 0038
specialize prime_power_valuation_pow (0) - 0039
specialize prime_power_valuation_pow (z) - 0040
apply prime_power_valuation_pow - 0041
exact hq - 0042
exact hpzero - 0043
exact hbase - 0044
exact hpow