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.
Exact expanded first-order arithmetic statement
forall p e P. (~((p) = 1) /\ forall pvs_left_prime_power_prime pvs_right_prime_power_prime. (p) = pvs_left_prime_power_prime * pvs_right_prime_power_prime -> pvs_left_prime_power_prime = 1 \/ pvs_right_prime_power_prime = 1) -> (exists pa_b_olte_prime_power_source pa_c_olte_prime_power_source. ((forall pa_i_olte_prime_power_source_repeat. (exists pa_lt_olte_prime_power_source_repeat_bound. pa_lt_olte_prime_power_source_repeat_bound + S pa_i_olte_prime_power_source_repeat = e) -> (((exists pa_h_olte_prime_power_source_repeat_decoded. pa_h_olte_prime_power_source_repeat_decoded + S (p) = S ((S (pa_i_olte_prime_power_source_repeat)) * pa_c_olte_prime_power_source)) /\ exists pa_q_olte_prime_power_source_repeat_decoded. pa_b_olte_prime_power_source = pa_q_olte_prime_power_source_repeat_decoded * S ((S (pa_i_olte_prime_power_source_repeat)) * pa_c_olte_prime_power_source) + (p)))) /\ (exists pa_u_olte_prime_power_source_product pa_v_olte_prime_power_source_product. ((((exists pa_h_olte_prime_power_source_product_start. pa_h_olte_prime_power_source_product_start + S (1) = S ((S (0)) * pa_v_olte_prime_power_source_product)) /\ exists pa_q_olte_prime_power_source_product_start. pa_u_olte_prime_power_source_product = pa_q_olte_prime_power_source_product_start * S ((S (0)) * pa_v_olte_prime_power_source_product) + (1))) /\ ((((exists pa_h_olte_prime_power_source_product_terminal. pa_h_olte_prime_power_source_product_terminal + S (P) = S ((S (e)) * pa_v_olte_prime_power_source_product)) /\ exists pa_q_olte_prime_power_source_product_terminal. pa_u_olte_prime_power_source_product = pa_q_olte_prime_power_source_product_terminal * S ((S (e)) * pa_v_olte_prime_power_source_product) + (P))) /\ forall pa_i_olte_prime_power_source_product. (exists pa_lt_olte_prime_power_source_product_bound. pa_lt_olte_prime_power_source_product_bound + S pa_i_olte_prime_power_source_product = e) -> exists pa_p_olte_prime_power_source_product pa_r_olte_prime_power_source_product pa_s_olte_prime_power_source_product. ((((exists pa_h_olte_prime_power_source_product_factor. pa_h_olte_prime_power_source_product_factor + S (pa_p_olte_prime_power_source_product) = S ((S (pa_i_olte_prime_power_source_product)) * pa_c_olte_prime_power_source)) /\ exists pa_q_olte_prime_power_source_product_factor. pa_b_olte_prime_power_source = pa_q_olte_prime_power_source_product_factor * S ((S (pa_i_olte_prime_power_source_product)) * pa_c_olte_prime_power_source) + (pa_p_olte_prime_power_source_product))) /\ ((((exists pa_h_olte_prime_power_source_product_partial. pa_h_olte_prime_power_source_product_partial + S (pa_r_olte_prime_power_source_product) = S ((S (pa_i_olte_prime_power_source_product)) * pa_v_olte_prime_power_source_product)) /\ exists pa_q_olte_prime_power_source_product_partial. pa_u_olte_prime_power_source_product = pa_q_olte_prime_power_source_product_partial * S ((S (pa_i_olte_prime_power_source_product)) * pa_v_olte_prime_power_source_product) + (pa_r_olte_prime_power_source_product))) /\ ((((exists pa_h_olte_prime_power_source_product_successor. pa_h_olte_prime_power_source_product_successor + S (pa_s_olte_prime_power_source_product) = S ((S (S pa_i_olte_prime_power_source_product)) * pa_v_olte_prime_power_source_product)) /\ exists pa_q_olte_prime_power_source_product_successor. pa_u_olte_prime_power_source_product = pa_q_olte_prime_power_source_product_successor * S ((S (S pa_i_olte_prime_power_source_product)) * pa_v_olte_prime_power_source_product) + (pa_s_olte_prime_power_source_product))) /\ pa_s_olte_prime_power_source_product = pa_r_olte_prime_power_source_product * pa_p_olte_prime_power_source_product)))))))) -> (((exists bpd_gap_pvs_prime_power_result_selected_bound. bpd_gap_pvs_prime_power_result_selected_bound + (e) = (P)) /\ (exists bpvi_result_pvs_prime_power_result_selected. ((exists bpvi_b_pvs_prime_power_result_selected_power bpvi_c_pvs_prime_power_result_selected_power. ((forall bpvi_i_pvs_prime_power_result_selected_power. (exists bpvi_repeat_gap_pvs_prime_power_result_selected_power. bpvi_repeat_gap_pvs_prime_power_result_selected_power + S bpvi_i_pvs_prime_power_result_selected_power = e) -> (((exists bpvi_h_pvs_prime_power_result_selected_power_repeat. bpvi_h_pvs_prime_power_result_selected_power_repeat + S (p) = S ((S (bpvi_i_pvs_prime_power_result_selected_power)) * bpvi_c_pvs_prime_power_result_selected_power)) /\ exists bpvi_q_pvs_prime_power_result_selected_power_repeat. bpvi_b_pvs_prime_power_result_selected_power = bpvi_q_pvs_prime_power_result_selected_power_repeat * S ((S (bpvi_i_pvs_prime_power_result_selected_power)) * bpvi_c_pvs_prime_power_result_selected_power) + (p)))) /\ (exists bpvi_u_pvs_prime_power_result_selected_power bpvi_v_pvs_prime_power_result_selected_power. ((((exists bpvi_h_pvs_prime_power_result_selected_power_start. bpvi_h_pvs_prime_power_result_selected_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_prime_power_result_selected_power)) /\ exists bpvi_q_pvs_prime_power_result_selected_power_start. bpvi_u_pvs_prime_power_result_selected_power = bpvi_q_pvs_prime_power_result_selected_power_start * S ((S (0)) * bpvi_v_pvs_prime_power_result_selected_power) + (1))) /\ ((((exists bpvi_h_pvs_prime_power_result_selected_power_terminal. bpvi_h_pvs_prime_power_result_selected_power_terminal + S (bpvi_result_pvs_prime_power_result_selected) = S ((S (e)) * bpvi_v_pvs_prime_power_result_selected_power)) /\ exists bpvi_q_pvs_prime_power_result_selected_power_terminal. bpvi_u_pvs_prime_power_result_selected_power = bpvi_q_pvs_prime_power_result_selected_power_terminal * S ((S (e)) * bpvi_v_pvs_prime_power_result_selected_power) + (bpvi_result_pvs_prime_power_result_selected))) /\ forall bpvi_j_pvs_prime_power_result_selected_power. (exists bpvi_product_gap_pvs_prime_power_result_selected_power. bpvi_product_gap_pvs_prime_power_result_selected_power + S bpvi_j_pvs_prime_power_result_selected_power = e) -> exists bpvi_factor_pvs_prime_power_result_selected_power bpvi_partial_pvs_prime_power_result_selected_power bpvi_successor_pvs_prime_power_result_selected_power. ((((exists bpvi_h_pvs_prime_power_result_selected_power_factor. bpvi_h_pvs_prime_power_result_selected_power_factor + S (bpvi_factor_pvs_prime_power_result_selected_power) = S ((S (bpvi_j_pvs_prime_power_result_selected_power)) * bpvi_c_pvs_prime_power_result_selected_power)) /\ exists bpvi_q_pvs_prime_power_result_selected_power_factor. bpvi_b_pvs_prime_power_result_selected_power = bpvi_q_pvs_prime_power_result_selected_power_factor * S ((S (bpvi_j_pvs_prime_power_result_selected_power)) * bpvi_c_pvs_prime_power_result_selected_power) + (bpvi_factor_pvs_prime_power_result_selected_power))) /\ ((((exists bpvi_h_pvs_prime_power_result_selected_power_partial. bpvi_h_pvs_prime_power_result_selected_power_partial + S (bpvi_partial_pvs_prime_power_result_selected_power) = S ((S (bpvi_j_pvs_prime_power_result_selected_power)) * bpvi_v_pvs_prime_power_result_selected_power)) /\ exists bpvi_q_pvs_prime_power_result_selected_power_partial. bpvi_u_pvs_prime_power_result_selected_power = bpvi_q_pvs_prime_power_result_selected_power_partial * S ((S (bpvi_j_pvs_prime_power_result_selected_power)) * bpvi_v_pvs_prime_power_result_selected_power) + (bpvi_partial_pvs_prime_power_result_selected_power))) /\ ((((exists bpvi_h_pvs_prime_power_result_selected_power_successor. bpvi_h_pvs_prime_power_result_selected_power_successor + S (bpvi_successor_pvs_prime_power_result_selected_power) = S ((S (S bpvi_j_pvs_prime_power_result_selected_power)) * bpvi_v_pvs_prime_power_result_selected_power)) /\ exists bpvi_q_pvs_prime_power_result_selected_power_successor. bpvi_u_pvs_prime_power_result_selected_power = bpvi_q_pvs_prime_power_result_selected_power_successor * S ((S (S bpvi_j_pvs_prime_power_result_selected_power)) * bpvi_v_pvs_prime_power_result_selected_power) + (bpvi_successor_pvs_prime_power_result_selected_power))) /\ bpvi_successor_pvs_prime_power_result_selected_power = bpvi_partial_pvs_prime_power_result_selected_power * bpvi_factor_pvs_prime_power_result_selected_power)))))))) /\ exists bpvi_divisor_factor_pvs_prime_power_result_selected. P = bpvi_result_pvs_prime_power_result_selected * bpvi_divisor_factor_pvs_prime_power_result_selected))) /\ forall bpd_candidate_pvs_prime_power_result. (exists bpd_gap_pvs_prime_power_result_candidate_bound. bpd_gap_pvs_prime_power_result_candidate_bound + (bpd_candidate_pvs_prime_power_result) = (P)) -> (exists bpvi_result_pvs_prime_power_result_candidate. ((exists bpvi_b_pvs_prime_power_result_candidate_power bpvi_c_pvs_prime_power_result_candidate_power. ((forall bpvi_i_pvs_prime_power_result_candidate_power. (exists bpvi_repeat_gap_pvs_prime_power_result_candidate_power. bpvi_repeat_gap_pvs_prime_power_result_candidate_power + S bpvi_i_pvs_prime_power_result_candidate_power = bpd_candidate_pvs_prime_power_result) -> (((exists bpvi_h_pvs_prime_power_result_candidate_power_repeat. bpvi_h_pvs_prime_power_result_candidate_power_repeat + S (p) = S ((S (bpvi_i_pvs_prime_power_result_candidate_power)) * bpvi_c_pvs_prime_power_result_candidate_power)) /\ exists bpvi_q_pvs_prime_power_result_candidate_power_repeat. bpvi_b_pvs_prime_power_result_candidate_power = bpvi_q_pvs_prime_power_result_candidate_power_repeat * S ((S (bpvi_i_pvs_prime_power_result_candidate_power)) * bpvi_c_pvs_prime_power_result_candidate_power) + (p)))) /\ (exists bpvi_u_pvs_prime_power_result_candidate_power bpvi_v_pvs_prime_power_result_candidate_power. ((((exists bpvi_h_pvs_prime_power_result_candidate_power_start. bpvi_h_pvs_prime_power_result_candidate_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_prime_power_result_candidate_power)) /\ exists bpvi_q_pvs_prime_power_result_candidate_power_start. bpvi_u_pvs_prime_power_result_candidate_power = bpvi_q_pvs_prime_power_result_candidate_power_start * S ((S (0)) * bpvi_v_pvs_prime_power_result_candidate_power) + (1))) /\ ((((exists bpvi_h_pvs_prime_power_result_candidate_power_terminal. bpvi_h_pvs_prime_power_result_candidate_power_terminal + S (bpvi_result_pvs_prime_power_result_candidate) = S ((S (bpd_candidate_pvs_prime_power_result)) * bpvi_v_pvs_prime_power_result_candidate_power)) /\ exists bpvi_q_pvs_prime_power_result_candidate_power_terminal. bpvi_u_pvs_prime_power_result_candidate_power = bpvi_q_pvs_prime_power_result_candidate_power_terminal * S ((S (bpd_candidate_pvs_prime_power_result)) * bpvi_v_pvs_prime_power_result_candidate_power) + (bpvi_result_pvs_prime_power_result_candidate))) /\ forall bpvi_j_pvs_prime_power_result_candidate_power. (exists bpvi_product_gap_pvs_prime_power_result_candidate_power. bpvi_product_gap_pvs_prime_power_result_candidate_power + S bpvi_j_pvs_prime_power_result_candidate_power = bpd_candidate_pvs_prime_power_result) -> exists bpvi_factor_pvs_prime_power_result_candidate_power bpvi_partial_pvs_prime_power_result_candidate_power bpvi_successor_pvs_prime_power_result_candidate_power. ((((exists bpvi_h_pvs_prime_power_result_candidate_power_factor. bpvi_h_pvs_prime_power_result_candidate_power_factor + S (bpvi_factor_pvs_prime_power_result_candidate_power) = S ((S (bpvi_j_pvs_prime_power_result_candidate_power)) * bpvi_c_pvs_prime_power_result_candidate_power)) /\ exists bpvi_q_pvs_prime_power_result_candidate_power_factor. bpvi_b_pvs_prime_power_result_candidate_power = bpvi_q_pvs_prime_power_result_candidate_power_factor * S ((S (bpvi_j_pvs_prime_power_result_candidate_power)) * bpvi_c_pvs_prime_power_result_candidate_power) + (bpvi_factor_pvs_prime_power_result_candidate_power))) /\ ((((exists bpvi_h_pvs_prime_power_result_candidate_power_partial. bpvi_h_pvs_prime_power_result_candidate_power_partial + S (bpvi_partial_pvs_prime_power_result_candidate_power) = S ((S (bpvi_j_pvs_prime_power_result_candidate_power)) * bpvi_v_pvs_prime_power_result_candidate_power)) /\ exists bpvi_q_pvs_prime_power_result_candidate_power_partial. bpvi_u_pvs_prime_power_result_candidate_power = bpvi_q_pvs_prime_power_result_candidate_power_partial * S ((S (bpvi_j_pvs_prime_power_result_candidate_power)) * bpvi_v_pvs_prime_power_result_candidate_power) + (bpvi_partial_pvs_prime_power_result_candidate_power))) /\ ((((exists bpvi_h_pvs_prime_power_result_candidate_power_successor. bpvi_h_pvs_prime_power_result_candidate_power_successor + S (bpvi_successor_pvs_prime_power_result_candidate_power) = S ((S (S bpvi_j_pvs_prime_power_result_candidate_power)) * bpvi_v_pvs_prime_power_result_candidate_power)) /\ exists bpvi_q_pvs_prime_power_result_candidate_power_successor. bpvi_u_pvs_prime_power_result_candidate_power = bpvi_q_pvs_prime_power_result_candidate_power_successor * S ((S (S bpvi_j_pvs_prime_power_result_candidate_power)) * bpvi_v_pvs_prime_power_result_candidate_power) + (bpvi_successor_pvs_prime_power_result_candidate_power))) /\ bpvi_successor_pvs_prime_power_result_candidate_power = bpvi_partial_pvs_prime_power_result_candidate_power * bpvi_factor_pvs_prime_power_result_candidate_power)))))))) /\ exists bpvi_divisor_factor_pvs_prime_power_result_candidate. P = bpvi_result_pvs_prime_power_result_candidate * bpvi_divisor_factor_pvs_prime_power_result_candidate)) -> (exists bpd_gap_pvs_prime_power_result_maximal. bpd_gap_pvs_prime_power_result_maximal + (bpd_candidate_pvs_prime_power_result) = (e)))Constructive proof overview
Generated structural guide
The actual e-th power of a prime has exactly valuation e, including exponent zero.
The unchanged tactic script uses 5 declared prerequisites and contains 27 exact native proof lines.
Alpha v34 checked-use · first admitted v29 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
prime_valuation_exponent_eq_transport Alpha theorem; checked-use authorized prime_power_valuation_pow Alpha theorem; checked-use authorized prime_nonzero Stable theorem; checked-use authorized EL0017 lte_prime_self_valuation mul_one Stable theorem; checked-use authorizedDirect dependents
Formal native tactic body
Dependencies are introduced as named hypotheses before line 1. Local theorem links identify exact declared prerequisites. This exact body belongs to a complete independently kernel-checked constructive proof bundle and has Alpha checked-use authority; it does not imply Stable membership.
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 (1)
01Fix variables and assumptionsL1–5
02Use earlier factsL6–15
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L6
specialize prime_valuation_exponent_eq_transport (p) - L7
specialize prime_valuation_exponent_eq_transport (P) - L8
specialize prime_valuation_exponent_eq_transport (e * 1) - L9
specialize prime_valuation_exponent_eq_transport (e) - L10
apply prime_valuation_exponent_eq_transport - L11
apply mul_one - L12
specialize prime_power_valuation_pow (p) - L13
specialize prime_power_valuation_pow (p) - L14
specialize prime_power_valuation_pow (e) - L15
specialize prime_power_valuation_pow (1)
03Use earlier factsL16–18
04Fix variables and assumptionsL19–19
Work with arbitrary variables or the premises of the current implication.
- L19
intro hz
Original exact command ledger · 27 lines
- 0001
intro p - 0002
intro e - 0003
intro P - 0004
intro hp - 0005
intro hpow - 0006
specialize prime_valuation_exponent_eq_transport (p) - 0007
specialize prime_valuation_exponent_eq_transport (P) - 0008
specialize prime_valuation_exponent_eq_transport (e * 1) - 0009
specialize prime_valuation_exponent_eq_transport (e) - 0010
apply prime_valuation_exponent_eq_transport - 0011
apply mul_one - 0012
specialize prime_power_valuation_pow (p) - 0013
specialize prime_power_valuation_pow (p) - 0014
specialize prime_power_valuation_pow (e) - 0015
specialize prime_power_valuation_pow (1) - 0016
specialize prime_power_valuation_pow (P) - 0017
apply prime_power_valuation_pow - 0018
exact hp - 0019
intro hz - 0020
specialize prime_nonzero (p) - 0021
apply prime_nonzero - 0022
exact hp - 0023
exact hz - 0024
specialize lte_prime_self_valuation (p) - 0025
apply lte_prime_self_valuation - 0026
exact hp - 0027
exact hpow