BT010K · Bertrand theorem

prime_contribution_interval_prefix_extend

Alpha v34 checked-use theorem · independently kernel and Lean verified; not Stable

Append one contribution choice to an offset interval prefix.

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

∀ n. ∀ a. ∀ b. ∀ c. ∀ l. (∀ x. Lt(x,l) → ∃ y. BetaAt(b,c,x,y) ∧ (Prime(S (a + x)) ∧ (∃ z. PowerValuation(S (a + x),n,z)Pow(S (a + x),z,y)) ∨ ¬Prime(S (a + x)) ∧ y = 1)) → ∃ x. ∃ y. ∀ z. Lt(z,S l) → ∃ m. BetaAt(x,y,z,m) ∧ (Prime(S (a + z)) ∧ (∃ k. PowerValuation(S (a + z),n,k)Pow(S (a + z),k,m)) ∨ ¬Prime(S (a + z)) ∧ m = 1)

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

12 occurrences

In local proof propositions

14 occurrences

Exact expanded native-PA statement
forall n a b c l. (forall bpr_index_bpcifpe_before. (exists bpr_gap_bpcifpe_before_bound. bpr_gap_bpcifpe_before_bound + S (bpr_index_bpcifpe_before) = l) -> exists bpr_value_bpcifpe_before. ((((exists bpr_height_bpcifpe_before_decoded. bpr_height_bpcifpe_before_decoded + S (bpr_value_bpcifpe_before) = S ((S (bpr_index_bpcifpe_before)) * c)) /\ exists bpr_quotient_bpcifpe_before_decoded. b = bpr_quotient_bpcifpe_before_decoded * S ((S (bpr_index_bpcifpe_before)) * c) + (bpr_value_bpcifpe_before))) /\ (((((~(S (a + bpr_index_bpcifpe_before) = 1) /\ forall bpr_left_bpcifpe_before_choice_prime bpr_right_bpcifpe_before_choice_prime. S (a + bpr_index_bpcifpe_before) = bpr_left_bpcifpe_before_choice_prime * bpr_right_bpcifpe_before_choice_prime -> bpr_left_bpcifpe_before_choice_prime = 1 \/ bpr_right_bpcifpe_before_choice_prime = 1)) /\ exists bpr_choice_exponent_bpcifpe_before_choice. ((((exists bpr_le_gap_bpcifpe_before_choice_valuation_selected_bound. bpr_le_gap_bpcifpe_before_choice_valuation_selected_bound + (bpr_choice_exponent_bpcifpe_before_choice) = (n)) /\ (exists bpr_power_value_bpcifpe_before_choice_valuation_selected. ((exists bpr_power_code_bpcifpe_before_choice_valuation_selected_power bpr_power_scale_bpcifpe_before_choice_valuation_selected_power. ((forall bpr_power_index_bpcifpe_before_choice_valuation_selected_power. (exists bpr_gap_bpcifpe_before_choice_valuation_selected_power_repeat_bound. bpr_gap_bpcifpe_before_choice_valuation_selected_power_repeat_bound + S (bpr_power_index_bpcifpe_before_choice_valuation_selected_power) = bpr_choice_exponent_bpcifpe_before_choice) -> (((exists bpr_height_bpcifpe_before_choice_valuation_selected_power_repeat_entry. bpr_height_bpcifpe_before_choice_valuation_selected_power_repeat_entry + S (S (a + bpr_index_bpcifpe_before)) = S ((S (bpr_power_index_bpcifpe_before_choice_valuation_selected_power)) * bpr_power_scale_bpcifpe_before_choice_valuation_selected_power)) /\ exists bpr_quotient_bpcifpe_before_choice_valuation_selected_power_repeat_entry. bpr_power_code_bpcifpe_before_choice_valuation_selected_power = bpr_quotient_bpcifpe_before_choice_valuation_selected_power_repeat_entry * S ((S (bpr_power_index_bpcifpe_before_choice_valuation_selected_power)) * bpr_power_scale_bpcifpe_before_choice_valuation_selected_power) + (S (a + bpr_index_bpcifpe_before))))) /\ (exists ff_u_bpcifpe_before_choice_valuation_selected_power_product ff_v_bpcifpe_before_choice_valuation_selected_power_product. ((((exists ff_h_bpcifpe_before_choice_valuation_selected_power_product_start. ff_h_bpcifpe_before_choice_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_bpcifpe_before_choice_valuation_selected_power_product)) /\ exists ff_q_bpcifpe_before_choice_valuation_selected_power_product_start. ff_u_bpcifpe_before_choice_valuation_selected_power_product = ff_q_bpcifpe_before_choice_valuation_selected_power_product_start * S ((S (0)) * ff_v_bpcifpe_before_choice_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_bpcifpe_before_choice_valuation_selected_power_product_terminal. ff_h_bpcifpe_before_choice_valuation_selected_power_product_terminal + S (bpr_power_value_bpcifpe_before_choice_valuation_selected) = S ((S (bpr_choice_exponent_bpcifpe_before_choice)) * ff_v_bpcifpe_before_choice_valuation_selected_power_product)) /\ exists ff_q_bpcifpe_before_choice_valuation_selected_power_product_terminal. ff_u_bpcifpe_before_choice_valuation_selected_power_product = ff_q_bpcifpe_before_choice_valuation_selected_power_product_terminal * S ((S (bpr_choice_exponent_bpcifpe_before_choice)) * ff_v_bpcifpe_before_choice_valuation_selected_power_product) + (bpr_power_value_bpcifpe_before_choice_valuation_selected))) /\ forall ff_i_bpcifpe_before_choice_valuation_selected_power_product. (exists ff_lt_bpcifpe_before_choice_valuation_selected_power_product_bound. ff_lt_bpcifpe_before_choice_valuation_selected_power_product_bound + S ff_i_bpcifpe_before_choice_valuation_selected_power_product = bpr_choice_exponent_bpcifpe_before_choice) -> exists ff_p_bpcifpe_before_choice_valuation_selected_power_product ff_r_bpcifpe_before_choice_valuation_selected_power_product ff_s_bpcifpe_before_choice_valuation_selected_power_product. ((((exists ff_h_bpcifpe_before_choice_valuation_selected_power_product_factor. ff_h_bpcifpe_before_choice_valuation_selected_power_product_factor + S (ff_p_bpcifpe_before_choice_valuation_selected_power_product) = S ((S (ff_i_bpcifpe_before_choice_valuation_selected_power_product)) * bpr_power_scale_bpcifpe_before_choice_valuation_selected_power)) /\ exists ff_q_bpcifpe_before_choice_valuation_selected_power_product_factor. bpr_power_code_bpcifpe_before_choice_valuation_selected_power = ff_q_bpcifpe_before_choice_valuation_selected_power_product_factor * S ((S (ff_i_bpcifpe_before_choice_valuation_selected_power_product)) * bpr_power_scale_bpcifpe_before_choice_valuation_selected_power) + (ff_p_bpcifpe_before_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcifpe_before_choice_valuation_selected_power_product_partial. ff_h_bpcifpe_before_choice_valuation_selected_power_product_partial + S (ff_r_bpcifpe_before_choice_valuation_selected_power_product) = S ((S (ff_i_bpcifpe_before_choice_valuation_selected_power_product)) * ff_v_bpcifpe_before_choice_valuation_selected_power_product)) /\ exists ff_q_bpcifpe_before_choice_valuation_selected_power_product_partial. ff_u_bpcifpe_before_choice_valuation_selected_power_product = ff_q_bpcifpe_before_choice_valuation_selected_power_product_partial * S ((S (ff_i_bpcifpe_before_choice_valuation_selected_power_product)) * ff_v_bpcifpe_before_choice_valuation_selected_power_product) + (ff_r_bpcifpe_before_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcifpe_before_choice_valuation_selected_power_product_successor. ff_h_bpcifpe_before_choice_valuation_selected_power_product_successor + S (ff_s_bpcifpe_before_choice_valuation_selected_power_product) = S ((S (S ff_i_bpcifpe_before_choice_valuation_selected_power_product)) * ff_v_bpcifpe_before_choice_valuation_selected_power_product)) /\ exists ff_q_bpcifpe_before_choice_valuation_selected_power_product_successor. ff_u_bpcifpe_before_choice_valuation_selected_power_product = ff_q_bpcifpe_before_choice_valuation_selected_power_product_successor * S ((S (S ff_i_bpcifpe_before_choice_valuation_selected_power_product)) * ff_v_bpcifpe_before_choice_valuation_selected_power_product) + (ff_s_bpcifpe_before_choice_valuation_selected_power_product))) /\ ff_s_bpcifpe_before_choice_valuation_selected_power_product = ff_r_bpcifpe_before_choice_valuation_selected_power_product * ff_p_bpcifpe_before_choice_valuation_selected_power_product)))))))) /\ (exists bpr_divides_quotient_bpcifpe_before_choice_valuation_selected_divides. n = (bpr_power_value_bpcifpe_before_choice_valuation_selected) * bpr_divides_quotient_bpcifpe_before_choice_valuation_selected_divides)))) /\ forall bpr_valuation_candidate_bpcifpe_before_choice_valuation. (exists bpr_le_gap_bpcifpe_before_choice_valuation_candidate_bound. bpr_le_gap_bpcifpe_before_choice_valuation_candidate_bound + (bpr_valuation_candidate_bpcifpe_before_choice_valuation) = (n)) -> (exists bpr_power_value_bpcifpe_before_choice_valuation_candidate. ((exists bpr_power_code_bpcifpe_before_choice_valuation_candidate_power bpr_power_scale_bpcifpe_before_choice_valuation_candidate_power. ((forall bpr_power_index_bpcifpe_before_choice_valuation_candidate_power. (exists bpr_gap_bpcifpe_before_choice_valuation_candidate_power_repeat_bound. bpr_gap_bpcifpe_before_choice_valuation_candidate_power_repeat_bound + S (bpr_power_index_bpcifpe_before_choice_valuation_candidate_power) = bpr_valuation_candidate_bpcifpe_before_choice_valuation) -> (((exists bpr_height_bpcifpe_before_choice_valuation_candidate_power_repeat_entry. bpr_height_bpcifpe_before_choice_valuation_candidate_power_repeat_entry + S (S (a + bpr_index_bpcifpe_before)) = S ((S (bpr_power_index_bpcifpe_before_choice_valuation_candidate_power)) * bpr_power_scale_bpcifpe_before_choice_valuation_candidate_power)) /\ exists bpr_quotient_bpcifpe_before_choice_valuation_candidate_power_repeat_entry. bpr_power_code_bpcifpe_before_choice_valuation_candidate_power = bpr_quotient_bpcifpe_before_choice_valuation_candidate_power_repeat_entry * S ((S (bpr_power_index_bpcifpe_before_choice_valuation_candidate_power)) * bpr_power_scale_bpcifpe_before_choice_valuation_candidate_power) + (S (a + bpr_index_bpcifpe_before))))) /\ (exists ff_u_bpcifpe_before_choice_valuation_candidate_power_product ff_v_bpcifpe_before_choice_valuation_candidate_power_product. ((((exists ff_h_bpcifpe_before_choice_valuation_candidate_power_product_start. ff_h_bpcifpe_before_choice_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_bpcifpe_before_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcifpe_before_choice_valuation_candidate_power_product_start. ff_u_bpcifpe_before_choice_valuation_candidate_power_product = ff_q_bpcifpe_before_choice_valuation_candidate_power_product_start * S ((S (0)) * ff_v_bpcifpe_before_choice_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_bpcifpe_before_choice_valuation_candidate_power_product_terminal. ff_h_bpcifpe_before_choice_valuation_candidate_power_product_terminal + S (bpr_power_value_bpcifpe_before_choice_valuation_candidate) = S ((S (bpr_valuation_candidate_bpcifpe_before_choice_valuation)) * ff_v_bpcifpe_before_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcifpe_before_choice_valuation_candidate_power_product_terminal. ff_u_bpcifpe_before_choice_valuation_candidate_power_product = ff_q_bpcifpe_before_choice_valuation_candidate_power_product_terminal * S ((S (bpr_valuation_candidate_bpcifpe_before_choice_valuation)) * ff_v_bpcifpe_before_choice_valuation_candidate_power_product) + (bpr_power_value_bpcifpe_before_choice_valuation_candidate))) /\ forall ff_i_bpcifpe_before_choice_valuation_candidate_power_product. (exists ff_lt_bpcifpe_before_choice_valuation_candidate_power_product_bound. ff_lt_bpcifpe_before_choice_valuation_candidate_power_product_bound + S ff_i_bpcifpe_before_choice_valuation_candidate_power_product = bpr_valuation_candidate_bpcifpe_before_choice_valuation) -> exists ff_p_bpcifpe_before_choice_valuation_candidate_power_product ff_r_bpcifpe_before_choice_valuation_candidate_power_product ff_s_bpcifpe_before_choice_valuation_candidate_power_product. ((((exists ff_h_bpcifpe_before_choice_valuation_candidate_power_product_factor. ff_h_bpcifpe_before_choice_valuation_candidate_power_product_factor + S (ff_p_bpcifpe_before_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcifpe_before_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcifpe_before_choice_valuation_candidate_power)) /\ exists ff_q_bpcifpe_before_choice_valuation_candidate_power_product_factor. bpr_power_code_bpcifpe_before_choice_valuation_candidate_power = ff_q_bpcifpe_before_choice_valuation_candidate_power_product_factor * S ((S (ff_i_bpcifpe_before_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcifpe_before_choice_valuation_candidate_power) + (ff_p_bpcifpe_before_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcifpe_before_choice_valuation_candidate_power_product_partial. ff_h_bpcifpe_before_choice_valuation_candidate_power_product_partial + S (ff_r_bpcifpe_before_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcifpe_before_choice_valuation_candidate_power_product)) * ff_v_bpcifpe_before_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcifpe_before_choice_valuation_candidate_power_product_partial. ff_u_bpcifpe_before_choice_valuation_candidate_power_product = ff_q_bpcifpe_before_choice_valuation_candidate_power_product_partial * S ((S (ff_i_bpcifpe_before_choice_valuation_candidate_power_product)) * ff_v_bpcifpe_before_choice_valuation_candidate_power_product) + (ff_r_bpcifpe_before_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcifpe_before_choice_valuation_candidate_power_product_successor. ff_h_bpcifpe_before_choice_valuation_candidate_power_product_successor + S (ff_s_bpcifpe_before_choice_valuation_candidate_power_product) = S ((S (S ff_i_bpcifpe_before_choice_valuation_candidate_power_product)) * ff_v_bpcifpe_before_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcifpe_before_choice_valuation_candidate_power_product_successor. ff_u_bpcifpe_before_choice_valuation_candidate_power_product = ff_q_bpcifpe_before_choice_valuation_candidate_power_product_successor * S ((S (S ff_i_bpcifpe_before_choice_valuation_candidate_power_product)) * ff_v_bpcifpe_before_choice_valuation_candidate_power_product) + (ff_s_bpcifpe_before_choice_valuation_candidate_power_product))) /\ ff_s_bpcifpe_before_choice_valuation_candidate_power_product = ff_r_bpcifpe_before_choice_valuation_candidate_power_product * ff_p_bpcifpe_before_choice_valuation_candidate_power_product)))))))) /\ (exists bpr_divides_quotient_bpcifpe_before_choice_valuation_candidate_divides. n = (bpr_power_value_bpcifpe_before_choice_valuation_candidate) * bpr_divides_quotient_bpcifpe_before_choice_valuation_candidate_divides))) -> (exists bpr_le_gap_bpcifpe_before_choice_valuation_candidate_below. bpr_le_gap_bpcifpe_before_choice_valuation_candidate_below + (bpr_valuation_candidate_bpcifpe_before_choice_valuation) = (bpr_choice_exponent_bpcifpe_before_choice))) /\ (exists bpr_power_code_bpcifpe_before_choice_power bpr_power_scale_bpcifpe_before_choice_power. ((forall bpr_power_index_bpcifpe_before_choice_power. (exists bpr_gap_bpcifpe_before_choice_power_repeat_bound. bpr_gap_bpcifpe_before_choice_power_repeat_bound + S (bpr_power_index_bpcifpe_before_choice_power) = bpr_choice_exponent_bpcifpe_before_choice) -> (((exists bpr_height_bpcifpe_before_choice_power_repeat_entry. bpr_height_bpcifpe_before_choice_power_repeat_entry + S (S (a + bpr_index_bpcifpe_before)) = S ((S (bpr_power_index_bpcifpe_before_choice_power)) * bpr_power_scale_bpcifpe_before_choice_power)) /\ exists bpr_quotient_bpcifpe_before_choice_power_repeat_entry. bpr_power_code_bpcifpe_before_choice_power = bpr_quotient_bpcifpe_before_choice_power_repeat_entry * S ((S (bpr_power_index_bpcifpe_before_choice_power)) * bpr_power_scale_bpcifpe_before_choice_power) + (S (a + bpr_index_bpcifpe_before))))) /\ (exists ff_u_bpcifpe_before_choice_power_product ff_v_bpcifpe_before_choice_power_product. ((((exists ff_h_bpcifpe_before_choice_power_product_start. ff_h_bpcifpe_before_choice_power_product_start + S (1) = S ((S (0)) * ff_v_bpcifpe_before_choice_power_product)) /\ exists ff_q_bpcifpe_before_choice_power_product_start. ff_u_bpcifpe_before_choice_power_product = ff_q_bpcifpe_before_choice_power_product_start * S ((S (0)) * ff_v_bpcifpe_before_choice_power_product) + (1))) /\ ((((exists ff_h_bpcifpe_before_choice_power_product_terminal. ff_h_bpcifpe_before_choice_power_product_terminal + S (bpr_value_bpcifpe_before) = S ((S (bpr_choice_exponent_bpcifpe_before_choice)) * ff_v_bpcifpe_before_choice_power_product)) /\ exists ff_q_bpcifpe_before_choice_power_product_terminal. ff_u_bpcifpe_before_choice_power_product = ff_q_bpcifpe_before_choice_power_product_terminal * S ((S (bpr_choice_exponent_bpcifpe_before_choice)) * ff_v_bpcifpe_before_choice_power_product) + (bpr_value_bpcifpe_before))) /\ forall ff_i_bpcifpe_before_choice_power_product. (exists ff_lt_bpcifpe_before_choice_power_product_bound. ff_lt_bpcifpe_before_choice_power_product_bound + S ff_i_bpcifpe_before_choice_power_product = bpr_choice_exponent_bpcifpe_before_choice) -> exists ff_p_bpcifpe_before_choice_power_product ff_r_bpcifpe_before_choice_power_product ff_s_bpcifpe_before_choice_power_product. ((((exists ff_h_bpcifpe_before_choice_power_product_factor. ff_h_bpcifpe_before_choice_power_product_factor + S (ff_p_bpcifpe_before_choice_power_product) = S ((S (ff_i_bpcifpe_before_choice_power_product)) * bpr_power_scale_bpcifpe_before_choice_power)) /\ exists ff_q_bpcifpe_before_choice_power_product_factor. bpr_power_code_bpcifpe_before_choice_power = ff_q_bpcifpe_before_choice_power_product_factor * S ((S (ff_i_bpcifpe_before_choice_power_product)) * bpr_power_scale_bpcifpe_before_choice_power) + (ff_p_bpcifpe_before_choice_power_product))) /\ ((((exists ff_h_bpcifpe_before_choice_power_product_partial. ff_h_bpcifpe_before_choice_power_product_partial + S (ff_r_bpcifpe_before_choice_power_product) = S ((S (ff_i_bpcifpe_before_choice_power_product)) * ff_v_bpcifpe_before_choice_power_product)) /\ exists ff_q_bpcifpe_before_choice_power_product_partial. ff_u_bpcifpe_before_choice_power_product = ff_q_bpcifpe_before_choice_power_product_partial * S ((S (ff_i_bpcifpe_before_choice_power_product)) * ff_v_bpcifpe_before_choice_power_product) + (ff_r_bpcifpe_before_choice_power_product))) /\ ((((exists ff_h_bpcifpe_before_choice_power_product_successor. ff_h_bpcifpe_before_choice_power_product_successor + S (ff_s_bpcifpe_before_choice_power_product) = S ((S (S ff_i_bpcifpe_before_choice_power_product)) * ff_v_bpcifpe_before_choice_power_product)) /\ exists ff_q_bpcifpe_before_choice_power_product_successor. ff_u_bpcifpe_before_choice_power_product = ff_q_bpcifpe_before_choice_power_product_successor * S ((S (S ff_i_bpcifpe_before_choice_power_product)) * ff_v_bpcifpe_before_choice_power_product) + (ff_s_bpcifpe_before_choice_power_product))) /\ ff_s_bpcifpe_before_choice_power_product = ff_r_bpcifpe_before_choice_power_product * ff_p_bpcifpe_before_choice_power_product)))))))))) \/ (~((~(S (a + bpr_index_bpcifpe_before) = 1) /\ forall bpr_left_bpcifpe_before_choice_prime bpr_right_bpcifpe_before_choice_prime. S (a + bpr_index_bpcifpe_before) = bpr_left_bpcifpe_before_choice_prime * bpr_right_bpcifpe_before_choice_prime -> bpr_left_bpcifpe_before_choice_prime = 1 \/ bpr_right_bpcifpe_before_choice_prime = 1)) /\ bpr_value_bpcifpe_before = 1))))) -> exists d e. (forall bpr_index_bpcifpe_after. (exists bpr_gap_bpcifpe_after_bound. bpr_gap_bpcifpe_after_bound + S (bpr_index_bpcifpe_after) = S l) -> exists bpr_value_bpcifpe_after. ((((exists bpr_height_bpcifpe_after_decoded. bpr_height_bpcifpe_after_decoded + S (bpr_value_bpcifpe_after) = S ((S (bpr_index_bpcifpe_after)) * e)) /\ exists bpr_quotient_bpcifpe_after_decoded. d = bpr_quotient_bpcifpe_after_decoded * S ((S (bpr_index_bpcifpe_after)) * e) + (bpr_value_bpcifpe_after))) /\ (((((~(S (a + bpr_index_bpcifpe_after) = 1) /\ forall bpr_left_bpcifpe_after_choice_prime bpr_right_bpcifpe_after_choice_prime. S (a + bpr_index_bpcifpe_after) = bpr_left_bpcifpe_after_choice_prime * bpr_right_bpcifpe_after_choice_prime -> bpr_left_bpcifpe_after_choice_prime = 1 \/ bpr_right_bpcifpe_after_choice_prime = 1)) /\ exists bpr_choice_exponent_bpcifpe_after_choice. ((((exists bpr_le_gap_bpcifpe_after_choice_valuation_selected_bound. bpr_le_gap_bpcifpe_after_choice_valuation_selected_bound + (bpr_choice_exponent_bpcifpe_after_choice) = (n)) /\ (exists bpr_power_value_bpcifpe_after_choice_valuation_selected. ((exists bpr_power_code_bpcifpe_after_choice_valuation_selected_power bpr_power_scale_bpcifpe_after_choice_valuation_selected_power. ((forall bpr_power_index_bpcifpe_after_choice_valuation_selected_power. (exists bpr_gap_bpcifpe_after_choice_valuation_selected_power_repeat_bound. bpr_gap_bpcifpe_after_choice_valuation_selected_power_repeat_bound + S (bpr_power_index_bpcifpe_after_choice_valuation_selected_power) = bpr_choice_exponent_bpcifpe_after_choice) -> (((exists bpr_height_bpcifpe_after_choice_valuation_selected_power_repeat_entry. bpr_height_bpcifpe_after_choice_valuation_selected_power_repeat_entry + S (S (a + bpr_index_bpcifpe_after)) = S ((S (bpr_power_index_bpcifpe_after_choice_valuation_selected_power)) * bpr_power_scale_bpcifpe_after_choice_valuation_selected_power)) /\ exists bpr_quotient_bpcifpe_after_choice_valuation_selected_power_repeat_entry. bpr_power_code_bpcifpe_after_choice_valuation_selected_power = bpr_quotient_bpcifpe_after_choice_valuation_selected_power_repeat_entry * S ((S (bpr_power_index_bpcifpe_after_choice_valuation_selected_power)) * bpr_power_scale_bpcifpe_after_choice_valuation_selected_power) + (S (a + bpr_index_bpcifpe_after))))) /\ (exists ff_u_bpcifpe_after_choice_valuation_selected_power_product ff_v_bpcifpe_after_choice_valuation_selected_power_product. ((((exists ff_h_bpcifpe_after_choice_valuation_selected_power_product_start. ff_h_bpcifpe_after_choice_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_bpcifpe_after_choice_valuation_selected_power_product)) /\ exists ff_q_bpcifpe_after_choice_valuation_selected_power_product_start. ff_u_bpcifpe_after_choice_valuation_selected_power_product = ff_q_bpcifpe_after_choice_valuation_selected_power_product_start * S ((S (0)) * ff_v_bpcifpe_after_choice_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_bpcifpe_after_choice_valuation_selected_power_product_terminal. ff_h_bpcifpe_after_choice_valuation_selected_power_product_terminal + S (bpr_power_value_bpcifpe_after_choice_valuation_selected) = S ((S (bpr_choice_exponent_bpcifpe_after_choice)) * ff_v_bpcifpe_after_choice_valuation_selected_power_product)) /\ exists ff_q_bpcifpe_after_choice_valuation_selected_power_product_terminal. ff_u_bpcifpe_after_choice_valuation_selected_power_product = ff_q_bpcifpe_after_choice_valuation_selected_power_product_terminal * S ((S (bpr_choice_exponent_bpcifpe_after_choice)) * ff_v_bpcifpe_after_choice_valuation_selected_power_product) + (bpr_power_value_bpcifpe_after_choice_valuation_selected))) /\ forall ff_i_bpcifpe_after_choice_valuation_selected_power_product. (exists ff_lt_bpcifpe_after_choice_valuation_selected_power_product_bound. ff_lt_bpcifpe_after_choice_valuation_selected_power_product_bound + S ff_i_bpcifpe_after_choice_valuation_selected_power_product = bpr_choice_exponent_bpcifpe_after_choice) -> exists ff_p_bpcifpe_after_choice_valuation_selected_power_product ff_r_bpcifpe_after_choice_valuation_selected_power_product ff_s_bpcifpe_after_choice_valuation_selected_power_product. ((((exists ff_h_bpcifpe_after_choice_valuation_selected_power_product_factor. ff_h_bpcifpe_after_choice_valuation_selected_power_product_factor + S (ff_p_bpcifpe_after_choice_valuation_selected_power_product) = S ((S (ff_i_bpcifpe_after_choice_valuation_selected_power_product)) * bpr_power_scale_bpcifpe_after_choice_valuation_selected_power)) /\ exists ff_q_bpcifpe_after_choice_valuation_selected_power_product_factor. bpr_power_code_bpcifpe_after_choice_valuation_selected_power = ff_q_bpcifpe_after_choice_valuation_selected_power_product_factor * S ((S (ff_i_bpcifpe_after_choice_valuation_selected_power_product)) * bpr_power_scale_bpcifpe_after_choice_valuation_selected_power) + (ff_p_bpcifpe_after_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcifpe_after_choice_valuation_selected_power_product_partial. ff_h_bpcifpe_after_choice_valuation_selected_power_product_partial + S (ff_r_bpcifpe_after_choice_valuation_selected_power_product) = S ((S (ff_i_bpcifpe_after_choice_valuation_selected_power_product)) * ff_v_bpcifpe_after_choice_valuation_selected_power_product)) /\ exists ff_q_bpcifpe_after_choice_valuation_selected_power_product_partial. ff_u_bpcifpe_after_choice_valuation_selected_power_product = ff_q_bpcifpe_after_choice_valuation_selected_power_product_partial * S ((S (ff_i_bpcifpe_after_choice_valuation_selected_power_product)) * ff_v_bpcifpe_after_choice_valuation_selected_power_product) + (ff_r_bpcifpe_after_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcifpe_after_choice_valuation_selected_power_product_successor. ff_h_bpcifpe_after_choice_valuation_selected_power_product_successor + S (ff_s_bpcifpe_after_choice_valuation_selected_power_product) = S ((S (S ff_i_bpcifpe_after_choice_valuation_selected_power_product)) * ff_v_bpcifpe_after_choice_valuation_selected_power_product)) /\ exists ff_q_bpcifpe_after_choice_valuation_selected_power_product_successor. ff_u_bpcifpe_after_choice_valuation_selected_power_product = ff_q_bpcifpe_after_choice_valuation_selected_power_product_successor * S ((S (S ff_i_bpcifpe_after_choice_valuation_selected_power_product)) * ff_v_bpcifpe_after_choice_valuation_selected_power_product) + (ff_s_bpcifpe_after_choice_valuation_selected_power_product))) /\ ff_s_bpcifpe_after_choice_valuation_selected_power_product = ff_r_bpcifpe_after_choice_valuation_selected_power_product * ff_p_bpcifpe_after_choice_valuation_selected_power_product)))))))) /\ (exists bpr_divides_quotient_bpcifpe_after_choice_valuation_selected_divides. n = (bpr_power_value_bpcifpe_after_choice_valuation_selected) * bpr_divides_quotient_bpcifpe_after_choice_valuation_selected_divides)))) /\ forall bpr_valuation_candidate_bpcifpe_after_choice_valuation. (exists bpr_le_gap_bpcifpe_after_choice_valuation_candidate_bound. bpr_le_gap_bpcifpe_after_choice_valuation_candidate_bound + (bpr_valuation_candidate_bpcifpe_after_choice_valuation) = (n)) -> (exists bpr_power_value_bpcifpe_after_choice_valuation_candidate. ((exists bpr_power_code_bpcifpe_after_choice_valuation_candidate_power bpr_power_scale_bpcifpe_after_choice_valuation_candidate_power. ((forall bpr_power_index_bpcifpe_after_choice_valuation_candidate_power. (exists bpr_gap_bpcifpe_after_choice_valuation_candidate_power_repeat_bound. bpr_gap_bpcifpe_after_choice_valuation_candidate_power_repeat_bound + S (bpr_power_index_bpcifpe_after_choice_valuation_candidate_power) = bpr_valuation_candidate_bpcifpe_after_choice_valuation) -> (((exists bpr_height_bpcifpe_after_choice_valuation_candidate_power_repeat_entry. bpr_height_bpcifpe_after_choice_valuation_candidate_power_repeat_entry + S (S (a + bpr_index_bpcifpe_after)) = S ((S (bpr_power_index_bpcifpe_after_choice_valuation_candidate_power)) * bpr_power_scale_bpcifpe_after_choice_valuation_candidate_power)) /\ exists bpr_quotient_bpcifpe_after_choice_valuation_candidate_power_repeat_entry. bpr_power_code_bpcifpe_after_choice_valuation_candidate_power = bpr_quotient_bpcifpe_after_choice_valuation_candidate_power_repeat_entry * S ((S (bpr_power_index_bpcifpe_after_choice_valuation_candidate_power)) * bpr_power_scale_bpcifpe_after_choice_valuation_candidate_power) + (S (a + bpr_index_bpcifpe_after))))) /\ (exists ff_u_bpcifpe_after_choice_valuation_candidate_power_product ff_v_bpcifpe_after_choice_valuation_candidate_power_product. ((((exists ff_h_bpcifpe_after_choice_valuation_candidate_power_product_start. ff_h_bpcifpe_after_choice_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_bpcifpe_after_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcifpe_after_choice_valuation_candidate_power_product_start. ff_u_bpcifpe_after_choice_valuation_candidate_power_product = ff_q_bpcifpe_after_choice_valuation_candidate_power_product_start * S ((S (0)) * ff_v_bpcifpe_after_choice_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_bpcifpe_after_choice_valuation_candidate_power_product_terminal. ff_h_bpcifpe_after_choice_valuation_candidate_power_product_terminal + S (bpr_power_value_bpcifpe_after_choice_valuation_candidate) = S ((S (bpr_valuation_candidate_bpcifpe_after_choice_valuation)) * ff_v_bpcifpe_after_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcifpe_after_choice_valuation_candidate_power_product_terminal. ff_u_bpcifpe_after_choice_valuation_candidate_power_product = ff_q_bpcifpe_after_choice_valuation_candidate_power_product_terminal * S ((S (bpr_valuation_candidate_bpcifpe_after_choice_valuation)) * ff_v_bpcifpe_after_choice_valuation_candidate_power_product) + (bpr_power_value_bpcifpe_after_choice_valuation_candidate))) /\ forall ff_i_bpcifpe_after_choice_valuation_candidate_power_product. (exists ff_lt_bpcifpe_after_choice_valuation_candidate_power_product_bound. ff_lt_bpcifpe_after_choice_valuation_candidate_power_product_bound + S ff_i_bpcifpe_after_choice_valuation_candidate_power_product = bpr_valuation_candidate_bpcifpe_after_choice_valuation) -> exists ff_p_bpcifpe_after_choice_valuation_candidate_power_product ff_r_bpcifpe_after_choice_valuation_candidate_power_product ff_s_bpcifpe_after_choice_valuation_candidate_power_product. ((((exists ff_h_bpcifpe_after_choice_valuation_candidate_power_product_factor. ff_h_bpcifpe_after_choice_valuation_candidate_power_product_factor + S (ff_p_bpcifpe_after_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcifpe_after_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcifpe_after_choice_valuation_candidate_power)) /\ exists ff_q_bpcifpe_after_choice_valuation_candidate_power_product_factor. bpr_power_code_bpcifpe_after_choice_valuation_candidate_power = ff_q_bpcifpe_after_choice_valuation_candidate_power_product_factor * S ((S (ff_i_bpcifpe_after_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcifpe_after_choice_valuation_candidate_power) + (ff_p_bpcifpe_after_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcifpe_after_choice_valuation_candidate_power_product_partial. ff_h_bpcifpe_after_choice_valuation_candidate_power_product_partial + S (ff_r_bpcifpe_after_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcifpe_after_choice_valuation_candidate_power_product)) * ff_v_bpcifpe_after_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcifpe_after_choice_valuation_candidate_power_product_partial. ff_u_bpcifpe_after_choice_valuation_candidate_power_product = ff_q_bpcifpe_after_choice_valuation_candidate_power_product_partial * S ((S (ff_i_bpcifpe_after_choice_valuation_candidate_power_product)) * ff_v_bpcifpe_after_choice_valuation_candidate_power_product) + (ff_r_bpcifpe_after_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcifpe_after_choice_valuation_candidate_power_product_successor. ff_h_bpcifpe_after_choice_valuation_candidate_power_product_successor + S (ff_s_bpcifpe_after_choice_valuation_candidate_power_product) = S ((S (S ff_i_bpcifpe_after_choice_valuation_candidate_power_product)) * ff_v_bpcifpe_after_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcifpe_after_choice_valuation_candidate_power_product_successor. ff_u_bpcifpe_after_choice_valuation_candidate_power_product = ff_q_bpcifpe_after_choice_valuation_candidate_power_product_successor * S ((S (S ff_i_bpcifpe_after_choice_valuation_candidate_power_product)) * ff_v_bpcifpe_after_choice_valuation_candidate_power_product) + (ff_s_bpcifpe_after_choice_valuation_candidate_power_product))) /\ ff_s_bpcifpe_after_choice_valuation_candidate_power_product = ff_r_bpcifpe_after_choice_valuation_candidate_power_product * ff_p_bpcifpe_after_choice_valuation_candidate_power_product)))))))) /\ (exists bpr_divides_quotient_bpcifpe_after_choice_valuation_candidate_divides. n = (bpr_power_value_bpcifpe_after_choice_valuation_candidate) * bpr_divides_quotient_bpcifpe_after_choice_valuation_candidate_divides))) -> (exists bpr_le_gap_bpcifpe_after_choice_valuation_candidate_below. bpr_le_gap_bpcifpe_after_choice_valuation_candidate_below + (bpr_valuation_candidate_bpcifpe_after_choice_valuation) = (bpr_choice_exponent_bpcifpe_after_choice))) /\ (exists bpr_power_code_bpcifpe_after_choice_power bpr_power_scale_bpcifpe_after_choice_power. ((forall bpr_power_index_bpcifpe_after_choice_power. (exists bpr_gap_bpcifpe_after_choice_power_repeat_bound. bpr_gap_bpcifpe_after_choice_power_repeat_bound + S (bpr_power_index_bpcifpe_after_choice_power) = bpr_choice_exponent_bpcifpe_after_choice) -> (((exists bpr_height_bpcifpe_after_choice_power_repeat_entry. bpr_height_bpcifpe_after_choice_power_repeat_entry + S (S (a + bpr_index_bpcifpe_after)) = S ((S (bpr_power_index_bpcifpe_after_choice_power)) * bpr_power_scale_bpcifpe_after_choice_power)) /\ exists bpr_quotient_bpcifpe_after_choice_power_repeat_entry. bpr_power_code_bpcifpe_after_choice_power = bpr_quotient_bpcifpe_after_choice_power_repeat_entry * S ((S (bpr_power_index_bpcifpe_after_choice_power)) * bpr_power_scale_bpcifpe_after_choice_power) + (S (a + bpr_index_bpcifpe_after))))) /\ (exists ff_u_bpcifpe_after_choice_power_product ff_v_bpcifpe_after_choice_power_product. ((((exists ff_h_bpcifpe_after_choice_power_product_start. ff_h_bpcifpe_after_choice_power_product_start + S (1) = S ((S (0)) * ff_v_bpcifpe_after_choice_power_product)) /\ exists ff_q_bpcifpe_after_choice_power_product_start. ff_u_bpcifpe_after_choice_power_product = ff_q_bpcifpe_after_choice_power_product_start * S ((S (0)) * ff_v_bpcifpe_after_choice_power_product) + (1))) /\ ((((exists ff_h_bpcifpe_after_choice_power_product_terminal. ff_h_bpcifpe_after_choice_power_product_terminal + S (bpr_value_bpcifpe_after) = S ((S (bpr_choice_exponent_bpcifpe_after_choice)) * ff_v_bpcifpe_after_choice_power_product)) /\ exists ff_q_bpcifpe_after_choice_power_product_terminal. ff_u_bpcifpe_after_choice_power_product = ff_q_bpcifpe_after_choice_power_product_terminal * S ((S (bpr_choice_exponent_bpcifpe_after_choice)) * ff_v_bpcifpe_after_choice_power_product) + (bpr_value_bpcifpe_after))) /\ forall ff_i_bpcifpe_after_choice_power_product. (exists ff_lt_bpcifpe_after_choice_power_product_bound. ff_lt_bpcifpe_after_choice_power_product_bound + S ff_i_bpcifpe_after_choice_power_product = bpr_choice_exponent_bpcifpe_after_choice) -> exists ff_p_bpcifpe_after_choice_power_product ff_r_bpcifpe_after_choice_power_product ff_s_bpcifpe_after_choice_power_product. ((((exists ff_h_bpcifpe_after_choice_power_product_factor. ff_h_bpcifpe_after_choice_power_product_factor + S (ff_p_bpcifpe_after_choice_power_product) = S ((S (ff_i_bpcifpe_after_choice_power_product)) * bpr_power_scale_bpcifpe_after_choice_power)) /\ exists ff_q_bpcifpe_after_choice_power_product_factor. bpr_power_code_bpcifpe_after_choice_power = ff_q_bpcifpe_after_choice_power_product_factor * S ((S (ff_i_bpcifpe_after_choice_power_product)) * bpr_power_scale_bpcifpe_after_choice_power) + (ff_p_bpcifpe_after_choice_power_product))) /\ ((((exists ff_h_bpcifpe_after_choice_power_product_partial. ff_h_bpcifpe_after_choice_power_product_partial + S (ff_r_bpcifpe_after_choice_power_product) = S ((S (ff_i_bpcifpe_after_choice_power_product)) * ff_v_bpcifpe_after_choice_power_product)) /\ exists ff_q_bpcifpe_after_choice_power_product_partial. ff_u_bpcifpe_after_choice_power_product = ff_q_bpcifpe_after_choice_power_product_partial * S ((S (ff_i_bpcifpe_after_choice_power_product)) * ff_v_bpcifpe_after_choice_power_product) + (ff_r_bpcifpe_after_choice_power_product))) /\ ((((exists ff_h_bpcifpe_after_choice_power_product_successor. ff_h_bpcifpe_after_choice_power_product_successor + S (ff_s_bpcifpe_after_choice_power_product) = S ((S (S ff_i_bpcifpe_after_choice_power_product)) * ff_v_bpcifpe_after_choice_power_product)) /\ exists ff_q_bpcifpe_after_choice_power_product_successor. ff_u_bpcifpe_after_choice_power_product = ff_q_bpcifpe_after_choice_power_product_successor * S ((S (S ff_i_bpcifpe_after_choice_power_product)) * ff_v_bpcifpe_after_choice_power_product) + (ff_s_bpcifpe_after_choice_power_product))) /\ ff_s_bpcifpe_after_choice_power_product = ff_r_bpcifpe_after_choice_power_product * ff_p_bpcifpe_after_choice_power_product)))))))))) \/ (~((~(S (a + bpr_index_bpcifpe_after) = 1) /\ forall bpr_left_bpcifpe_after_choice_prime bpr_right_bpcifpe_after_choice_prime. S (a + bpr_index_bpcifpe_after) = bpr_left_bpcifpe_after_choice_prime * bpr_right_bpcifpe_after_choice_prime -> bpr_left_bpcifpe_after_choice_prime = 1 \/ bpr_right_bpcifpe_after_choice_prime = 1)) /\ bpr_value_bpcifpe_after = 1)))))

Proof neighborhood

Direct theorem prerequisites

Direct 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

51 script commands · 19 reading checkpoints · 4 local claims

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.

Definition notation is shown below. Open the paired exact edition for the original native formulas. Source pairing is not a new equivalence certificate.

Named ingredients (3)
01Fix variables and assumptionsL1–6

Work with arbitrary variables or the premises of the current implication.

  1. L1
    intro n
  2. L2
    intro a
  3. L3
    intro b
  4. L4
    intro c
  5. L5
    intro l
  6. L6
    intro hprefix
02Establish hchoiceL7–10

Establish this local claim before using it. It is not an additional assumption.

  1. L7
    have hchoice : ∃ x. Prime(S (a + l)) ∧ (∃ y. PowerValuation(S (a + l),n,y) ∧ Pow(S (a + l),y,x)) ∨ ¬Prime(S (a + l)) ∧ x = 1Definitions: Prime(S (a + l))PowerValuation(S (a + l),n,y)Pow(S (a + l),y,x)Original native command in the exact edition
  2. L8
    specialize prime_contribution_choice_exists n
  3. L9
    specialize prime_contribution_choice_exists (a + l)
  4. L10
    exact prime_contribution_choice_exists
03Separate the logical casesL11–11

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L11
    cases hchoice
04Establish hextL12–13

Establish this local claim before using it. It is not an additional assumption. The following proof commands apply beta prefix extend.

  1. L12
    have hext : ∃ d. ∃ e. BetaAt(d,e,l,x) ∧ (∀ y. ∀ z. Lt(y,l) → BetaAt(b,c,y,z) → BetaAt(d,e,y,z))Definitions: BetaAt(d,e,l,x)Lt(y,l)BetaAt(b,c,y,z)BetaAt(d,e,y,z)Original native command in the exact edition
  2. L13
    apply beta_prefix_extend
05Separate the logical casesL14–16

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L14
    cases hext
  2. L15
    cases hext_witness
  3. L16
    cases hext_witness_witness
06Construct an explicit witnessL17–18

Supply the displayed value, then prove that it has the required property.

  1. L17
    exists x1
  2. L18
    exists x2
07Fix variables and assumptionsL19–20

Work with arbitrary variables or the premises of the current implication.

  1. L19
    intro i
  2. L20
    intro hi
08Establish hsplitL21–23

Establish this local claim before using it. It is not an additional assumption. The following proof commands apply finite lt succ eq or lt.

  1. L21
    have hsplit : i = l ∨ Lt(i,l)Definitions: Lt(i,l)Original native command in the exact edition
  2. L22
    apply finite_lt_succ_eq_or_lt
  3. L23
    exact hi
09Separate the logical casesL24–24

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L24
    cases hsplit
10Calculate and transport equalitiesL25–34

Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.

  1. L25
    rewrite hsplit_left
  2. L26
    rewrite hsplit_left
  3. L27
    rewrite hsplit_left
  4. L28
    rewrite hsplit_left
  5. L29
    rewrite hsplit_left
  6. L30
    rewrite hsplit_left
  7. L31
    rewrite hsplit_left
  8. L32
    rewrite hsplit_left
  9. L33
    rewrite hsplit_left
  10. L34
    rewrite hsplit_left
11Calculate and transport equalitiesL35–36

Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.

  1. L35
    rewrite hsplit_left
  2. L36
    rewrite hsplit_left
12Construct an explicit witnessL37–37

Supply the displayed value, then prove that it has the required property.

  1. L37
    exists x
13Separate the logical casesL38–38

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L38
    split
14Use earlier factsL39–40

Instantiate or apply named facts and discharge the corresponding proof obligations.

  1. L39
    exact hext_witness_witness_left
  2. L40
    exact hchoice_witness
15Establish holdL41–43

Establish this local claim before using it. It is not an additional assumption. The following proof commands apply hprefix.

  1. L41
    have hold : ∃ p. BetaAt(b,c,i,p) ∧ (Prime(S (a + i)) ∧ (∃ x. PowerValuation(S (a + i),n,x) ∧ Pow(S (a + i),x,p)) ∨ ¬Prime(S (a + i)) ∧ p = 1)Definitions: BetaAt(b,c,i,p)Prime(S (a + i))PowerValuation(S (a + i),n,x)Pow(S (a + i),x,p)Original native command in the exact edition
  2. L42
    apply hprefix
  3. L43
    exact hsplit_right
16Separate the logical casesL44–45

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L44
    cases hold
  2. L45
    cases hold_witness
17Construct an explicit witnessL46–46

Supply the displayed value, then prove that it has the required property.

  1. L46
    exists x3
18Separate the logical casesL47–47

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L47
    split
19Use earlier factsL48–51

Instantiate or apply named facts and discharge the corresponding proof obligations.

  1. L48
    apply hext_witness_witness_right
  2. L49
    exact hsplit_right
  3. L50
    exact hold_witness_left
  4. L51
    exact hold_witness_right

Library-wide reading audit

Original defined command ledger · 51 lines
  1. 0001intro n
  2. 0002intro a
  3. 0003intro b
  4. 0004intro c
  5. 0005intro l
  6. 0006intro hprefix
  7. 0007have hchoice : ∃ x. Prime(S (a + l)) ∧ (∃ y. PowerValuation(S (a + l),n,y)Pow(S (a + l),y,x)) ∨ ¬Prime(S (a + l)) ∧ x = 1
    Exact native replay linehave hchoice : exists x. (((((~(S (a + l) = 1) /\ forall bpr_left_bpcifpe_last_choice_prime bpr_right_bpcifpe_last_choice_prime. S (a + l) = bpr_left_bpcifpe_last_choice_prime * bpr_right_bpcifpe_last_choice_prime -> bpr_left_bpcifpe_last_choice_prime = 1 \/ bpr_right_bpcifpe_last_choice_prime = 1)) /\ exists bpr_choice_exponent_bpcifpe_last_choice. ((((exists bpr_le_gap_bpcifpe_last_choice_valuation_selected_bound. bpr_le_gap_bpcifpe_last_choice_valuation_selected_bound + (bpr_choice_exponent_bpcifpe_last_choice) = (n)) /\ (exists bpr_power_value_bpcifpe_last_choice_valuation_selected. ((exists bpr_power_code_bpcifpe_last_choice_valuation_selected_power bpr_power_scale_bpcifpe_last_choice_valuation_selected_power. ((forall bpr_power_index_bpcifpe_last_choice_valuation_selected_power. (exists bpr_gap_bpcifpe_last_choice_valuation_selected_power_repeat_bound. bpr_gap_bpcifpe_last_choice_valuation_selected_power_repeat_bound + S (bpr_power_index_bpcifpe_last_choice_valuation_selected_power) = bpr_choice_exponent_bpcifpe_last_choice) -> (((exists bpr_height_bpcifpe_last_choice_valuation_selected_power_repeat_entry. bpr_height_bpcifpe_last_choice_valuation_selected_power_repeat_entry + S (S (a + l)) = S ((S (bpr_power_index_bpcifpe_last_choice_valuation_selected_power)) * bpr_power_scale_bpcifpe_last_choice_valuation_selected_power)) /\ exists bpr_quotient_bpcifpe_last_choice_valuation_selected_power_repeat_entry. bpr_power_code_bpcifpe_last_choice_valuation_selected_power = bpr_quotient_bpcifpe_last_choice_valuation_selected_power_repeat_entry * S ((S (bpr_power_index_bpcifpe_last_choice_valuation_selected_power)) * bpr_power_scale_bpcifpe_last_choice_valuation_selected_power) + (S (a + l))))) /\ (exists ff_u_bpcifpe_last_choice_valuation_selected_power_product ff_v_bpcifpe_last_choice_valuation_selected_power_product. ((((exists ff_h_bpcifpe_last_choice_valuation_selected_power_product_start. ff_h_bpcifpe_last_choice_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_bpcifpe_last_choice_valuation_selected_power_product)) /\ exists ff_q_bpcifpe_last_choice_valuation_selected_power_product_start. ff_u_bpcifpe_last_choice_valuation_selected_power_product = ff_q_bpcifpe_last_choice_valuation_selected_power_product_start * S ((S (0)) * ff_v_bpcifpe_last_choice_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_bpcifpe_last_choice_valuation_selected_power_product_terminal. ff_h_bpcifpe_last_choice_valuation_selected_power_product_terminal + S (bpr_power_value_bpcifpe_last_choice_valuation_selected) = S ((S (bpr_choice_exponent_bpcifpe_last_choice)) * ff_v_bpcifpe_last_choice_valuation_selected_power_product)) /\ exists ff_q_bpcifpe_last_choice_valuation_selected_power_product_terminal. ff_u_bpcifpe_last_choice_valuation_selected_power_product = ff_q_bpcifpe_last_choice_valuation_selected_power_product_terminal * S ((S (bpr_choice_exponent_bpcifpe_last_choice)) * ff_v_bpcifpe_last_choice_valuation_selected_power_product) + (bpr_power_value_bpcifpe_last_choice_valuation_selected))) /\ forall ff_i_bpcifpe_last_choice_valuation_selected_power_product. (exists ff_lt_bpcifpe_last_choice_valuation_selected_power_product_bound. ff_lt_bpcifpe_last_choice_valuation_selected_power_product_bound + S ff_i_bpcifpe_last_choice_valuation_selected_power_product = bpr_choice_exponent_bpcifpe_last_choice) -> exists ff_p_bpcifpe_last_choice_valuation_selected_power_product ff_r_bpcifpe_last_choice_valuation_selected_power_product ff_s_bpcifpe_last_choice_valuation_selected_power_product. ((((exists ff_h_bpcifpe_last_choice_valuation_selected_power_product_factor. ff_h_bpcifpe_last_choice_valuation_selected_power_product_factor + S (ff_p_bpcifpe_last_choice_valuation_selected_power_product) = S ((S (ff_i_bpcifpe_last_choice_valuation_selected_power_product)) * bpr_power_scale_bpcifpe_last_choice_valuation_selected_power)) /\ exists ff_q_bpcifpe_last_choice_valuation_selected_power_product_factor. bpr_power_code_bpcifpe_last_choice_valuation_selected_power = ff_q_bpcifpe_last_choice_valuation_selected_power_product_factor * S ((S (ff_i_bpcifpe_last_choice_valuation_selected_power_product)) * bpr_power_scale_bpcifpe_last_choice_valuation_selected_power) + (ff_p_bpcifpe_last_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcifpe_last_choice_valuation_selected_power_product_partial. ff_h_bpcifpe_last_choice_valuation_selected_power_product_partial + S (ff_r_bpcifpe_last_choice_valuation_selected_power_product) = S ((S (ff_i_bpcifpe_last_choice_valuation_selected_power_product)) * ff_v_bpcifpe_last_choice_valuation_selected_power_product)) /\ exists ff_q_bpcifpe_last_choice_valuation_selected_power_product_partial. ff_u_bpcifpe_last_choice_valuation_selected_power_product = ff_q_bpcifpe_last_choice_valuation_selected_power_product_partial * S ((S (ff_i_bpcifpe_last_choice_valuation_selected_power_product)) * ff_v_bpcifpe_last_choice_valuation_selected_power_product) + (ff_r_bpcifpe_last_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcifpe_last_choice_valuation_selected_power_product_successor. ff_h_bpcifpe_last_choice_valuation_selected_power_product_successor + S (ff_s_bpcifpe_last_choice_valuation_selected_power_product) = S ((S (S ff_i_bpcifpe_last_choice_valuation_selected_power_product)) * ff_v_bpcifpe_last_choice_valuation_selected_power_product)) /\ exists ff_q_bpcifpe_last_choice_valuation_selected_power_product_successor. ff_u_bpcifpe_last_choice_valuation_selected_power_product = ff_q_bpcifpe_last_choice_valuation_selected_power_product_successor * S ((S (S ff_i_bpcifpe_last_choice_valuation_selected_power_product)) * ff_v_bpcifpe_last_choice_valuation_selected_power_product) + (ff_s_bpcifpe_last_choice_valuation_selected_power_product))) /\ ff_s_bpcifpe_last_choice_valuation_selected_power_product = ff_r_bpcifpe_last_choice_valuation_selected_power_product * ff_p_bpcifpe_last_choice_valuation_selected_power_product)))))))) /\ (exists bpr_divides_quotient_bpcifpe_last_choice_valuation_selected_divides. n = (bpr_power_value_bpcifpe_last_choice_valuation_selected) * bpr_divides_quotient_bpcifpe_last_choice_valuation_selected_divides)))) /\ forall bpr_valuation_candidate_bpcifpe_last_choice_valuation. (exists bpr_le_gap_bpcifpe_last_choice_valuation_candidate_bound. bpr_le_gap_bpcifpe_last_choice_valuation_candidate_bound + (bpr_valuation_candidate_bpcifpe_last_choice_valuation) = (n)) -> (exists bpr_power_value_bpcifpe_last_choice_valuation_candidate. ((exists bpr_power_code_bpcifpe_last_choice_valuation_candidate_power bpr_power_scale_bpcifpe_last_choice_valuation_candidate_power. ((forall bpr_power_index_bpcifpe_last_choice_valuation_candidate_power. (exists bpr_gap_bpcifpe_last_choice_valuation_candidate_power_repeat_bound. bpr_gap_bpcifpe_last_choice_valuation_candidate_power_repeat_bound + S (bpr_power_index_bpcifpe_last_choice_valuation_candidate_power) = bpr_valuation_candidate_bpcifpe_last_choice_valuation) -> (((exists bpr_height_bpcifpe_last_choice_valuation_candidate_power_repeat_entry. bpr_height_bpcifpe_last_choice_valuation_candidate_power_repeat_entry + S (S (a + l)) = S ((S (bpr_power_index_bpcifpe_last_choice_valuation_candidate_power)) * bpr_power_scale_bpcifpe_last_choice_valuation_candidate_power)) /\ exists bpr_quotient_bpcifpe_last_choice_valuation_candidate_power_repeat_entry. bpr_power_code_bpcifpe_last_choice_valuation_candidate_power = bpr_quotient_bpcifpe_last_choice_valuation_candidate_power_repeat_entry * S ((S (bpr_power_index_bpcifpe_last_choice_valuation_candidate_power)) * bpr_power_scale_bpcifpe_last_choice_valuation_candidate_power) + (S (a + l))))) /\ (exists ff_u_bpcifpe_last_choice_valuation_candidate_power_product ff_v_bpcifpe_last_choice_valuation_candidate_power_product. ((((exists ff_h_bpcifpe_last_choice_valuation_candidate_power_product_start. ff_h_bpcifpe_last_choice_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_bpcifpe_last_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcifpe_last_choice_valuation_candidate_power_product_start. ff_u_bpcifpe_last_choice_valuation_candidate_power_product = ff_q_bpcifpe_last_choice_valuation_candidate_power_product_start * S ((S (0)) * ff_v_bpcifpe_last_choice_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_bpcifpe_last_choice_valuation_candidate_power_product_terminal. ff_h_bpcifpe_last_choice_valuation_candidate_power_product_terminal + S (bpr_power_value_bpcifpe_last_choice_valuation_candidate) = S ((S (bpr_valuation_candidate_bpcifpe_last_choice_valuation)) * ff_v_bpcifpe_last_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcifpe_last_choice_valuation_candidate_power_product_terminal. ff_u_bpcifpe_last_choice_valuation_candidate_power_product = ff_q_bpcifpe_last_choice_valuation_candidate_power_product_terminal * S ((S (bpr_valuation_candidate_bpcifpe_last_choice_valuation)) * ff_v_bpcifpe_last_choice_valuation_candidate_power_product) + (bpr_power_value_bpcifpe_last_choice_valuation_candidate))) /\ forall ff_i_bpcifpe_last_choice_valuation_candidate_power_product. (exists ff_lt_bpcifpe_last_choice_valuation_candidate_power_product_bound. ff_lt_bpcifpe_last_choice_valuation_candidate_power_product_bound + S ff_i_bpcifpe_last_choice_valuation_candidate_power_product = bpr_valuation_candidate_bpcifpe_last_choice_valuation) -> exists ff_p_bpcifpe_last_choice_valuation_candidate_power_product ff_r_bpcifpe_last_choice_valuation_candidate_power_product ff_s_bpcifpe_last_choice_valuation_candidate_power_product. ((((exists ff_h_bpcifpe_last_choice_valuation_candidate_power_product_factor. ff_h_bpcifpe_last_choice_valuation_candidate_power_product_factor + S (ff_p_bpcifpe_last_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcifpe_last_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcifpe_last_choice_valuation_candidate_power)) /\ exists ff_q_bpcifpe_last_choice_valuation_candidate_power_product_factor. bpr_power_code_bpcifpe_last_choice_valuation_candidate_power = ff_q_bpcifpe_last_choice_valuation_candidate_power_product_factor * S ((S (ff_i_bpcifpe_last_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcifpe_last_choice_valuation_candidate_power) + (ff_p_bpcifpe_last_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcifpe_last_choice_valuation_candidate_power_product_partial. ff_h_bpcifpe_last_choice_valuation_candidate_power_product_partial + S (ff_r_bpcifpe_last_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcifpe_last_choice_valuation_candidate_power_product)) * ff_v_bpcifpe_last_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcifpe_last_choice_valuation_candidate_power_product_partial. ff_u_bpcifpe_last_choice_valuation_candidate_power_product = ff_q_bpcifpe_last_choice_valuation_candidate_power_product_partial * S ((S (ff_i_bpcifpe_last_choice_valuation_candidate_power_product)) * ff_v_bpcifpe_last_choice_valuation_candidate_power_product) + (ff_r_bpcifpe_last_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcifpe_last_choice_valuation_candidate_power_product_successor. ff_h_bpcifpe_last_choice_valuation_candidate_power_product_successor + S (ff_s_bpcifpe_last_choice_valuation_candidate_power_product) = S ((S (S ff_i_bpcifpe_last_choice_valuation_candidate_power_product)) * ff_v_bpcifpe_last_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcifpe_last_choice_valuation_candidate_power_product_successor. ff_u_bpcifpe_last_choice_valuation_candidate_power_product = ff_q_bpcifpe_last_choice_valuation_candidate_power_product_successor * S ((S (S ff_i_bpcifpe_last_choice_valuation_candidate_power_product)) * ff_v_bpcifpe_last_choice_valuation_candidate_power_product) + (ff_s_bpcifpe_last_choice_valuation_candidate_power_product))) /\ ff_s_bpcifpe_last_choice_valuation_candidate_power_product = ff_r_bpcifpe_last_choice_valuation_candidate_power_product * ff_p_bpcifpe_last_choice_valuation_candidate_power_product)))))))) /\ (exists bpr_divides_quotient_bpcifpe_last_choice_valuation_candidate_divides. n = (bpr_power_value_bpcifpe_last_choice_valuation_candidate) * bpr_divides_quotient_bpcifpe_last_choice_valuation_candidate_divides))) -> (exists bpr_le_gap_bpcifpe_last_choice_valuation_candidate_below. bpr_le_gap_bpcifpe_last_choice_valuation_candidate_below + (bpr_valuation_candidate_bpcifpe_last_choice_valuation) = (bpr_choice_exponent_bpcifpe_last_choice))) /\ (exists bpr_power_code_bpcifpe_last_choice_power bpr_power_scale_bpcifpe_last_choice_power. ((forall bpr_power_index_bpcifpe_last_choice_power. (exists bpr_gap_bpcifpe_last_choice_power_repeat_bound. bpr_gap_bpcifpe_last_choice_power_repeat_bound + S (bpr_power_index_bpcifpe_last_choice_power) = bpr_choice_exponent_bpcifpe_last_choice) -> (((exists bpr_height_bpcifpe_last_choice_power_repeat_entry. bpr_height_bpcifpe_last_choice_power_repeat_entry + S (S (a + l)) = S ((S (bpr_power_index_bpcifpe_last_choice_power)) * bpr_power_scale_bpcifpe_last_choice_power)) /\ exists bpr_quotient_bpcifpe_last_choice_power_repeat_entry. bpr_power_code_bpcifpe_last_choice_power = bpr_quotient_bpcifpe_last_choice_power_repeat_entry * S ((S (bpr_power_index_bpcifpe_last_choice_power)) * bpr_power_scale_bpcifpe_last_choice_power) + (S (a + l))))) /\ (exists ff_u_bpcifpe_last_choice_power_product ff_v_bpcifpe_last_choice_power_product. ((((exists ff_h_bpcifpe_last_choice_power_product_start. ff_h_bpcifpe_last_choice_power_product_start + S (1) = S ((S (0)) * ff_v_bpcifpe_last_choice_power_product)) /\ exists ff_q_bpcifpe_last_choice_power_product_start. ff_u_bpcifpe_last_choice_power_product = ff_q_bpcifpe_last_choice_power_product_start * S ((S (0)) * ff_v_bpcifpe_last_choice_power_product) + (1))) /\ ((((exists ff_h_bpcifpe_last_choice_power_product_terminal. ff_h_bpcifpe_last_choice_power_product_terminal + S (x) = S ((S (bpr_choice_exponent_bpcifpe_last_choice)) * ff_v_bpcifpe_last_choice_power_product)) /\ exists ff_q_bpcifpe_last_choice_power_product_terminal. ff_u_bpcifpe_last_choice_power_product = ff_q_bpcifpe_last_choice_power_product_terminal * S ((S (bpr_choice_exponent_bpcifpe_last_choice)) * ff_v_bpcifpe_last_choice_power_product) + (x))) /\ forall ff_i_bpcifpe_last_choice_power_product. (exists ff_lt_bpcifpe_last_choice_power_product_bound. ff_lt_bpcifpe_last_choice_power_product_bound + S ff_i_bpcifpe_last_choice_power_product = bpr_choice_exponent_bpcifpe_last_choice) -> exists ff_p_bpcifpe_last_choice_power_product ff_r_bpcifpe_last_choice_power_product ff_s_bpcifpe_last_choice_power_product. ((((exists ff_h_bpcifpe_last_choice_power_product_factor. ff_h_bpcifpe_last_choice_power_product_factor + S (ff_p_bpcifpe_last_choice_power_product) = S ((S (ff_i_bpcifpe_last_choice_power_product)) * bpr_power_scale_bpcifpe_last_choice_power)) /\ exists ff_q_bpcifpe_last_choice_power_product_factor. bpr_power_code_bpcifpe_last_choice_power = ff_q_bpcifpe_last_choice_power_product_factor * S ((S (ff_i_bpcifpe_last_choice_power_product)) * bpr_power_scale_bpcifpe_last_choice_power) + (ff_p_bpcifpe_last_choice_power_product))) /\ ((((exists ff_h_bpcifpe_last_choice_power_product_partial. ff_h_bpcifpe_last_choice_power_product_partial + S (ff_r_bpcifpe_last_choice_power_product) = S ((S (ff_i_bpcifpe_last_choice_power_product)) * ff_v_bpcifpe_last_choice_power_product)) /\ exists ff_q_bpcifpe_last_choice_power_product_partial. ff_u_bpcifpe_last_choice_power_product = ff_q_bpcifpe_last_choice_power_product_partial * S ((S (ff_i_bpcifpe_last_choice_power_product)) * ff_v_bpcifpe_last_choice_power_product) + (ff_r_bpcifpe_last_choice_power_product))) /\ ((((exists ff_h_bpcifpe_last_choice_power_product_successor. ff_h_bpcifpe_last_choice_power_product_successor + S (ff_s_bpcifpe_last_choice_power_product) = S ((S (S ff_i_bpcifpe_last_choice_power_product)) * ff_v_bpcifpe_last_choice_power_product)) /\ exists ff_q_bpcifpe_last_choice_power_product_successor. ff_u_bpcifpe_last_choice_power_product = ff_q_bpcifpe_last_choice_power_product_successor * S ((S (S ff_i_bpcifpe_last_choice_power_product)) * ff_v_bpcifpe_last_choice_power_product) + (ff_s_bpcifpe_last_choice_power_product))) /\ ff_s_bpcifpe_last_choice_power_product = ff_r_bpcifpe_last_choice_power_product * ff_p_bpcifpe_last_choice_power_product)))))))))) \/ (~((~(S (a + l) = 1) /\ forall bpr_left_bpcifpe_last_choice_prime bpr_right_bpcifpe_last_choice_prime. S (a + l) = bpr_left_bpcifpe_last_choice_prime * bpr_right_bpcifpe_last_choice_prime -> bpr_left_bpcifpe_last_choice_prime = 1 \/ bpr_right_bpcifpe_last_choice_prime = 1)) /\ x = 1)))
  8. 0008specialize prime_contribution_choice_exists n
  9. 0009specialize prime_contribution_choice_exists (a + l)
  10. 0010exact prime_contribution_choice_exists
  11. 0011cases hchoice
  12. 0012have hext : ∃ d. ∃ e. BetaAt(d,e,l,x) ∧ (∀ y. ∀ z. Lt(y,l)BetaAt(b,c,y,z)BetaAt(d,e,y,z))
    Exact native replay linehave hext : exists d e. ((((exists bpr_height_bpcifpe_append. bpr_height_bpcifpe_append + S (x) = S ((S (l)) * e)) /\ exists bpr_quotient_bpcifpe_append. d = bpr_quotient_bpcifpe_append * S ((S (l)) * e) + (x))) /\ forall i p. (exists bpr_gap_bpcifpe_old_bound. bpr_gap_bpcifpe_old_bound + S (i) = l) -> (((exists bpr_height_bpcifpe_old. bpr_height_bpcifpe_old + S (p) = S ((S (i)) * c)) /\ exists bpr_quotient_bpcifpe_old. b = bpr_quotient_bpcifpe_old * S ((S (i)) * c) + (p))) -> (((exists bpr_height_bpcifpe_new. bpr_height_bpcifpe_new + S (p) = S ((S (i)) * e)) /\ exists bpr_quotient_bpcifpe_new. d = bpr_quotient_bpcifpe_new * S ((S (i)) * e) + (p))))
  13. 0013apply beta_prefix_extend
  14. 0014cases hext
  15. 0015cases hext_witness
  16. 0016cases hext_witness_witness
  17. 0017exists x1
  18. 0018exists x2
  19. 0019intro i
  20. 0020intro hi
  21. 0021have hsplit : i = l ∨ Lt(i,l)
    Exact native replay linehave hsplit : i = l \/ exists gap. gap + S i = l
  22. 0022apply finite_lt_succ_eq_or_lt
  23. 0023exact hi
  24. 0024cases hsplit
  25. 0025rewrite hsplit_left
  26. 0026rewrite hsplit_left
  27. 0027rewrite hsplit_left
  28. 0028rewrite hsplit_left
  29. 0029rewrite hsplit_left
  30. 0030rewrite hsplit_left
  31. 0031rewrite hsplit_left
  32. 0032rewrite hsplit_left
  33. 0033rewrite hsplit_left
  34. 0034rewrite hsplit_left
  35. 0035rewrite hsplit_left
  36. 0036rewrite hsplit_left
  37. 0037exists x
  38. 0038split
  39. 0039exact hext_witness_witness_left
  40. 0040exact hchoice_witness
  41. 0041have hold : ∃ p. BetaAt(b,c,i,p) ∧ (Prime(S (a + i)) ∧ (∃ x. PowerValuation(S (a + i),n,x)Pow(S (a + i),x,p)) ∨ ¬Prime(S (a + i)) ∧ p = 1)
    Exact native replay linehave hold : exists p. ((((exists bpr_height_bpcifpe_hold_decoded. bpr_height_bpcifpe_hold_decoded + S (p) = S ((S (i)) * c)) /\ exists bpr_quotient_bpcifpe_hold_decoded. b = bpr_quotient_bpcifpe_hold_decoded * S ((S (i)) * c) + (p))) /\ (((((~(S (a + i) = 1) /\ forall bpr_left_bpcifpe_hold_choice_prime bpr_right_bpcifpe_hold_choice_prime. S (a + i) = bpr_left_bpcifpe_hold_choice_prime * bpr_right_bpcifpe_hold_choice_prime -> bpr_left_bpcifpe_hold_choice_prime = 1 \/ bpr_right_bpcifpe_hold_choice_prime = 1)) /\ exists bpr_choice_exponent_bpcifpe_hold_choice. ((((exists bpr_le_gap_bpcifpe_hold_choice_valuation_selected_bound. bpr_le_gap_bpcifpe_hold_choice_valuation_selected_bound + (bpr_choice_exponent_bpcifpe_hold_choice) = (n)) /\ (exists bpr_power_value_bpcifpe_hold_choice_valuation_selected. ((exists bpr_power_code_bpcifpe_hold_choice_valuation_selected_power bpr_power_scale_bpcifpe_hold_choice_valuation_selected_power. ((forall bpr_power_index_bpcifpe_hold_choice_valuation_selected_power. (exists bpr_gap_bpcifpe_hold_choice_valuation_selected_power_repeat_bound. bpr_gap_bpcifpe_hold_choice_valuation_selected_power_repeat_bound + S (bpr_power_index_bpcifpe_hold_choice_valuation_selected_power) = bpr_choice_exponent_bpcifpe_hold_choice) -> (((exists bpr_height_bpcifpe_hold_choice_valuation_selected_power_repeat_entry. bpr_height_bpcifpe_hold_choice_valuation_selected_power_repeat_entry + S (S (a + i)) = S ((S (bpr_power_index_bpcifpe_hold_choice_valuation_selected_power)) * bpr_power_scale_bpcifpe_hold_choice_valuation_selected_power)) /\ exists bpr_quotient_bpcifpe_hold_choice_valuation_selected_power_repeat_entry. bpr_power_code_bpcifpe_hold_choice_valuation_selected_power = bpr_quotient_bpcifpe_hold_choice_valuation_selected_power_repeat_entry * S ((S (bpr_power_index_bpcifpe_hold_choice_valuation_selected_power)) * bpr_power_scale_bpcifpe_hold_choice_valuation_selected_power) + (S (a + i))))) /\ (exists ff_u_bpcifpe_hold_choice_valuation_selected_power_product ff_v_bpcifpe_hold_choice_valuation_selected_power_product. ((((exists ff_h_bpcifpe_hold_choice_valuation_selected_power_product_start. ff_h_bpcifpe_hold_choice_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_bpcifpe_hold_choice_valuation_selected_power_product)) /\ exists ff_q_bpcifpe_hold_choice_valuation_selected_power_product_start. ff_u_bpcifpe_hold_choice_valuation_selected_power_product = ff_q_bpcifpe_hold_choice_valuation_selected_power_product_start * S ((S (0)) * ff_v_bpcifpe_hold_choice_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_bpcifpe_hold_choice_valuation_selected_power_product_terminal. ff_h_bpcifpe_hold_choice_valuation_selected_power_product_terminal + S (bpr_power_value_bpcifpe_hold_choice_valuation_selected) = S ((S (bpr_choice_exponent_bpcifpe_hold_choice)) * ff_v_bpcifpe_hold_choice_valuation_selected_power_product)) /\ exists ff_q_bpcifpe_hold_choice_valuation_selected_power_product_terminal. ff_u_bpcifpe_hold_choice_valuation_selected_power_product = ff_q_bpcifpe_hold_choice_valuation_selected_power_product_terminal * S ((S (bpr_choice_exponent_bpcifpe_hold_choice)) * ff_v_bpcifpe_hold_choice_valuation_selected_power_product) + (bpr_power_value_bpcifpe_hold_choice_valuation_selected))) /\ forall ff_i_bpcifpe_hold_choice_valuation_selected_power_product. (exists ff_lt_bpcifpe_hold_choice_valuation_selected_power_product_bound. ff_lt_bpcifpe_hold_choice_valuation_selected_power_product_bound + S ff_i_bpcifpe_hold_choice_valuation_selected_power_product = bpr_choice_exponent_bpcifpe_hold_choice) -> exists ff_p_bpcifpe_hold_choice_valuation_selected_power_product ff_r_bpcifpe_hold_choice_valuation_selected_power_product ff_s_bpcifpe_hold_choice_valuation_selected_power_product. ((((exists ff_h_bpcifpe_hold_choice_valuation_selected_power_product_factor. ff_h_bpcifpe_hold_choice_valuation_selected_power_product_factor + S (ff_p_bpcifpe_hold_choice_valuation_selected_power_product) = S ((S (ff_i_bpcifpe_hold_choice_valuation_selected_power_product)) * bpr_power_scale_bpcifpe_hold_choice_valuation_selected_power)) /\ exists ff_q_bpcifpe_hold_choice_valuation_selected_power_product_factor. bpr_power_code_bpcifpe_hold_choice_valuation_selected_power = ff_q_bpcifpe_hold_choice_valuation_selected_power_product_factor * S ((S (ff_i_bpcifpe_hold_choice_valuation_selected_power_product)) * bpr_power_scale_bpcifpe_hold_choice_valuation_selected_power) + (ff_p_bpcifpe_hold_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcifpe_hold_choice_valuation_selected_power_product_partial. ff_h_bpcifpe_hold_choice_valuation_selected_power_product_partial + S (ff_r_bpcifpe_hold_choice_valuation_selected_power_product) = S ((S (ff_i_bpcifpe_hold_choice_valuation_selected_power_product)) * ff_v_bpcifpe_hold_choice_valuation_selected_power_product)) /\ exists ff_q_bpcifpe_hold_choice_valuation_selected_power_product_partial. ff_u_bpcifpe_hold_choice_valuation_selected_power_product = ff_q_bpcifpe_hold_choice_valuation_selected_power_product_partial * S ((S (ff_i_bpcifpe_hold_choice_valuation_selected_power_product)) * ff_v_bpcifpe_hold_choice_valuation_selected_power_product) + (ff_r_bpcifpe_hold_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcifpe_hold_choice_valuation_selected_power_product_successor. ff_h_bpcifpe_hold_choice_valuation_selected_power_product_successor + S (ff_s_bpcifpe_hold_choice_valuation_selected_power_product) = S ((S (S ff_i_bpcifpe_hold_choice_valuation_selected_power_product)) * ff_v_bpcifpe_hold_choice_valuation_selected_power_product)) /\ exists ff_q_bpcifpe_hold_choice_valuation_selected_power_product_successor. ff_u_bpcifpe_hold_choice_valuation_selected_power_product = ff_q_bpcifpe_hold_choice_valuation_selected_power_product_successor * S ((S (S ff_i_bpcifpe_hold_choice_valuation_selected_power_product)) * ff_v_bpcifpe_hold_choice_valuation_selected_power_product) + (ff_s_bpcifpe_hold_choice_valuation_selected_power_product))) /\ ff_s_bpcifpe_hold_choice_valuation_selected_power_product = ff_r_bpcifpe_hold_choice_valuation_selected_power_product * ff_p_bpcifpe_hold_choice_valuation_selected_power_product)))))))) /\ (exists bpr_divides_quotient_bpcifpe_hold_choice_valuation_selected_divides. n = (bpr_power_value_bpcifpe_hold_choice_valuation_selected) * bpr_divides_quotient_bpcifpe_hold_choice_valuation_selected_divides)))) /\ forall bpr_valuation_candidate_bpcifpe_hold_choice_valuation. (exists bpr_le_gap_bpcifpe_hold_choice_valuation_candidate_bound. bpr_le_gap_bpcifpe_hold_choice_valuation_candidate_bound + (bpr_valuation_candidate_bpcifpe_hold_choice_valuation) = (n)) -> (exists bpr_power_value_bpcifpe_hold_choice_valuation_candidate. ((exists bpr_power_code_bpcifpe_hold_choice_valuation_candidate_power bpr_power_scale_bpcifpe_hold_choice_valuation_candidate_power. ((forall bpr_power_index_bpcifpe_hold_choice_valuation_candidate_power. (exists bpr_gap_bpcifpe_hold_choice_valuation_candidate_power_repeat_bound. bpr_gap_bpcifpe_hold_choice_valuation_candidate_power_repeat_bound + S (bpr_power_index_bpcifpe_hold_choice_valuation_candidate_power) = bpr_valuation_candidate_bpcifpe_hold_choice_valuation) -> (((exists bpr_height_bpcifpe_hold_choice_valuation_candidate_power_repeat_entry. bpr_height_bpcifpe_hold_choice_valuation_candidate_power_repeat_entry + S (S (a + i)) = S ((S (bpr_power_index_bpcifpe_hold_choice_valuation_candidate_power)) * bpr_power_scale_bpcifpe_hold_choice_valuation_candidate_power)) /\ exists bpr_quotient_bpcifpe_hold_choice_valuation_candidate_power_repeat_entry. bpr_power_code_bpcifpe_hold_choice_valuation_candidate_power = bpr_quotient_bpcifpe_hold_choice_valuation_candidate_power_repeat_entry * S ((S (bpr_power_index_bpcifpe_hold_choice_valuation_candidate_power)) * bpr_power_scale_bpcifpe_hold_choice_valuation_candidate_power) + (S (a + i))))) /\ (exists ff_u_bpcifpe_hold_choice_valuation_candidate_power_product ff_v_bpcifpe_hold_choice_valuation_candidate_power_product. ((((exists ff_h_bpcifpe_hold_choice_valuation_candidate_power_product_start. ff_h_bpcifpe_hold_choice_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_bpcifpe_hold_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcifpe_hold_choice_valuation_candidate_power_product_start. ff_u_bpcifpe_hold_choice_valuation_candidate_power_product = ff_q_bpcifpe_hold_choice_valuation_candidate_power_product_start * S ((S (0)) * ff_v_bpcifpe_hold_choice_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_bpcifpe_hold_choice_valuation_candidate_power_product_terminal. ff_h_bpcifpe_hold_choice_valuation_candidate_power_product_terminal + S (bpr_power_value_bpcifpe_hold_choice_valuation_candidate) = S ((S (bpr_valuation_candidate_bpcifpe_hold_choice_valuation)) * ff_v_bpcifpe_hold_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcifpe_hold_choice_valuation_candidate_power_product_terminal. ff_u_bpcifpe_hold_choice_valuation_candidate_power_product = ff_q_bpcifpe_hold_choice_valuation_candidate_power_product_terminal * S ((S (bpr_valuation_candidate_bpcifpe_hold_choice_valuation)) * ff_v_bpcifpe_hold_choice_valuation_candidate_power_product) + (bpr_power_value_bpcifpe_hold_choice_valuation_candidate))) /\ forall ff_i_bpcifpe_hold_choice_valuation_candidate_power_product. (exists ff_lt_bpcifpe_hold_choice_valuation_candidate_power_product_bound. ff_lt_bpcifpe_hold_choice_valuation_candidate_power_product_bound + S ff_i_bpcifpe_hold_choice_valuation_candidate_power_product = bpr_valuation_candidate_bpcifpe_hold_choice_valuation) -> exists ff_p_bpcifpe_hold_choice_valuation_candidate_power_product ff_r_bpcifpe_hold_choice_valuation_candidate_power_product ff_s_bpcifpe_hold_choice_valuation_candidate_power_product. ((((exists ff_h_bpcifpe_hold_choice_valuation_candidate_power_product_factor. ff_h_bpcifpe_hold_choice_valuation_candidate_power_product_factor + S (ff_p_bpcifpe_hold_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcifpe_hold_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcifpe_hold_choice_valuation_candidate_power)) /\ exists ff_q_bpcifpe_hold_choice_valuation_candidate_power_product_factor. bpr_power_code_bpcifpe_hold_choice_valuation_candidate_power = ff_q_bpcifpe_hold_choice_valuation_candidate_power_product_factor * S ((S (ff_i_bpcifpe_hold_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcifpe_hold_choice_valuation_candidate_power) + (ff_p_bpcifpe_hold_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcifpe_hold_choice_valuation_candidate_power_product_partial. ff_h_bpcifpe_hold_choice_valuation_candidate_power_product_partial + S (ff_r_bpcifpe_hold_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcifpe_hold_choice_valuation_candidate_power_product)) * ff_v_bpcifpe_hold_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcifpe_hold_choice_valuation_candidate_power_product_partial. ff_u_bpcifpe_hold_choice_valuation_candidate_power_product = ff_q_bpcifpe_hold_choice_valuation_candidate_power_product_partial * S ((S (ff_i_bpcifpe_hold_choice_valuation_candidate_power_product)) * ff_v_bpcifpe_hold_choice_valuation_candidate_power_product) + (ff_r_bpcifpe_hold_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcifpe_hold_choice_valuation_candidate_power_product_successor. ff_h_bpcifpe_hold_choice_valuation_candidate_power_product_successor + S (ff_s_bpcifpe_hold_choice_valuation_candidate_power_product) = S ((S (S ff_i_bpcifpe_hold_choice_valuation_candidate_power_product)) * ff_v_bpcifpe_hold_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcifpe_hold_choice_valuation_candidate_power_product_successor. ff_u_bpcifpe_hold_choice_valuation_candidate_power_product = ff_q_bpcifpe_hold_choice_valuation_candidate_power_product_successor * S ((S (S ff_i_bpcifpe_hold_choice_valuation_candidate_power_product)) * ff_v_bpcifpe_hold_choice_valuation_candidate_power_product) + (ff_s_bpcifpe_hold_choice_valuation_candidate_power_product))) /\ ff_s_bpcifpe_hold_choice_valuation_candidate_power_product = ff_r_bpcifpe_hold_choice_valuation_candidate_power_product * ff_p_bpcifpe_hold_choice_valuation_candidate_power_product)))))))) /\ (exists bpr_divides_quotient_bpcifpe_hold_choice_valuation_candidate_divides. n = (bpr_power_value_bpcifpe_hold_choice_valuation_candidate) * bpr_divides_quotient_bpcifpe_hold_choice_valuation_candidate_divides))) -> (exists bpr_le_gap_bpcifpe_hold_choice_valuation_candidate_below. bpr_le_gap_bpcifpe_hold_choice_valuation_candidate_below + (bpr_valuation_candidate_bpcifpe_hold_choice_valuation) = (bpr_choice_exponent_bpcifpe_hold_choice))) /\ (exists bpr_power_code_bpcifpe_hold_choice_power bpr_power_scale_bpcifpe_hold_choice_power. ((forall bpr_power_index_bpcifpe_hold_choice_power. (exists bpr_gap_bpcifpe_hold_choice_power_repeat_bound. bpr_gap_bpcifpe_hold_choice_power_repeat_bound + S (bpr_power_index_bpcifpe_hold_choice_power) = bpr_choice_exponent_bpcifpe_hold_choice) -> (((exists bpr_height_bpcifpe_hold_choice_power_repeat_entry. bpr_height_bpcifpe_hold_choice_power_repeat_entry + S (S (a + i)) = S ((S (bpr_power_index_bpcifpe_hold_choice_power)) * bpr_power_scale_bpcifpe_hold_choice_power)) /\ exists bpr_quotient_bpcifpe_hold_choice_power_repeat_entry. bpr_power_code_bpcifpe_hold_choice_power = bpr_quotient_bpcifpe_hold_choice_power_repeat_entry * S ((S (bpr_power_index_bpcifpe_hold_choice_power)) * bpr_power_scale_bpcifpe_hold_choice_power) + (S (a + i))))) /\ (exists ff_u_bpcifpe_hold_choice_power_product ff_v_bpcifpe_hold_choice_power_product. ((((exists ff_h_bpcifpe_hold_choice_power_product_start. ff_h_bpcifpe_hold_choice_power_product_start + S (1) = S ((S (0)) * ff_v_bpcifpe_hold_choice_power_product)) /\ exists ff_q_bpcifpe_hold_choice_power_product_start. ff_u_bpcifpe_hold_choice_power_product = ff_q_bpcifpe_hold_choice_power_product_start * S ((S (0)) * ff_v_bpcifpe_hold_choice_power_product) + (1))) /\ ((((exists ff_h_bpcifpe_hold_choice_power_product_terminal. ff_h_bpcifpe_hold_choice_power_product_terminal + S (p) = S ((S (bpr_choice_exponent_bpcifpe_hold_choice)) * ff_v_bpcifpe_hold_choice_power_product)) /\ exists ff_q_bpcifpe_hold_choice_power_product_terminal. ff_u_bpcifpe_hold_choice_power_product = ff_q_bpcifpe_hold_choice_power_product_terminal * S ((S (bpr_choice_exponent_bpcifpe_hold_choice)) * ff_v_bpcifpe_hold_choice_power_product) + (p))) /\ forall ff_i_bpcifpe_hold_choice_power_product. (exists ff_lt_bpcifpe_hold_choice_power_product_bound. ff_lt_bpcifpe_hold_choice_power_product_bound + S ff_i_bpcifpe_hold_choice_power_product = bpr_choice_exponent_bpcifpe_hold_choice) -> exists ff_p_bpcifpe_hold_choice_power_product ff_r_bpcifpe_hold_choice_power_product ff_s_bpcifpe_hold_choice_power_product. ((((exists ff_h_bpcifpe_hold_choice_power_product_factor. ff_h_bpcifpe_hold_choice_power_product_factor + S (ff_p_bpcifpe_hold_choice_power_product) = S ((S (ff_i_bpcifpe_hold_choice_power_product)) * bpr_power_scale_bpcifpe_hold_choice_power)) /\ exists ff_q_bpcifpe_hold_choice_power_product_factor. bpr_power_code_bpcifpe_hold_choice_power = ff_q_bpcifpe_hold_choice_power_product_factor * S ((S (ff_i_bpcifpe_hold_choice_power_product)) * bpr_power_scale_bpcifpe_hold_choice_power) + (ff_p_bpcifpe_hold_choice_power_product))) /\ ((((exists ff_h_bpcifpe_hold_choice_power_product_partial. ff_h_bpcifpe_hold_choice_power_product_partial + S (ff_r_bpcifpe_hold_choice_power_product) = S ((S (ff_i_bpcifpe_hold_choice_power_product)) * ff_v_bpcifpe_hold_choice_power_product)) /\ exists ff_q_bpcifpe_hold_choice_power_product_partial. ff_u_bpcifpe_hold_choice_power_product = ff_q_bpcifpe_hold_choice_power_product_partial * S ((S (ff_i_bpcifpe_hold_choice_power_product)) * ff_v_bpcifpe_hold_choice_power_product) + (ff_r_bpcifpe_hold_choice_power_product))) /\ ((((exists ff_h_bpcifpe_hold_choice_power_product_successor. ff_h_bpcifpe_hold_choice_power_product_successor + S (ff_s_bpcifpe_hold_choice_power_product) = S ((S (S ff_i_bpcifpe_hold_choice_power_product)) * ff_v_bpcifpe_hold_choice_power_product)) /\ exists ff_q_bpcifpe_hold_choice_power_product_successor. ff_u_bpcifpe_hold_choice_power_product = ff_q_bpcifpe_hold_choice_power_product_successor * S ((S (S ff_i_bpcifpe_hold_choice_power_product)) * ff_v_bpcifpe_hold_choice_power_product) + (ff_s_bpcifpe_hold_choice_power_product))) /\ ff_s_bpcifpe_hold_choice_power_product = ff_r_bpcifpe_hold_choice_power_product * ff_p_bpcifpe_hold_choice_power_product)))))))))) \/ (~((~(S (a + i) = 1) /\ forall bpr_left_bpcifpe_hold_choice_prime bpr_right_bpcifpe_hold_choice_prime. S (a + i) = bpr_left_bpcifpe_hold_choice_prime * bpr_right_bpcifpe_hold_choice_prime -> bpr_left_bpcifpe_hold_choice_prime = 1 \/ bpr_right_bpcifpe_hold_choice_prime = 1)) /\ p = 1))))
  42. 0042apply hprefix
  43. 0043exact hsplit_right
  44. 0044cases hold
  45. 0045cases hold_witness
  46. 0046exists x3
  47. 0047split
  48. 0048apply hext_witness_witness_right
  49. 0049exact hsplit_right
  50. 0050exact hold_witness_left
  51. 0051exact hold_witness_right