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 PA statement
forall p a e f. (((exists bpv_gap_functional_left_exponent_bound. bpv_gap_functional_left_exponent_bound + e = a) /\ (exists bpv_result_functional_left_selected. ((exists ff_b_functional_left_selected_power ff_c_functional_left_selected_power. ((forall ff_i_functional_left_selected_power_repeat. (exists ff_lt_functional_left_selected_power_repeat_bound. ff_lt_functional_left_selected_power_repeat_bound + S ff_i_functional_left_selected_power_repeat = e) -> (((exists ff_h_functional_left_selected_power_repeat_decoded. ff_h_functional_left_selected_power_repeat_decoded + S (p) = S ((S (ff_i_functional_left_selected_power_repeat)) * ff_c_functional_left_selected_power)) /\ exists ff_q_functional_left_selected_power_repeat_decoded. ff_b_functional_left_selected_power = ff_q_functional_left_selected_power_repeat_decoded * S ((S (ff_i_functional_left_selected_power_repeat)) * ff_c_functional_left_selected_power) + (p)))) /\ (exists ff_u_functional_left_selected_power_product ff_v_functional_left_selected_power_product. ((((exists ff_h_functional_left_selected_power_product_start. ff_h_functional_left_selected_power_product_start + S (1) = S ((S (0)) * ff_v_functional_left_selected_power_product)) /\ exists ff_q_functional_left_selected_power_product_start. ff_u_functional_left_selected_power_product = ff_q_functional_left_selected_power_product_start * S ((S (0)) * ff_v_functional_left_selected_power_product) + (1))) /\ ((((exists ff_h_functional_left_selected_power_product_terminal. ff_h_functional_left_selected_power_product_terminal + S (bpv_result_functional_left_selected) = S ((S (e)) * ff_v_functional_left_selected_power_product)) /\ exists ff_q_functional_left_selected_power_product_terminal. ff_u_functional_left_selected_power_product = ff_q_functional_left_selected_power_product_terminal * S ((S (e)) * ff_v_functional_left_selected_power_product) + (bpv_result_functional_left_selected))) /\ forall ff_i_functional_left_selected_power_product. (exists ff_lt_functional_left_selected_power_product_bound. ff_lt_functional_left_selected_power_product_bound + S ff_i_functional_left_selected_power_product = e) -> exists ff_p_functional_left_selected_power_product ff_r_functional_left_selected_power_product ff_s_functional_left_selected_power_product. ((((exists ff_h_functional_left_selected_power_product_factor. ff_h_functional_left_selected_power_product_factor + S (ff_p_functional_left_selected_power_product) = S ((S (ff_i_functional_left_selected_power_product)) * ff_c_functional_left_selected_power)) /\ exists ff_q_functional_left_selected_power_product_factor. ff_b_functional_left_selected_power = ff_q_functional_left_selected_power_product_factor * S ((S (ff_i_functional_left_selected_power_product)) * ff_c_functional_left_selected_power) + (ff_p_functional_left_selected_power_product))) /\ ((((exists ff_h_functional_left_selected_power_product_partial. ff_h_functional_left_selected_power_product_partial + S (ff_r_functional_left_selected_power_product) = S ((S (ff_i_functional_left_selected_power_product)) * ff_v_functional_left_selected_power_product)) /\ exists ff_q_functional_left_selected_power_product_partial. ff_u_functional_left_selected_power_product = ff_q_functional_left_selected_power_product_partial * S ((S (ff_i_functional_left_selected_power_product)) * ff_v_functional_left_selected_power_product) + (ff_r_functional_left_selected_power_product))) /\ ((((exists ff_h_functional_left_selected_power_product_successor. ff_h_functional_left_selected_power_product_successor + S (ff_s_functional_left_selected_power_product) = S ((S (S ff_i_functional_left_selected_power_product)) * ff_v_functional_left_selected_power_product)) /\ exists ff_q_functional_left_selected_power_product_successor. ff_u_functional_left_selected_power_product = ff_q_functional_left_selected_power_product_successor * S ((S (S ff_i_functional_left_selected_power_product)) * ff_v_functional_left_selected_power_product) + (ff_s_functional_left_selected_power_product))) /\ ff_s_functional_left_selected_power_product = ff_r_functional_left_selected_power_product * ff_p_functional_left_selected_power_product)))))))) /\ (exists bpv_factor_functional_left_selected_divides. a = bpv_result_functional_left_selected * bpv_factor_functional_left_selected_divides)))) /\ forall bpv_candidate_functional_left. (exists bpv_gap_functional_left_candidate_bound. bpv_gap_functional_left_candidate_bound + bpv_candidate_functional_left = a) -> (exists bpv_result_functional_left_candidate. ((exists ff_b_functional_left_candidate_power ff_c_functional_left_candidate_power. ((forall ff_i_functional_left_candidate_power_repeat. (exists ff_lt_functional_left_candidate_power_repeat_bound. ff_lt_functional_left_candidate_power_repeat_bound + S ff_i_functional_left_candidate_power_repeat = bpv_candidate_functional_left) -> (((exists ff_h_functional_left_candidate_power_repeat_decoded. ff_h_functional_left_candidate_power_repeat_decoded + S (p) = S ((S (ff_i_functional_left_candidate_power_repeat)) * ff_c_functional_left_candidate_power)) /\ exists ff_q_functional_left_candidate_power_repeat_decoded. ff_b_functional_left_candidate_power = ff_q_functional_left_candidate_power_repeat_decoded * S ((S (ff_i_functional_left_candidate_power_repeat)) * ff_c_functional_left_candidate_power) + (p)))) /\ (exists ff_u_functional_left_candidate_power_product ff_v_functional_left_candidate_power_product. ((((exists ff_h_functional_left_candidate_power_product_start. ff_h_functional_left_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_functional_left_candidate_power_product)) /\ exists ff_q_functional_left_candidate_power_product_start. ff_u_functional_left_candidate_power_product = ff_q_functional_left_candidate_power_product_start * S ((S (0)) * ff_v_functional_left_candidate_power_product) + (1))) /\ ((((exists ff_h_functional_left_candidate_power_product_terminal. ff_h_functional_left_candidate_power_product_terminal + S (bpv_result_functional_left_candidate) = S ((S (bpv_candidate_functional_left)) * ff_v_functional_left_candidate_power_product)) /\ exists ff_q_functional_left_candidate_power_product_terminal. ff_u_functional_left_candidate_power_product = ff_q_functional_left_candidate_power_product_terminal * S ((S (bpv_candidate_functional_left)) * ff_v_functional_left_candidate_power_product) + (bpv_result_functional_left_candidate))) /\ forall ff_i_functional_left_candidate_power_product. (exists ff_lt_functional_left_candidate_power_product_bound. ff_lt_functional_left_candidate_power_product_bound + S ff_i_functional_left_candidate_power_product = bpv_candidate_functional_left) -> exists ff_p_functional_left_candidate_power_product ff_r_functional_left_candidate_power_product ff_s_functional_left_candidate_power_product. ((((exists ff_h_functional_left_candidate_power_product_factor. ff_h_functional_left_candidate_power_product_factor + S (ff_p_functional_left_candidate_power_product) = S ((S (ff_i_functional_left_candidate_power_product)) * ff_c_functional_left_candidate_power)) /\ exists ff_q_functional_left_candidate_power_product_factor. ff_b_functional_left_candidate_power = ff_q_functional_left_candidate_power_product_factor * S ((S (ff_i_functional_left_candidate_power_product)) * ff_c_functional_left_candidate_power) + (ff_p_functional_left_candidate_power_product))) /\ ((((exists ff_h_functional_left_candidate_power_product_partial. ff_h_functional_left_candidate_power_product_partial + S (ff_r_functional_left_candidate_power_product) = S ((S (ff_i_functional_left_candidate_power_product)) * ff_v_functional_left_candidate_power_product)) /\ exists ff_q_functional_left_candidate_power_product_partial. ff_u_functional_left_candidate_power_product = ff_q_functional_left_candidate_power_product_partial * S ((S (ff_i_functional_left_candidate_power_product)) * ff_v_functional_left_candidate_power_product) + (ff_r_functional_left_candidate_power_product))) /\ ((((exists ff_h_functional_left_candidate_power_product_successor. ff_h_functional_left_candidate_power_product_successor + S (ff_s_functional_left_candidate_power_product) = S ((S (S ff_i_functional_left_candidate_power_product)) * ff_v_functional_left_candidate_power_product)) /\ exists ff_q_functional_left_candidate_power_product_successor. ff_u_functional_left_candidate_power_product = ff_q_functional_left_candidate_power_product_successor * S ((S (S ff_i_functional_left_candidate_power_product)) * ff_v_functional_left_candidate_power_product) + (ff_s_functional_left_candidate_power_product))) /\ ff_s_functional_left_candidate_power_product = ff_r_functional_left_candidate_power_product * ff_p_functional_left_candidate_power_product)))))))) /\ (exists bpv_factor_functional_left_candidate_divides. a = bpv_result_functional_left_candidate * bpv_factor_functional_left_candidate_divides))) -> (exists bpv_gap_functional_left_maximal. bpv_gap_functional_left_maximal + bpv_candidate_functional_left = e)) -> (((exists bpv_gap_functional_right_exponent_bound. bpv_gap_functional_right_exponent_bound + f = a) /\ (exists bpv_result_functional_right_selected. ((exists ff_b_functional_right_selected_power ff_c_functional_right_selected_power. ((forall ff_i_functional_right_selected_power_repeat. (exists ff_lt_functional_right_selected_power_repeat_bound. ff_lt_functional_right_selected_power_repeat_bound + S ff_i_functional_right_selected_power_repeat = f) -> (((exists ff_h_functional_right_selected_power_repeat_decoded. ff_h_functional_right_selected_power_repeat_decoded + S (p) = S ((S (ff_i_functional_right_selected_power_repeat)) * ff_c_functional_right_selected_power)) /\ exists ff_q_functional_right_selected_power_repeat_decoded. ff_b_functional_right_selected_power = ff_q_functional_right_selected_power_repeat_decoded * S ((S (ff_i_functional_right_selected_power_repeat)) * ff_c_functional_right_selected_power) + (p)))) /\ (exists ff_u_functional_right_selected_power_product ff_v_functional_right_selected_power_product. ((((exists ff_h_functional_right_selected_power_product_start. ff_h_functional_right_selected_power_product_start + S (1) = S ((S (0)) * ff_v_functional_right_selected_power_product)) /\ exists ff_q_functional_right_selected_power_product_start. ff_u_functional_right_selected_power_product = ff_q_functional_right_selected_power_product_start * S ((S (0)) * ff_v_functional_right_selected_power_product) + (1))) /\ ((((exists ff_h_functional_right_selected_power_product_terminal. ff_h_functional_right_selected_power_product_terminal + S (bpv_result_functional_right_selected) = S ((S (f)) * ff_v_functional_right_selected_power_product)) /\ exists ff_q_functional_right_selected_power_product_terminal. ff_u_functional_right_selected_power_product = ff_q_functional_right_selected_power_product_terminal * S ((S (f)) * ff_v_functional_right_selected_power_product) + (bpv_result_functional_right_selected))) /\ forall ff_i_functional_right_selected_power_product. (exists ff_lt_functional_right_selected_power_product_bound. ff_lt_functional_right_selected_power_product_bound + S ff_i_functional_right_selected_power_product = f) -> exists ff_p_functional_right_selected_power_product ff_r_functional_right_selected_power_product ff_s_functional_right_selected_power_product. ((((exists ff_h_functional_right_selected_power_product_factor. ff_h_functional_right_selected_power_product_factor + S (ff_p_functional_right_selected_power_product) = S ((S (ff_i_functional_right_selected_power_product)) * ff_c_functional_right_selected_power)) /\ exists ff_q_functional_right_selected_power_product_factor. ff_b_functional_right_selected_power = ff_q_functional_right_selected_power_product_factor * S ((S (ff_i_functional_right_selected_power_product)) * ff_c_functional_right_selected_power) + (ff_p_functional_right_selected_power_product))) /\ ((((exists ff_h_functional_right_selected_power_product_partial. ff_h_functional_right_selected_power_product_partial + S (ff_r_functional_right_selected_power_product) = S ((S (ff_i_functional_right_selected_power_product)) * ff_v_functional_right_selected_power_product)) /\ exists ff_q_functional_right_selected_power_product_partial. ff_u_functional_right_selected_power_product = ff_q_functional_right_selected_power_product_partial * S ((S (ff_i_functional_right_selected_power_product)) * ff_v_functional_right_selected_power_product) + (ff_r_functional_right_selected_power_product))) /\ ((((exists ff_h_functional_right_selected_power_product_successor. ff_h_functional_right_selected_power_product_successor + S (ff_s_functional_right_selected_power_product) = S ((S (S ff_i_functional_right_selected_power_product)) * ff_v_functional_right_selected_power_product)) /\ exists ff_q_functional_right_selected_power_product_successor. ff_u_functional_right_selected_power_product = ff_q_functional_right_selected_power_product_successor * S ((S (S ff_i_functional_right_selected_power_product)) * ff_v_functional_right_selected_power_product) + (ff_s_functional_right_selected_power_product))) /\ ff_s_functional_right_selected_power_product = ff_r_functional_right_selected_power_product * ff_p_functional_right_selected_power_product)))))))) /\ (exists bpv_factor_functional_right_selected_divides. a = bpv_result_functional_right_selected * bpv_factor_functional_right_selected_divides)))) /\ forall bpv_candidate_functional_right. (exists bpv_gap_functional_right_candidate_bound. bpv_gap_functional_right_candidate_bound + bpv_candidate_functional_right = a) -> (exists bpv_result_functional_right_candidate. ((exists ff_b_functional_right_candidate_power ff_c_functional_right_candidate_power. ((forall ff_i_functional_right_candidate_power_repeat. (exists ff_lt_functional_right_candidate_power_repeat_bound. ff_lt_functional_right_candidate_power_repeat_bound + S ff_i_functional_right_candidate_power_repeat = bpv_candidate_functional_right) -> (((exists ff_h_functional_right_candidate_power_repeat_decoded. ff_h_functional_right_candidate_power_repeat_decoded + S (p) = S ((S (ff_i_functional_right_candidate_power_repeat)) * ff_c_functional_right_candidate_power)) /\ exists ff_q_functional_right_candidate_power_repeat_decoded. ff_b_functional_right_candidate_power = ff_q_functional_right_candidate_power_repeat_decoded * S ((S (ff_i_functional_right_candidate_power_repeat)) * ff_c_functional_right_candidate_power) + (p)))) /\ (exists ff_u_functional_right_candidate_power_product ff_v_functional_right_candidate_power_product. ((((exists ff_h_functional_right_candidate_power_product_start. ff_h_functional_right_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_functional_right_candidate_power_product)) /\ exists ff_q_functional_right_candidate_power_product_start. ff_u_functional_right_candidate_power_product = ff_q_functional_right_candidate_power_product_start * S ((S (0)) * ff_v_functional_right_candidate_power_product) + (1))) /\ ((((exists ff_h_functional_right_candidate_power_product_terminal. ff_h_functional_right_candidate_power_product_terminal + S (bpv_result_functional_right_candidate) = S ((S (bpv_candidate_functional_right)) * ff_v_functional_right_candidate_power_product)) /\ exists ff_q_functional_right_candidate_power_product_terminal. ff_u_functional_right_candidate_power_product = ff_q_functional_right_candidate_power_product_terminal * S ((S (bpv_candidate_functional_right)) * ff_v_functional_right_candidate_power_product) + (bpv_result_functional_right_candidate))) /\ forall ff_i_functional_right_candidate_power_product. (exists ff_lt_functional_right_candidate_power_product_bound. ff_lt_functional_right_candidate_power_product_bound + S ff_i_functional_right_candidate_power_product = bpv_candidate_functional_right) -> exists ff_p_functional_right_candidate_power_product ff_r_functional_right_candidate_power_product ff_s_functional_right_candidate_power_product. ((((exists ff_h_functional_right_candidate_power_product_factor. ff_h_functional_right_candidate_power_product_factor + S (ff_p_functional_right_candidate_power_product) = S ((S (ff_i_functional_right_candidate_power_product)) * ff_c_functional_right_candidate_power)) /\ exists ff_q_functional_right_candidate_power_product_factor. ff_b_functional_right_candidate_power = ff_q_functional_right_candidate_power_product_factor * S ((S (ff_i_functional_right_candidate_power_product)) * ff_c_functional_right_candidate_power) + (ff_p_functional_right_candidate_power_product))) /\ ((((exists ff_h_functional_right_candidate_power_product_partial. ff_h_functional_right_candidate_power_product_partial + S (ff_r_functional_right_candidate_power_product) = S ((S (ff_i_functional_right_candidate_power_product)) * ff_v_functional_right_candidate_power_product)) /\ exists ff_q_functional_right_candidate_power_product_partial. ff_u_functional_right_candidate_power_product = ff_q_functional_right_candidate_power_product_partial * S ((S (ff_i_functional_right_candidate_power_product)) * ff_v_functional_right_candidate_power_product) + (ff_r_functional_right_candidate_power_product))) /\ ((((exists ff_h_functional_right_candidate_power_product_successor. ff_h_functional_right_candidate_power_product_successor + S (ff_s_functional_right_candidate_power_product) = S ((S (S ff_i_functional_right_candidate_power_product)) * ff_v_functional_right_candidate_power_product)) /\ exists ff_q_functional_right_candidate_power_product_successor. ff_u_functional_right_candidate_power_product = ff_q_functional_right_candidate_power_product_successor * S ((S (S ff_i_functional_right_candidate_power_product)) * ff_v_functional_right_candidate_power_product) + (ff_s_functional_right_candidate_power_product))) /\ ff_s_functional_right_candidate_power_product = ff_r_functional_right_candidate_power_product * ff_p_functional_right_candidate_power_product)))))))) /\ (exists bpv_factor_functional_right_candidate_divides. a = bpv_result_functional_right_candidate * bpv_factor_functional_right_candidate_divides))) -> (exists bpv_gap_functional_right_maximal. bpv_gap_functional_right_maximal + bpv_candidate_functional_right = f)) -> e = fStructural proof guide
Canonical bounded power valuations have a unique exponent.
Direct prerequisites: le_antisymm. The authored body proceeds by case analysis (4), intermediate claims (2).
Proof neighborhood
Direct dependencies
Direct dependents
Formal native tactic body
Dependencies are hypotheses of the historical Alpha-v12 body receipt. The complete historical Alpha-v18 proof bundle independently checks every dependency; current Alpha v25 preserves that checked theorem use without changing 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–6
02Separate the logical casesL7–10
03Establish hefL11–15
04Establish hfeL16–25
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply he right.
Original exact command ledger · 25 lines
- 0001
intro p - 0002
intro a - 0003
intro e - 0004
intro f - 0005
intro he - 0006
intro hf - 0007
cases he - 0008
cases he_left - 0009
cases hf - 0010
cases hf_left - 0011
have hef : e <= f - 0012
specialize hf_right e - 0013
apply hf_right - 0014
exact he_left_left - 0015
exact he_left_right - 0016
have hfe : f <= e - 0017
specialize he_right f - 0018
apply he_right - 0019
exact hf_left_left - 0020
exact hf_left_right - 0021
specialize le_antisymm e - 0022
specialize le_antisymm f - 0023
apply le_antisymm - 0024
exact hef - 0025
exact hfe