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.
Statement with defined notation
∀ p. ∀ a. ∀ f. ∀ i. ∀ bit. Prime(p) → ¬a = 0 → PowerValuation(p,a,f) → bit = 1 ∧ Lt(i,f) ∨ bit = 0 ∧ Lt(f,S i) → bit = 1 ∧ PowerDivides(p,S i,a) ∨ bit = 0 ∧ ¬PowerDivides(p,S i,a)Every purple notation token opens its conservative definition. Expanding the displayed statement recovers the exact first-order Peano-arithmetic formula checked by the unchanged kernel.
Definitions used by this theorem
In the theorem statement
6 occurrences
In local proof propositions
1 occurrences
Exact expanded native-PA statement
forall p a f i bit. ((~(p = 1) /\ forall frm_prime_left_legendre_successor_prime frm_prime_right_legendre_successor_prime. p = frm_prime_left_legendre_successor_prime * frm_prime_right_legendre_successor_prime -> frm_prime_left_legendre_successor_prime = 1 \/ frm_prime_right_legendre_successor_prime = 1)) -> ~(a = 0) -> (((exists bpv_gap_legendre_successor_threshold_valuation_exponent_bound. bpv_gap_legendre_successor_threshold_valuation_exponent_bound + f = a) /\ (exists bpv_result_legendre_successor_threshold_valuation_selected. ((exists ff_b_legendre_successor_threshold_valuation_selected_power ff_c_legendre_successor_threshold_valuation_selected_power. ((forall ff_i_legendre_successor_threshold_valuation_selected_power_repeat. (exists ff_lt_legendre_successor_threshold_valuation_selected_power_repeat_bound. ff_lt_legendre_successor_threshold_valuation_selected_power_repeat_bound + S ff_i_legendre_successor_threshold_valuation_selected_power_repeat = f) -> (((exists ff_h_legendre_successor_threshold_valuation_selected_power_repeat_decoded. ff_h_legendre_successor_threshold_valuation_selected_power_repeat_decoded + S (p) = S ((S (ff_i_legendre_successor_threshold_valuation_selected_power_repeat)) * ff_c_legendre_successor_threshold_valuation_selected_power)) /\ exists ff_q_legendre_successor_threshold_valuation_selected_power_repeat_decoded. ff_b_legendre_successor_threshold_valuation_selected_power = ff_q_legendre_successor_threshold_valuation_selected_power_repeat_decoded * S ((S (ff_i_legendre_successor_threshold_valuation_selected_power_repeat)) * ff_c_legendre_successor_threshold_valuation_selected_power) + (p)))) /\ (exists ff_u_legendre_successor_threshold_valuation_selected_power_product ff_v_legendre_successor_threshold_valuation_selected_power_product. ((((exists ff_h_legendre_successor_threshold_valuation_selected_power_product_start. ff_h_legendre_successor_threshold_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_legendre_successor_threshold_valuation_selected_power_product)) /\ exists ff_q_legendre_successor_threshold_valuation_selected_power_product_start. ff_u_legendre_successor_threshold_valuation_selected_power_product = ff_q_legendre_successor_threshold_valuation_selected_power_product_start * S ((S (0)) * ff_v_legendre_successor_threshold_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_legendre_successor_threshold_valuation_selected_power_product_terminal. ff_h_legendre_successor_threshold_valuation_selected_power_product_terminal + S (bpv_result_legendre_successor_threshold_valuation_selected) = S ((S (f)) * ff_v_legendre_successor_threshold_valuation_selected_power_product)) /\ exists ff_q_legendre_successor_threshold_valuation_selected_power_product_terminal. ff_u_legendre_successor_threshold_valuation_selected_power_product = ff_q_legendre_successor_threshold_valuation_selected_power_product_terminal * S ((S (f)) * ff_v_legendre_successor_threshold_valuation_selected_power_product) + (bpv_result_legendre_successor_threshold_valuation_selected))) /\ forall ff_i_legendre_successor_threshold_valuation_selected_power_product. (exists ff_lt_legendre_successor_threshold_valuation_selected_power_product_bound. ff_lt_legendre_successor_threshold_valuation_selected_power_product_bound + S ff_i_legendre_successor_threshold_valuation_selected_power_product = f) -> exists ff_p_legendre_successor_threshold_valuation_selected_power_product ff_r_legendre_successor_threshold_valuation_selected_power_product ff_s_legendre_successor_threshold_valuation_selected_power_product. ((((exists ff_h_legendre_successor_threshold_valuation_selected_power_product_factor. ff_h_legendre_successor_threshold_valuation_selected_power_product_factor + S (ff_p_legendre_successor_threshold_valuation_selected_power_product) = S ((S (ff_i_legendre_successor_threshold_valuation_selected_power_product)) * ff_c_legendre_successor_threshold_valuation_selected_power)) /\ exists ff_q_legendre_successor_threshold_valuation_selected_power_product_factor. ff_b_legendre_successor_threshold_valuation_selected_power = ff_q_legendre_successor_threshold_valuation_selected_power_product_factor * S ((S (ff_i_legendre_successor_threshold_valuation_selected_power_product)) * ff_c_legendre_successor_threshold_valuation_selected_power) + (ff_p_legendre_successor_threshold_valuation_selected_power_product))) /\ ((((exists ff_h_legendre_successor_threshold_valuation_selected_power_product_partial. ff_h_legendre_successor_threshold_valuation_selected_power_product_partial + S (ff_r_legendre_successor_threshold_valuation_selected_power_product) = S ((S (ff_i_legendre_successor_threshold_valuation_selected_power_product)) * ff_v_legendre_successor_threshold_valuation_selected_power_product)) /\ exists ff_q_legendre_successor_threshold_valuation_selected_power_product_partial. ff_u_legendre_successor_threshold_valuation_selected_power_product = ff_q_legendre_successor_threshold_valuation_selected_power_product_partial * S ((S (ff_i_legendre_successor_threshold_valuation_selected_power_product)) * ff_v_legendre_successor_threshold_valuation_selected_power_product) + (ff_r_legendre_successor_threshold_valuation_selected_power_product))) /\ ((((exists ff_h_legendre_successor_threshold_valuation_selected_power_product_successor. ff_h_legendre_successor_threshold_valuation_selected_power_product_successor + S (ff_s_legendre_successor_threshold_valuation_selected_power_product) = S ((S (S ff_i_legendre_successor_threshold_valuation_selected_power_product)) * ff_v_legendre_successor_threshold_valuation_selected_power_product)) /\ exists ff_q_legendre_successor_threshold_valuation_selected_power_product_successor. ff_u_legendre_successor_threshold_valuation_selected_power_product = ff_q_legendre_successor_threshold_valuation_selected_power_product_successor * S ((S (S ff_i_legendre_successor_threshold_valuation_selected_power_product)) * ff_v_legendre_successor_threshold_valuation_selected_power_product) + (ff_s_legendre_successor_threshold_valuation_selected_power_product))) /\ ff_s_legendre_successor_threshold_valuation_selected_power_product = ff_r_legendre_successor_threshold_valuation_selected_power_product * ff_p_legendre_successor_threshold_valuation_selected_power_product)))))))) /\ (exists bpv_factor_legendre_successor_threshold_valuation_selected_divides. a = bpv_result_legendre_successor_threshold_valuation_selected * bpv_factor_legendre_successor_threshold_valuation_selected_divides)))) /\ forall bpv_candidate_legendre_successor_threshold_valuation. (exists bpv_gap_legendre_successor_threshold_valuation_candidate_bound. bpv_gap_legendre_successor_threshold_valuation_candidate_bound + bpv_candidate_legendre_successor_threshold_valuation = a) -> (exists bpv_result_legendre_successor_threshold_valuation_candidate. ((exists ff_b_legendre_successor_threshold_valuation_candidate_power ff_c_legendre_successor_threshold_valuation_candidate_power. ((forall ff_i_legendre_successor_threshold_valuation_candidate_power_repeat. (exists ff_lt_legendre_successor_threshold_valuation_candidate_power_repeat_bound. ff_lt_legendre_successor_threshold_valuation_candidate_power_repeat_bound + S ff_i_legendre_successor_threshold_valuation_candidate_power_repeat = bpv_candidate_legendre_successor_threshold_valuation) -> (((exists ff_h_legendre_successor_threshold_valuation_candidate_power_repeat_decoded. ff_h_legendre_successor_threshold_valuation_candidate_power_repeat_decoded + S (p) = S ((S (ff_i_legendre_successor_threshold_valuation_candidate_power_repeat)) * ff_c_legendre_successor_threshold_valuation_candidate_power)) /\ exists ff_q_legendre_successor_threshold_valuation_candidate_power_repeat_decoded. ff_b_legendre_successor_threshold_valuation_candidate_power = ff_q_legendre_successor_threshold_valuation_candidate_power_repeat_decoded * S ((S (ff_i_legendre_successor_threshold_valuation_candidate_power_repeat)) * ff_c_legendre_successor_threshold_valuation_candidate_power) + (p)))) /\ (exists ff_u_legendre_successor_threshold_valuation_candidate_power_product ff_v_legendre_successor_threshold_valuation_candidate_power_product. ((((exists ff_h_legendre_successor_threshold_valuation_candidate_power_product_start. ff_h_legendre_successor_threshold_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_legendre_successor_threshold_valuation_candidate_power_product)) /\ exists ff_q_legendre_successor_threshold_valuation_candidate_power_product_start. ff_u_legendre_successor_threshold_valuation_candidate_power_product = ff_q_legendre_successor_threshold_valuation_candidate_power_product_start * S ((S (0)) * ff_v_legendre_successor_threshold_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_legendre_successor_threshold_valuation_candidate_power_product_terminal. ff_h_legendre_successor_threshold_valuation_candidate_power_product_terminal + S (bpv_result_legendre_successor_threshold_valuation_candidate) = S ((S (bpv_candidate_legendre_successor_threshold_valuation)) * ff_v_legendre_successor_threshold_valuation_candidate_power_product)) /\ exists ff_q_legendre_successor_threshold_valuation_candidate_power_product_terminal. ff_u_legendre_successor_threshold_valuation_candidate_power_product = ff_q_legendre_successor_threshold_valuation_candidate_power_product_terminal * S ((S (bpv_candidate_legendre_successor_threshold_valuation)) * ff_v_legendre_successor_threshold_valuation_candidate_power_product) + (bpv_result_legendre_successor_threshold_valuation_candidate))) /\ forall ff_i_legendre_successor_threshold_valuation_candidate_power_product. (exists ff_lt_legendre_successor_threshold_valuation_candidate_power_product_bound. ff_lt_legendre_successor_threshold_valuation_candidate_power_product_bound + S ff_i_legendre_successor_threshold_valuation_candidate_power_product = bpv_candidate_legendre_successor_threshold_valuation) -> exists ff_p_legendre_successor_threshold_valuation_candidate_power_product ff_r_legendre_successor_threshold_valuation_candidate_power_product ff_s_legendre_successor_threshold_valuation_candidate_power_product. ((((exists ff_h_legendre_successor_threshold_valuation_candidate_power_product_factor. ff_h_legendre_successor_threshold_valuation_candidate_power_product_factor + S (ff_p_legendre_successor_threshold_valuation_candidate_power_product) = S ((S (ff_i_legendre_successor_threshold_valuation_candidate_power_product)) * ff_c_legendre_successor_threshold_valuation_candidate_power)) /\ exists ff_q_legendre_successor_threshold_valuation_candidate_power_product_factor. ff_b_legendre_successor_threshold_valuation_candidate_power = ff_q_legendre_successor_threshold_valuation_candidate_power_product_factor * S ((S (ff_i_legendre_successor_threshold_valuation_candidate_power_product)) * ff_c_legendre_successor_threshold_valuation_candidate_power) + (ff_p_legendre_successor_threshold_valuation_candidate_power_product))) /\ ((((exists ff_h_legendre_successor_threshold_valuation_candidate_power_product_partial. ff_h_legendre_successor_threshold_valuation_candidate_power_product_partial + S (ff_r_legendre_successor_threshold_valuation_candidate_power_product) = S ((S (ff_i_legendre_successor_threshold_valuation_candidate_power_product)) * ff_v_legendre_successor_threshold_valuation_candidate_power_product)) /\ exists ff_q_legendre_successor_threshold_valuation_candidate_power_product_partial. ff_u_legendre_successor_threshold_valuation_candidate_power_product = ff_q_legendre_successor_threshold_valuation_candidate_power_product_partial * S ((S (ff_i_legendre_successor_threshold_valuation_candidate_power_product)) * ff_v_legendre_successor_threshold_valuation_candidate_power_product) + (ff_r_legendre_successor_threshold_valuation_candidate_power_product))) /\ ((((exists ff_h_legendre_successor_threshold_valuation_candidate_power_product_successor. ff_h_legendre_successor_threshold_valuation_candidate_power_product_successor + S (ff_s_legendre_successor_threshold_valuation_candidate_power_product) = S ((S (S ff_i_legendre_successor_threshold_valuation_candidate_power_product)) * ff_v_legendre_successor_threshold_valuation_candidate_power_product)) /\ exists ff_q_legendre_successor_threshold_valuation_candidate_power_product_successor. ff_u_legendre_successor_threshold_valuation_candidate_power_product = ff_q_legendre_successor_threshold_valuation_candidate_power_product_successor * S ((S (S ff_i_legendre_successor_threshold_valuation_candidate_power_product)) * ff_v_legendre_successor_threshold_valuation_candidate_power_product) + (ff_s_legendre_successor_threshold_valuation_candidate_power_product))) /\ ff_s_legendre_successor_threshold_valuation_candidate_power_product = ff_r_legendre_successor_threshold_valuation_candidate_power_product * ff_p_legendre_successor_threshold_valuation_candidate_power_product)))))))) /\ (exists bpv_factor_legendre_successor_threshold_valuation_candidate_divides. a = bpv_result_legendre_successor_threshold_valuation_candidate * bpv_factor_legendre_successor_threshold_valuation_candidate_divides))) -> (exists bpv_gap_legendre_successor_threshold_valuation_maximal. bpv_gap_legendre_successor_threshold_valuation_maximal + bpv_candidate_legendre_successor_threshold_valuation = f)) -> ((bit = 1 /\ (exists blsr_le_gap_legendre_successor_threshold_inside. blsr_le_gap_legendre_successor_threshold_inside + (S i) = (f))) \/ (bit = 0 /\ (exists blsr_lt_gap_legendre_successor_threshold_outside. blsr_lt_gap_legendre_successor_threshold_outside + S (f) = (S i)))) -> ((bit = 1 /\ (exists bpvi_result_legendre_successor_threshold_divides. ((exists bpvi_b_legendre_successor_threshold_divides_power bpvi_c_legendre_successor_threshold_divides_power. ((forall bpvi_i_legendre_successor_threshold_divides_power. (exists bpvi_repeat_gap_legendre_successor_threshold_divides_power. bpvi_repeat_gap_legendre_successor_threshold_divides_power + S bpvi_i_legendre_successor_threshold_divides_power = S i) -> (((exists bpvi_h_legendre_successor_threshold_divides_power_repeat. bpvi_h_legendre_successor_threshold_divides_power_repeat + S (p) = S ((S (bpvi_i_legendre_successor_threshold_divides_power)) * bpvi_c_legendre_successor_threshold_divides_power)) /\ exists bpvi_q_legendre_successor_threshold_divides_power_repeat. bpvi_b_legendre_successor_threshold_divides_power = bpvi_q_legendre_successor_threshold_divides_power_repeat * S ((S (bpvi_i_legendre_successor_threshold_divides_power)) * bpvi_c_legendre_successor_threshold_divides_power) + (p)))) /\ (exists bpvi_u_legendre_successor_threshold_divides_power bpvi_v_legendre_successor_threshold_divides_power. ((((exists bpvi_h_legendre_successor_threshold_divides_power_start. bpvi_h_legendre_successor_threshold_divides_power_start + S (1) = S ((S (0)) * bpvi_v_legendre_successor_threshold_divides_power)) /\ exists bpvi_q_legendre_successor_threshold_divides_power_start. bpvi_u_legendre_successor_threshold_divides_power = bpvi_q_legendre_successor_threshold_divides_power_start * S ((S (0)) * bpvi_v_legendre_successor_threshold_divides_power) + (1))) /\ ((((exists bpvi_h_legendre_successor_threshold_divides_power_terminal. bpvi_h_legendre_successor_threshold_divides_power_terminal + S (bpvi_result_legendre_successor_threshold_divides) = S ((S (S i)) * bpvi_v_legendre_successor_threshold_divides_power)) /\ exists bpvi_q_legendre_successor_threshold_divides_power_terminal. bpvi_u_legendre_successor_threshold_divides_power = bpvi_q_legendre_successor_threshold_divides_power_terminal * S ((S (S i)) * bpvi_v_legendre_successor_threshold_divides_power) + (bpvi_result_legendre_successor_threshold_divides))) /\ forall bpvi_j_legendre_successor_threshold_divides_power. (exists bpvi_product_gap_legendre_successor_threshold_divides_power. bpvi_product_gap_legendre_successor_threshold_divides_power + S bpvi_j_legendre_successor_threshold_divides_power = S i) -> exists bpvi_factor_legendre_successor_threshold_divides_power bpvi_partial_legendre_successor_threshold_divides_power bpvi_successor_legendre_successor_threshold_divides_power. ((((exists bpvi_h_legendre_successor_threshold_divides_power_factor. bpvi_h_legendre_successor_threshold_divides_power_factor + S (bpvi_factor_legendre_successor_threshold_divides_power) = S ((S (bpvi_j_legendre_successor_threshold_divides_power)) * bpvi_c_legendre_successor_threshold_divides_power)) /\ exists bpvi_q_legendre_successor_threshold_divides_power_factor. bpvi_b_legendre_successor_threshold_divides_power = bpvi_q_legendre_successor_threshold_divides_power_factor * S ((S (bpvi_j_legendre_successor_threshold_divides_power)) * bpvi_c_legendre_successor_threshold_divides_power) + (bpvi_factor_legendre_successor_threshold_divides_power))) /\ ((((exists bpvi_h_legendre_successor_threshold_divides_power_partial. bpvi_h_legendre_successor_threshold_divides_power_partial + S (bpvi_partial_legendre_successor_threshold_divides_power) = S ((S (bpvi_j_legendre_successor_threshold_divides_power)) * bpvi_v_legendre_successor_threshold_divides_power)) /\ exists bpvi_q_legendre_successor_threshold_divides_power_partial. bpvi_u_legendre_successor_threshold_divides_power = bpvi_q_legendre_successor_threshold_divides_power_partial * S ((S (bpvi_j_legendre_successor_threshold_divides_power)) * bpvi_v_legendre_successor_threshold_divides_power) + (bpvi_partial_legendre_successor_threshold_divides_power))) /\ ((((exists bpvi_h_legendre_successor_threshold_divides_power_successor. bpvi_h_legendre_successor_threshold_divides_power_successor + S (bpvi_successor_legendre_successor_threshold_divides_power) = S ((S (S bpvi_j_legendre_successor_threshold_divides_power)) * bpvi_v_legendre_successor_threshold_divides_power)) /\ exists bpvi_q_legendre_successor_threshold_divides_power_successor. bpvi_u_legendre_successor_threshold_divides_power = bpvi_q_legendre_successor_threshold_divides_power_successor * S ((S (S bpvi_j_legendre_successor_threshold_divides_power)) * bpvi_v_legendre_successor_threshold_divides_power) + (bpvi_successor_legendre_successor_threshold_divides_power))) /\ bpvi_successor_legendre_successor_threshold_divides_power = bpvi_partial_legendre_successor_threshold_divides_power * bpvi_factor_legendre_successor_threshold_divides_power)))))))) /\ exists bpvi_divisor_factor_legendre_successor_threshold_divides. a = bpvi_result_legendre_successor_threshold_divides * bpvi_divisor_factor_legendre_successor_threshold_divides))) \/ (bit = 0 /\ ~(exists bpvi_result_legendre_successor_threshold_divides. ((exists bpvi_b_legendre_successor_threshold_divides_power bpvi_c_legendre_successor_threshold_divides_power. ((forall bpvi_i_legendre_successor_threshold_divides_power. (exists bpvi_repeat_gap_legendre_successor_threshold_divides_power. bpvi_repeat_gap_legendre_successor_threshold_divides_power + S bpvi_i_legendre_successor_threshold_divides_power = S i) -> (((exists bpvi_h_legendre_successor_threshold_divides_power_repeat. bpvi_h_legendre_successor_threshold_divides_power_repeat + S (p) = S ((S (bpvi_i_legendre_successor_threshold_divides_power)) * bpvi_c_legendre_successor_threshold_divides_power)) /\ exists bpvi_q_legendre_successor_threshold_divides_power_repeat. bpvi_b_legendre_successor_threshold_divides_power = bpvi_q_legendre_successor_threshold_divides_power_repeat * S ((S (bpvi_i_legendre_successor_threshold_divides_power)) * bpvi_c_legendre_successor_threshold_divides_power) + (p)))) /\ (exists bpvi_u_legendre_successor_threshold_divides_power bpvi_v_legendre_successor_threshold_divides_power. ((((exists bpvi_h_legendre_successor_threshold_divides_power_start. bpvi_h_legendre_successor_threshold_divides_power_start + S (1) = S ((S (0)) * bpvi_v_legendre_successor_threshold_divides_power)) /\ exists bpvi_q_legendre_successor_threshold_divides_power_start. bpvi_u_legendre_successor_threshold_divides_power = bpvi_q_legendre_successor_threshold_divides_power_start * S ((S (0)) * bpvi_v_legendre_successor_threshold_divides_power) + (1))) /\ ((((exists bpvi_h_legendre_successor_threshold_divides_power_terminal. bpvi_h_legendre_successor_threshold_divides_power_terminal + S (bpvi_result_legendre_successor_threshold_divides) = S ((S (S i)) * bpvi_v_legendre_successor_threshold_divides_power)) /\ exists bpvi_q_legendre_successor_threshold_divides_power_terminal. bpvi_u_legendre_successor_threshold_divides_power = bpvi_q_legendre_successor_threshold_divides_power_terminal * S ((S (S i)) * bpvi_v_legendre_successor_threshold_divides_power) + (bpvi_result_legendre_successor_threshold_divides))) /\ forall bpvi_j_legendre_successor_threshold_divides_power. (exists bpvi_product_gap_legendre_successor_threshold_divides_power. bpvi_product_gap_legendre_successor_threshold_divides_power + S bpvi_j_legendre_successor_threshold_divides_power = S i) -> exists bpvi_factor_legendre_successor_threshold_divides_power bpvi_partial_legendre_successor_threshold_divides_power bpvi_successor_legendre_successor_threshold_divides_power. ((((exists bpvi_h_legendre_successor_threshold_divides_power_factor. bpvi_h_legendre_successor_threshold_divides_power_factor + S (bpvi_factor_legendre_successor_threshold_divides_power) = S ((S (bpvi_j_legendre_successor_threshold_divides_power)) * bpvi_c_legendre_successor_threshold_divides_power)) /\ exists bpvi_q_legendre_successor_threshold_divides_power_factor. bpvi_b_legendre_successor_threshold_divides_power = bpvi_q_legendre_successor_threshold_divides_power_factor * S ((S (bpvi_j_legendre_successor_threshold_divides_power)) * bpvi_c_legendre_successor_threshold_divides_power) + (bpvi_factor_legendre_successor_threshold_divides_power))) /\ ((((exists bpvi_h_legendre_successor_threshold_divides_power_partial. bpvi_h_legendre_successor_threshold_divides_power_partial + S (bpvi_partial_legendre_successor_threshold_divides_power) = S ((S (bpvi_j_legendre_successor_threshold_divides_power)) * bpvi_v_legendre_successor_threshold_divides_power)) /\ exists bpvi_q_legendre_successor_threshold_divides_power_partial. bpvi_u_legendre_successor_threshold_divides_power = bpvi_q_legendre_successor_threshold_divides_power_partial * S ((S (bpvi_j_legendre_successor_threshold_divides_power)) * bpvi_v_legendre_successor_threshold_divides_power) + (bpvi_partial_legendre_successor_threshold_divides_power))) /\ ((((exists bpvi_h_legendre_successor_threshold_divides_power_successor. bpvi_h_legendre_successor_threshold_divides_power_successor + S (bpvi_successor_legendre_successor_threshold_divides_power) = S ((S (S bpvi_j_legendre_successor_threshold_divides_power)) * bpvi_v_legendre_successor_threshold_divides_power)) /\ exists bpvi_q_legendre_successor_threshold_divides_power_successor. bpvi_u_legendre_successor_threshold_divides_power = bpvi_q_legendre_successor_threshold_divides_power_successor * S ((S (S bpvi_j_legendre_successor_threshold_divides_power)) * bpvi_v_legendre_successor_threshold_divides_power) + (bpvi_successor_legendre_successor_threshold_divides_power))) /\ bpvi_successor_legendre_successor_threshold_divides_power = bpvi_partial_legendre_successor_threshold_divides_power * bpvi_factor_legendre_successor_threshold_divides_power)))))))) /\ exists bpvi_divisor_factor_legendre_successor_threshold_divides. a = bpvi_result_legendre_successor_threshold_divides * bpvi_divisor_factor_legendre_successor_threshold_divides))))Proof neighborhood
Direct theorem prerequisites
BT00SC power_divides_of_exponent_le_valuation BT00SB prime_power_divides_exponent_le_valuation BT001I lt_not_leDirect theorem dependents
Definition-aware tactic body
Only local propositions introduced by have or suffices are compacted. Every changed line has an exact-AST conservative-expansion receipt; the kernel still receives the immutable original tactic 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–9
02Separate the logical casesL10–13
03Use earlier factsL14–21
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L14
exact hchoice_left_left - L15
specialize power_divides_of_exponent_le_valuation p - L16
specialize power_divides_of_exponent_le_valuation a - L17
specialize power_divides_of_exponent_le_valuation f - L18
specialize power_divides_of_exponent_le_valuation (S i) - L19
apply power_divides_of_exponent_le_valuation - L20
exact hvaluation - L21
exact hchoice_left_right
04Separate the logical casesL22–24
05Use earlier factsL25–25
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L25
exact hchoice_right_left
06Fix variables and assumptionsL26–26
Work with arbitrary variables or the premises of the current implication.
- L26
intro hdivides
07Establish hboundL27–36
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply prime power divides exponent le valuation.
- L27
- L28
specialize prime_power_divides_exponent_le_valuation p - L29
specialize prime_power_divides_exponent_le_valuation a - L30
specialize prime_power_divides_exponent_le_valuation f - L31
specialize prime_power_divides_exponent_le_valuation (S i) - L32
apply prime_power_divides_exponent_le_valuation - L33
exact hp - L34
exact ha - L35
exact hvaluation - L36
exact hdivides
Original defined command ledger · 41 lines
- 0001
intro p - 0002
intro a - 0003
intro f - 0004
intro i - 0005
intro bit - 0006
intro hp - 0007
intro ha - 0008
intro hvaluation - 0009
intro hchoice - 0010
cases hchoice - 0011
cases hchoice_left - 0012
left - 0013
split - 0014
exact hchoice_left_left - 0015
specialize power_divides_of_exponent_le_valuation p - 0016
specialize power_divides_of_exponent_le_valuation a - 0017
specialize power_divides_of_exponent_le_valuation f - 0018
specialize power_divides_of_exponent_le_valuation (S i) - 0019
apply power_divides_of_exponent_le_valuation - 0020
exact hvaluation - 0021
exact hchoice_left_right - 0022
cases hchoice_right - 0023
right - 0024
split - 0025
exact hchoice_right_left - 0026
intro hdivides - 0027
have hbound : Lt(i,f)Exact native replay line
have hbound : exists blsr_le_gap_legendre_successor_threshold_contradiction. blsr_le_gap_legendre_successor_threshold_contradiction + (S i) = (f) - 0028
specialize prime_power_divides_exponent_le_valuation p - 0029
specialize prime_power_divides_exponent_le_valuation a - 0030
specialize prime_power_divides_exponent_le_valuation f - 0031
specialize prime_power_divides_exponent_le_valuation (S i) - 0032
apply prime_power_divides_exponent_le_valuation - 0033
exact hp - 0034
exact ha - 0035
exact hvaluation - 0036
exact hdivides - 0037
specialize lt_not_le f - 0038
specialize lt_not_le (S i) - 0039
apply lt_not_le - 0040
exact hchoice_right_right - 0041
exact hbound