BT0110 · Bertrand theorem

no_bertrand_middle_contribution_interval_le_primorial_interval

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

The middle contribution interval is bounded by its selector interval.

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. ∀ s. ∀ q. ∀ r. ∀ C. ∀ g. ∀ y. ∀ P. (∀ x. Lt(n,x)Le(x,n + n) → ¬Prime(x)) → Lt(2,n)FloorSqrt(n + n,s)DivRem(n + n,3,q,r)CentralBinom(n,C) → s + g = q → (∃ x. ∃ z. (∀ m. Lt(m,g) → ∃ k. BetaAt(x,z,m,k) ∧ (Prime(S (s + m)) ∧ (∃ i. PowerValuation(S (s + m),C,i)Pow(S (s + m),i,k)) ∨ ¬Prime(S (s + m)) ∧ k = 1)) ∧ Product(x,z,g,y)) → (∃ x. ∃ z. (∀ m. Lt(m,g) → ∃ k. BetaAt(x,z,m,k) ∧ (Prime(S (s + m)) ∧ k = S (s + m) ∨ ¬Prime(S (s + m)) ∧ k = 1)) ∧ Product(x,z,g,P)) → Le(y,P)

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

20 occurrences

In local proof propositions

16 occurrences

Exact expanded native-PA statement
forall n s q r C g y P. (forall bpr_prime_candidate_b5nbmcilpi_exclusion. ((exists bpr_gap_b5nbmcilpi_exclusion_lower. bpr_gap_b5nbmcilpi_exclusion_lower + S (n) = bpr_prime_candidate_b5nbmcilpi_exclusion) /\ (exists bpr_le_gap_b5nbmcilpi_exclusion_upper. bpr_le_gap_b5nbmcilpi_exclusion_upper + (bpr_prime_candidate_b5nbmcilpi_exclusion) = (n + n))) -> ~((~(bpr_prime_candidate_b5nbmcilpi_exclusion = 1) /\ forall bpr_left_b5nbmcilpi_exclusion_prime bpr_right_b5nbmcilpi_exclusion_prime. bpr_prime_candidate_b5nbmcilpi_exclusion = bpr_left_b5nbmcilpi_exclusion_prime * bpr_right_b5nbmcilpi_exclusion_prime -> bpr_left_b5nbmcilpi_exclusion_prime = 1 \/ bpr_right_b5nbmcilpi_exclusion_prime = 1))) -> (exists bcf_lt_gap_b5nbmcilpi_positive. bcf_lt_gap_b5nbmcilpi_positive + S (2) = n) -> (((exists bcs_sqrt_lower_gap_b5nbmcilpi_floor. bcs_sqrt_lower_gap_b5nbmcilpi_floor + (s) * (s) = (n + n)) /\ exists bcs_sqrt_upper_gap_b5nbmcilpi_floor. bcs_sqrt_upper_gap_b5nbmcilpi_floor + S (n + n) = S (s) * S (s))) -> (((n + n) = (3) * (q) + (r) /\ (exists bcf_lt_gap_b5nbmcilpi_division_bound. bcf_lt_gap_b5nbmcilpi_division_bound + S (r) = 3))) -> (((exists bcf_lt_gap_b5nbmcilpi_central_out_of_range. bcf_lt_gap_b5nbmcilpi_central_out_of_range + S (n + n) = n) /\ C = 0) \/ ((exists bcf_le_gap_b5nbmcilpi_central_in_range. bcf_le_gap_b5nbmcilpi_central_in_range + (n) = n + n) /\ (exists bcf_row_code_code_b5nbmcilpi_central bcf_row_code_scale_b5nbmcilpi_central bcf_row_scale_code_b5nbmcilpi_central bcf_row_scale_scale_b5nbmcilpi_central bcf_row_code_b5nbmcilpi_central bcf_row_scale_b5nbmcilpi_central. ((forall bcf_row_index_b5nbmcilpi_central_table. (exists bcf_lt_gap_b5nbmcilpi_central_table_row_bound. bcf_lt_gap_b5nbmcilpi_central_table_row_bound + S (bcf_row_index_b5nbmcilpi_central_table) = S (n + n)) -> exists bcf_row_code_b5nbmcilpi_central_table bcf_row_scale_b5nbmcilpi_central_table. ((((exists bcf_height_b5nbmcilpi_central_table_decoded_row_code. bcf_height_b5nbmcilpi_central_table_decoded_row_code + S (bcf_row_code_b5nbmcilpi_central_table) = S ((S (bcf_row_index_b5nbmcilpi_central_table)) * bcf_row_code_scale_b5nbmcilpi_central)) /\ exists bcf_quotient_b5nbmcilpi_central_table_decoded_row_code. bcf_row_code_code_b5nbmcilpi_central = bcf_quotient_b5nbmcilpi_central_table_decoded_row_code * S ((S (bcf_row_index_b5nbmcilpi_central_table)) * bcf_row_code_scale_b5nbmcilpi_central) + (bcf_row_code_b5nbmcilpi_central_table))) /\ ((((exists bcf_height_b5nbmcilpi_central_table_decoded_row_scale. bcf_height_b5nbmcilpi_central_table_decoded_row_scale + S (bcf_row_scale_b5nbmcilpi_central_table) = S ((S (bcf_row_index_b5nbmcilpi_central_table)) * bcf_row_scale_scale_b5nbmcilpi_central)) /\ exists bcf_quotient_b5nbmcilpi_central_table_decoded_row_scale. bcf_row_scale_code_b5nbmcilpi_central = bcf_quotient_b5nbmcilpi_central_table_decoded_row_scale * S ((S (bcf_row_index_b5nbmcilpi_central_table)) * bcf_row_scale_scale_b5nbmcilpi_central) + (bcf_row_scale_b5nbmcilpi_central_table))) /\ ((bcf_row_index_b5nbmcilpi_central_table = 0 /\ (forall bcf_index_b5nbmcilpi_central_table_zero_row. (exists bcf_lt_gap_b5nbmcilpi_central_table_zero_row_bound. bcf_lt_gap_b5nbmcilpi_central_table_zero_row_bound + S (bcf_index_b5nbmcilpi_central_table_zero_row) = S (n + n)) -> exists bcf_value_b5nbmcilpi_central_table_zero_row. ((((exists bcf_height_b5nbmcilpi_central_table_zero_row_entry. bcf_height_b5nbmcilpi_central_table_zero_row_entry + S (bcf_value_b5nbmcilpi_central_table_zero_row) = S ((S (bcf_index_b5nbmcilpi_central_table_zero_row)) * bcf_row_scale_b5nbmcilpi_central_table)) /\ exists bcf_quotient_b5nbmcilpi_central_table_zero_row_entry. bcf_row_code_b5nbmcilpi_central_table = bcf_quotient_b5nbmcilpi_central_table_zero_row_entry * S ((S (bcf_index_b5nbmcilpi_central_table_zero_row)) * bcf_row_scale_b5nbmcilpi_central_table) + (bcf_value_b5nbmcilpi_central_table_zero_row))) /\ ((bcf_index_b5nbmcilpi_central_table_zero_row = 0 /\ bcf_value_b5nbmcilpi_central_table_zero_row = 1) \/ exists bcf_predecessor_b5nbmcilpi_central_table_zero_row. bcf_index_b5nbmcilpi_central_table_zero_row = S bcf_predecessor_b5nbmcilpi_central_table_zero_row /\ bcf_value_b5nbmcilpi_central_table_zero_row = 0)))) \/ exists bcf_predecessor_b5nbmcilpi_central_table bcf_previous_code_b5nbmcilpi_central_table bcf_previous_scale_b5nbmcilpi_central_table. bcf_row_index_b5nbmcilpi_central_table = S bcf_predecessor_b5nbmcilpi_central_table /\ ((((exists bcf_height_b5nbmcilpi_central_table_decoded_previous_code. bcf_height_b5nbmcilpi_central_table_decoded_previous_code + S (bcf_previous_code_b5nbmcilpi_central_table) = S ((S (bcf_predecessor_b5nbmcilpi_central_table)) * bcf_row_code_scale_b5nbmcilpi_central)) /\ exists bcf_quotient_b5nbmcilpi_central_table_decoded_previous_code. bcf_row_code_code_b5nbmcilpi_central = bcf_quotient_b5nbmcilpi_central_table_decoded_previous_code * S ((S (bcf_predecessor_b5nbmcilpi_central_table)) * bcf_row_code_scale_b5nbmcilpi_central) + (bcf_previous_code_b5nbmcilpi_central_table))) /\ ((((exists bcf_height_b5nbmcilpi_central_table_decoded_previous_scale. bcf_height_b5nbmcilpi_central_table_decoded_previous_scale + S (bcf_previous_scale_b5nbmcilpi_central_table) = S ((S (bcf_predecessor_b5nbmcilpi_central_table)) * bcf_row_scale_scale_b5nbmcilpi_central)) /\ exists bcf_quotient_b5nbmcilpi_central_table_decoded_previous_scale. bcf_row_scale_code_b5nbmcilpi_central = bcf_quotient_b5nbmcilpi_central_table_decoded_previous_scale * S ((S (bcf_predecessor_b5nbmcilpi_central_table)) * bcf_row_scale_scale_b5nbmcilpi_central) + (bcf_previous_scale_b5nbmcilpi_central_table))) /\ (forall bcf_index_b5nbmcilpi_central_table_row_step. (exists bcf_lt_gap_b5nbmcilpi_central_table_row_step_bound. bcf_lt_gap_b5nbmcilpi_central_table_row_step_bound + S (bcf_index_b5nbmcilpi_central_table_row_step) = S (n + n)) -> exists bcf_value_b5nbmcilpi_central_table_row_step. ((((exists bcf_height_b5nbmcilpi_central_table_row_step_entry. bcf_height_b5nbmcilpi_central_table_row_step_entry + S (bcf_value_b5nbmcilpi_central_table_row_step) = S ((S (bcf_index_b5nbmcilpi_central_table_row_step)) * bcf_row_scale_b5nbmcilpi_central_table)) /\ exists bcf_quotient_b5nbmcilpi_central_table_row_step_entry. bcf_row_code_b5nbmcilpi_central_table = bcf_quotient_b5nbmcilpi_central_table_row_step_entry * S ((S (bcf_index_b5nbmcilpi_central_table_row_step)) * bcf_row_scale_b5nbmcilpi_central_table) + (bcf_value_b5nbmcilpi_central_table_row_step))) /\ ((bcf_index_b5nbmcilpi_central_table_row_step = 0 /\ bcf_value_b5nbmcilpi_central_table_row_step = 1) \/ exists bcf_predecessor_b5nbmcilpi_central_table_row_step bcf_left_b5nbmcilpi_central_table_row_step bcf_right_b5nbmcilpi_central_table_row_step. bcf_index_b5nbmcilpi_central_table_row_step = S bcf_predecessor_b5nbmcilpi_central_table_row_step /\ ((((exists bcf_height_b5nbmcilpi_central_table_row_step_previous_left. bcf_height_b5nbmcilpi_central_table_row_step_previous_left + S (bcf_left_b5nbmcilpi_central_table_row_step) = S ((S (bcf_predecessor_b5nbmcilpi_central_table_row_step)) * bcf_previous_scale_b5nbmcilpi_central_table)) /\ exists bcf_quotient_b5nbmcilpi_central_table_row_step_previous_left. bcf_previous_code_b5nbmcilpi_central_table = bcf_quotient_b5nbmcilpi_central_table_row_step_previous_left * S ((S (bcf_predecessor_b5nbmcilpi_central_table_row_step)) * bcf_previous_scale_b5nbmcilpi_central_table) + (bcf_left_b5nbmcilpi_central_table_row_step))) /\ ((((exists bcf_height_b5nbmcilpi_central_table_row_step_previous_right. bcf_height_b5nbmcilpi_central_table_row_step_previous_right + S (bcf_right_b5nbmcilpi_central_table_row_step) = S ((S (S (bcf_predecessor_b5nbmcilpi_central_table_row_step))) * bcf_previous_scale_b5nbmcilpi_central_table)) /\ exists bcf_quotient_b5nbmcilpi_central_table_row_step_previous_right. bcf_previous_code_b5nbmcilpi_central_table = bcf_quotient_b5nbmcilpi_central_table_row_step_previous_right * S ((S (S (bcf_predecessor_b5nbmcilpi_central_table_row_step))) * bcf_previous_scale_b5nbmcilpi_central_table) + (bcf_right_b5nbmcilpi_central_table_row_step))) /\ bcf_value_b5nbmcilpi_central_table_row_step = bcf_left_b5nbmcilpi_central_table_row_step + bcf_right_b5nbmcilpi_central_table_row_step))))))))))) /\ ((((exists bcf_height_b5nbmcilpi_central_decoded_row_code. bcf_height_b5nbmcilpi_central_decoded_row_code + S (bcf_row_code_b5nbmcilpi_central) = S ((S (n + n)) * bcf_row_code_scale_b5nbmcilpi_central)) /\ exists bcf_quotient_b5nbmcilpi_central_decoded_row_code. bcf_row_code_code_b5nbmcilpi_central = bcf_quotient_b5nbmcilpi_central_decoded_row_code * S ((S (n + n)) * bcf_row_code_scale_b5nbmcilpi_central) + (bcf_row_code_b5nbmcilpi_central))) /\ ((((exists bcf_height_b5nbmcilpi_central_decoded_row_scale. bcf_height_b5nbmcilpi_central_decoded_row_scale + S (bcf_row_scale_b5nbmcilpi_central) = S ((S (n + n)) * bcf_row_scale_scale_b5nbmcilpi_central)) /\ exists bcf_quotient_b5nbmcilpi_central_decoded_row_scale. bcf_row_scale_code_b5nbmcilpi_central = bcf_quotient_b5nbmcilpi_central_decoded_row_scale * S ((S (n + n)) * bcf_row_scale_scale_b5nbmcilpi_central) + (bcf_row_scale_b5nbmcilpi_central))) /\ (((exists bcf_height_b5nbmcilpi_central_decoded_value. bcf_height_b5nbmcilpi_central_decoded_value + S (C) = S ((S (n)) * bcf_row_scale_b5nbmcilpi_central)) /\ exists bcf_quotient_b5nbmcilpi_central_decoded_value. bcf_row_code_b5nbmcilpi_central = bcf_quotient_b5nbmcilpi_central_decoded_value * S ((S (n)) * bcf_row_scale_b5nbmcilpi_central) + (C))))))))) -> s + g = q -> (exists bpr_code_b5nbmcilpi_contribution bpr_scale_b5nbmcilpi_contribution. ((forall bpr_index_b5nbmcilpi_contribution_prefix. (exists bpr_gap_b5nbmcilpi_contribution_prefix_bound. bpr_gap_b5nbmcilpi_contribution_prefix_bound + S (bpr_index_b5nbmcilpi_contribution_prefix) = g) -> exists bpr_value_b5nbmcilpi_contribution_prefix. ((((exists bpr_height_b5nbmcilpi_contribution_prefix_decoded. bpr_height_b5nbmcilpi_contribution_prefix_decoded + S (bpr_value_b5nbmcilpi_contribution_prefix) = S ((S (bpr_index_b5nbmcilpi_contribution_prefix)) * bpr_scale_b5nbmcilpi_contribution)) /\ exists bpr_quotient_b5nbmcilpi_contribution_prefix_decoded. bpr_code_b5nbmcilpi_contribution = bpr_quotient_b5nbmcilpi_contribution_prefix_decoded * S ((S (bpr_index_b5nbmcilpi_contribution_prefix)) * bpr_scale_b5nbmcilpi_contribution) + (bpr_value_b5nbmcilpi_contribution_prefix))) /\ (((((~(S (s + bpr_index_b5nbmcilpi_contribution_prefix) = 1) /\ forall bpr_left_b5nbmcilpi_contribution_prefix_choice_prime bpr_right_b5nbmcilpi_contribution_prefix_choice_prime. S (s + bpr_index_b5nbmcilpi_contribution_prefix) = bpr_left_b5nbmcilpi_contribution_prefix_choice_prime * bpr_right_b5nbmcilpi_contribution_prefix_choice_prime -> bpr_left_b5nbmcilpi_contribution_prefix_choice_prime = 1 \/ bpr_right_b5nbmcilpi_contribution_prefix_choice_prime = 1)) /\ exists bpr_choice_exponent_b5nbmcilpi_contribution_prefix_choice. ((((exists bpr_le_gap_b5nbmcilpi_contribution_prefix_choice_valuation_selected_bound. bpr_le_gap_b5nbmcilpi_contribution_prefix_choice_valuation_selected_bound + (bpr_choice_exponent_b5nbmcilpi_contribution_prefix_choice) = (C)) /\ (exists bpr_power_value_b5nbmcilpi_contribution_prefix_choice_valuation_selected. ((exists bpr_power_code_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power bpr_power_scale_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power. ((forall bpr_power_index_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power. (exists bpr_gap_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_repeat_bound. bpr_gap_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_repeat_bound + S (bpr_power_index_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power) = bpr_choice_exponent_b5nbmcilpi_contribution_prefix_choice) -> (((exists bpr_height_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_repeat_entry. bpr_height_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_repeat_entry + S (S (s + bpr_index_b5nbmcilpi_contribution_prefix)) = S ((S (bpr_power_index_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power)) * bpr_power_scale_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power)) /\ exists bpr_quotient_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_repeat_entry. bpr_power_code_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power = bpr_quotient_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_repeat_entry * S ((S (bpr_power_index_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power)) * bpr_power_scale_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power) + (S (s + bpr_index_b5nbmcilpi_contribution_prefix))))) /\ (exists ff_u_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product. ((((exists ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_start. ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product)) /\ exists ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_start. ff_u_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product = ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_start * S ((S (0)) * ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_terminal. ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_terminal + S (bpr_power_value_b5nbmcilpi_contribution_prefix_choice_valuation_selected) = S ((S (bpr_choice_exponent_b5nbmcilpi_contribution_prefix_choice)) * ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product)) /\ exists ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_terminal. ff_u_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product = ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_terminal * S ((S (bpr_choice_exponent_b5nbmcilpi_contribution_prefix_choice)) * ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product) + (bpr_power_value_b5nbmcilpi_contribution_prefix_choice_valuation_selected))) /\ forall ff_i_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product. (exists ff_lt_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_bound. ff_lt_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_bound + S ff_i_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product = bpr_choice_exponent_b5nbmcilpi_contribution_prefix_choice) -> exists ff_p_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product ff_r_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product ff_s_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product. ((((exists ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_factor. ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_factor + S (ff_p_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product) = S ((S (ff_i_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product)) * bpr_power_scale_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power)) /\ exists ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_factor. bpr_power_code_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power = ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_factor * S ((S (ff_i_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product)) * bpr_power_scale_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power) + (ff_p_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product))) /\ ((((exists ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_partial. ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_partial + S (ff_r_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product) = S ((S (ff_i_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product)) * ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product)) /\ exists ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_partial. ff_u_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product = ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_partial * S ((S (ff_i_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product)) * ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product) + (ff_r_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product))) /\ ((((exists ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_successor. ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_successor + S (ff_s_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product) = S ((S (S ff_i_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product)) * ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product)) /\ exists ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_successor. ff_u_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product = ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product_successor * S ((S (S ff_i_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product)) * ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product) + (ff_s_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product))) /\ ff_s_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product = ff_r_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product * ff_p_b5nbmcilpi_contribution_prefix_choice_valuation_selected_power_product)))))))) /\ (exists bpr_divides_quotient_b5nbmcilpi_contribution_prefix_choice_valuation_selected_divides. C = (bpr_power_value_b5nbmcilpi_contribution_prefix_choice_valuation_selected) * bpr_divides_quotient_b5nbmcilpi_contribution_prefix_choice_valuation_selected_divides)))) /\ forall bpr_valuation_candidate_b5nbmcilpi_contribution_prefix_choice_valuation. (exists bpr_le_gap_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_bound. bpr_le_gap_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_bound + (bpr_valuation_candidate_b5nbmcilpi_contribution_prefix_choice_valuation) = (C)) -> (exists bpr_power_value_b5nbmcilpi_contribution_prefix_choice_valuation_candidate. ((exists bpr_power_code_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power bpr_power_scale_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power. ((forall bpr_power_index_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power. (exists bpr_gap_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_repeat_bound. bpr_gap_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_repeat_bound + S (bpr_power_index_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power) = bpr_valuation_candidate_b5nbmcilpi_contribution_prefix_choice_valuation) -> (((exists bpr_height_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_repeat_entry. bpr_height_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_repeat_entry + S (S (s + bpr_index_b5nbmcilpi_contribution_prefix)) = S ((S (bpr_power_index_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power)) * bpr_power_scale_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power)) /\ exists bpr_quotient_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_repeat_entry. bpr_power_code_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power = bpr_quotient_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_repeat_entry * S ((S (bpr_power_index_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power)) * bpr_power_scale_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power) + (S (s + bpr_index_b5nbmcilpi_contribution_prefix))))) /\ (exists ff_u_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product. ((((exists ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_start. ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product)) /\ exists ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_start. ff_u_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product = ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_start * S ((S (0)) * ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_terminal. ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_terminal + S (bpr_power_value_b5nbmcilpi_contribution_prefix_choice_valuation_candidate) = S ((S (bpr_valuation_candidate_b5nbmcilpi_contribution_prefix_choice_valuation)) * ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product)) /\ exists ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_terminal. ff_u_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product = ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_terminal * S ((S (bpr_valuation_candidate_b5nbmcilpi_contribution_prefix_choice_valuation)) * ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product) + (bpr_power_value_b5nbmcilpi_contribution_prefix_choice_valuation_candidate))) /\ forall ff_i_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product. (exists ff_lt_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_bound. ff_lt_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_bound + S ff_i_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product = bpr_valuation_candidate_b5nbmcilpi_contribution_prefix_choice_valuation) -> exists ff_p_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product ff_r_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product ff_s_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product. ((((exists ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_factor. ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_factor + S (ff_p_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product) = S ((S (ff_i_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product)) * bpr_power_scale_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power)) /\ exists ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_factor. bpr_power_code_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power = ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_factor * S ((S (ff_i_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product)) * bpr_power_scale_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power) + (ff_p_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_partial. ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_partial + S (ff_r_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product) = S ((S (ff_i_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product)) * ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product)) /\ exists ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_partial. ff_u_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product = ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_partial * S ((S (ff_i_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product)) * ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product) + (ff_r_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_successor. ff_h_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_successor + S (ff_s_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product) = S ((S (S ff_i_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product)) * ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product)) /\ exists ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_successor. ff_u_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product = ff_q_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product_successor * S ((S (S ff_i_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product)) * ff_v_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product) + (ff_s_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product))) /\ ff_s_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product = ff_r_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product * ff_p_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_power_product)))))))) /\ (exists bpr_divides_quotient_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_divides. C = (bpr_power_value_b5nbmcilpi_contribution_prefix_choice_valuation_candidate) * bpr_divides_quotient_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_divides))) -> (exists bpr_le_gap_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_below. bpr_le_gap_b5nbmcilpi_contribution_prefix_choice_valuation_candidate_below + (bpr_valuation_candidate_b5nbmcilpi_contribution_prefix_choice_valuation) = (bpr_choice_exponent_b5nbmcilpi_contribution_prefix_choice))) /\ (exists bpr_power_code_b5nbmcilpi_contribution_prefix_choice_power bpr_power_scale_b5nbmcilpi_contribution_prefix_choice_power. ((forall bpr_power_index_b5nbmcilpi_contribution_prefix_choice_power. (exists bpr_gap_b5nbmcilpi_contribution_prefix_choice_power_repeat_bound. bpr_gap_b5nbmcilpi_contribution_prefix_choice_power_repeat_bound + S (bpr_power_index_b5nbmcilpi_contribution_prefix_choice_power) = bpr_choice_exponent_b5nbmcilpi_contribution_prefix_choice) -> (((exists bpr_height_b5nbmcilpi_contribution_prefix_choice_power_repeat_entry. bpr_height_b5nbmcilpi_contribution_prefix_choice_power_repeat_entry + S (S (s + bpr_index_b5nbmcilpi_contribution_prefix)) = S ((S (bpr_power_index_b5nbmcilpi_contribution_prefix_choice_power)) * bpr_power_scale_b5nbmcilpi_contribution_prefix_choice_power)) /\ exists bpr_quotient_b5nbmcilpi_contribution_prefix_choice_power_repeat_entry. bpr_power_code_b5nbmcilpi_contribution_prefix_choice_power = bpr_quotient_b5nbmcilpi_contribution_prefix_choice_power_repeat_entry * S ((S (bpr_power_index_b5nbmcilpi_contribution_prefix_choice_power)) * bpr_power_scale_b5nbmcilpi_contribution_prefix_choice_power) + (S (s + bpr_index_b5nbmcilpi_contribution_prefix))))) /\ (exists ff_u_b5nbmcilpi_contribution_prefix_choice_power_product ff_v_b5nbmcilpi_contribution_prefix_choice_power_product. ((((exists ff_h_b5nbmcilpi_contribution_prefix_choice_power_product_start. ff_h_b5nbmcilpi_contribution_prefix_choice_power_product_start + S (1) = S ((S (0)) * ff_v_b5nbmcilpi_contribution_prefix_choice_power_product)) /\ exists ff_q_b5nbmcilpi_contribution_prefix_choice_power_product_start. ff_u_b5nbmcilpi_contribution_prefix_choice_power_product = ff_q_b5nbmcilpi_contribution_prefix_choice_power_product_start * S ((S (0)) * ff_v_b5nbmcilpi_contribution_prefix_choice_power_product) + (1))) /\ ((((exists ff_h_b5nbmcilpi_contribution_prefix_choice_power_product_terminal. ff_h_b5nbmcilpi_contribution_prefix_choice_power_product_terminal + S (bpr_value_b5nbmcilpi_contribution_prefix) = S ((S (bpr_choice_exponent_b5nbmcilpi_contribution_prefix_choice)) * ff_v_b5nbmcilpi_contribution_prefix_choice_power_product)) /\ exists ff_q_b5nbmcilpi_contribution_prefix_choice_power_product_terminal. ff_u_b5nbmcilpi_contribution_prefix_choice_power_product = ff_q_b5nbmcilpi_contribution_prefix_choice_power_product_terminal * S ((S (bpr_choice_exponent_b5nbmcilpi_contribution_prefix_choice)) * ff_v_b5nbmcilpi_contribution_prefix_choice_power_product) + (bpr_value_b5nbmcilpi_contribution_prefix))) /\ forall ff_i_b5nbmcilpi_contribution_prefix_choice_power_product. (exists ff_lt_b5nbmcilpi_contribution_prefix_choice_power_product_bound. ff_lt_b5nbmcilpi_contribution_prefix_choice_power_product_bound + S ff_i_b5nbmcilpi_contribution_prefix_choice_power_product = bpr_choice_exponent_b5nbmcilpi_contribution_prefix_choice) -> exists ff_p_b5nbmcilpi_contribution_prefix_choice_power_product ff_r_b5nbmcilpi_contribution_prefix_choice_power_product ff_s_b5nbmcilpi_contribution_prefix_choice_power_product. ((((exists ff_h_b5nbmcilpi_contribution_prefix_choice_power_product_factor. ff_h_b5nbmcilpi_contribution_prefix_choice_power_product_factor + S (ff_p_b5nbmcilpi_contribution_prefix_choice_power_product) = S ((S (ff_i_b5nbmcilpi_contribution_prefix_choice_power_product)) * bpr_power_scale_b5nbmcilpi_contribution_prefix_choice_power)) /\ exists ff_q_b5nbmcilpi_contribution_prefix_choice_power_product_factor. bpr_power_code_b5nbmcilpi_contribution_prefix_choice_power = ff_q_b5nbmcilpi_contribution_prefix_choice_power_product_factor * S ((S (ff_i_b5nbmcilpi_contribution_prefix_choice_power_product)) * bpr_power_scale_b5nbmcilpi_contribution_prefix_choice_power) + (ff_p_b5nbmcilpi_contribution_prefix_choice_power_product))) /\ ((((exists ff_h_b5nbmcilpi_contribution_prefix_choice_power_product_partial. ff_h_b5nbmcilpi_contribution_prefix_choice_power_product_partial + S (ff_r_b5nbmcilpi_contribution_prefix_choice_power_product) = S ((S (ff_i_b5nbmcilpi_contribution_prefix_choice_power_product)) * ff_v_b5nbmcilpi_contribution_prefix_choice_power_product)) /\ exists ff_q_b5nbmcilpi_contribution_prefix_choice_power_product_partial. ff_u_b5nbmcilpi_contribution_prefix_choice_power_product = ff_q_b5nbmcilpi_contribution_prefix_choice_power_product_partial * S ((S (ff_i_b5nbmcilpi_contribution_prefix_choice_power_product)) * ff_v_b5nbmcilpi_contribution_prefix_choice_power_product) + (ff_r_b5nbmcilpi_contribution_prefix_choice_power_product))) /\ ((((exists ff_h_b5nbmcilpi_contribution_prefix_choice_power_product_successor. ff_h_b5nbmcilpi_contribution_prefix_choice_power_product_successor + S (ff_s_b5nbmcilpi_contribution_prefix_choice_power_product) = S ((S (S ff_i_b5nbmcilpi_contribution_prefix_choice_power_product)) * ff_v_b5nbmcilpi_contribution_prefix_choice_power_product)) /\ exists ff_q_b5nbmcilpi_contribution_prefix_choice_power_product_successor. ff_u_b5nbmcilpi_contribution_prefix_choice_power_product = ff_q_b5nbmcilpi_contribution_prefix_choice_power_product_successor * S ((S (S ff_i_b5nbmcilpi_contribution_prefix_choice_power_product)) * ff_v_b5nbmcilpi_contribution_prefix_choice_power_product) + (ff_s_b5nbmcilpi_contribution_prefix_choice_power_product))) /\ ff_s_b5nbmcilpi_contribution_prefix_choice_power_product = ff_r_b5nbmcilpi_contribution_prefix_choice_power_product * ff_p_b5nbmcilpi_contribution_prefix_choice_power_product)))))))))) \/ (~((~(S (s + bpr_index_b5nbmcilpi_contribution_prefix) = 1) /\ forall bpr_left_b5nbmcilpi_contribution_prefix_choice_prime bpr_right_b5nbmcilpi_contribution_prefix_choice_prime. S (s + bpr_index_b5nbmcilpi_contribution_prefix) = bpr_left_b5nbmcilpi_contribution_prefix_choice_prime * bpr_right_b5nbmcilpi_contribution_prefix_choice_prime -> bpr_left_b5nbmcilpi_contribution_prefix_choice_prime = 1 \/ bpr_right_b5nbmcilpi_contribution_prefix_choice_prime = 1)) /\ bpr_value_b5nbmcilpi_contribution_prefix = 1))))) /\ (exists ff_u_b5nbmcilpi_contribution_product ff_v_b5nbmcilpi_contribution_product. ((((exists ff_h_b5nbmcilpi_contribution_product_start. ff_h_b5nbmcilpi_contribution_product_start + S (1) = S ((S (0)) * ff_v_b5nbmcilpi_contribution_product)) /\ exists ff_q_b5nbmcilpi_contribution_product_start. ff_u_b5nbmcilpi_contribution_product = ff_q_b5nbmcilpi_contribution_product_start * S ((S (0)) * ff_v_b5nbmcilpi_contribution_product) + (1))) /\ ((((exists ff_h_b5nbmcilpi_contribution_product_terminal. ff_h_b5nbmcilpi_contribution_product_terminal + S (y) = S ((S (g)) * ff_v_b5nbmcilpi_contribution_product)) /\ exists ff_q_b5nbmcilpi_contribution_product_terminal. ff_u_b5nbmcilpi_contribution_product = ff_q_b5nbmcilpi_contribution_product_terminal * S ((S (g)) * ff_v_b5nbmcilpi_contribution_product) + (y))) /\ forall ff_i_b5nbmcilpi_contribution_product. (exists ff_lt_b5nbmcilpi_contribution_product_bound. ff_lt_b5nbmcilpi_contribution_product_bound + S ff_i_b5nbmcilpi_contribution_product = g) -> exists ff_p_b5nbmcilpi_contribution_product ff_r_b5nbmcilpi_contribution_product ff_s_b5nbmcilpi_contribution_product. ((((exists ff_h_b5nbmcilpi_contribution_product_factor. ff_h_b5nbmcilpi_contribution_product_factor + S (ff_p_b5nbmcilpi_contribution_product) = S ((S (ff_i_b5nbmcilpi_contribution_product)) * bpr_scale_b5nbmcilpi_contribution)) /\ exists ff_q_b5nbmcilpi_contribution_product_factor. bpr_code_b5nbmcilpi_contribution = ff_q_b5nbmcilpi_contribution_product_factor * S ((S (ff_i_b5nbmcilpi_contribution_product)) * bpr_scale_b5nbmcilpi_contribution) + (ff_p_b5nbmcilpi_contribution_product))) /\ ((((exists ff_h_b5nbmcilpi_contribution_product_partial. ff_h_b5nbmcilpi_contribution_product_partial + S (ff_r_b5nbmcilpi_contribution_product) = S ((S (ff_i_b5nbmcilpi_contribution_product)) * ff_v_b5nbmcilpi_contribution_product)) /\ exists ff_q_b5nbmcilpi_contribution_product_partial. ff_u_b5nbmcilpi_contribution_product = ff_q_b5nbmcilpi_contribution_product_partial * S ((S (ff_i_b5nbmcilpi_contribution_product)) * ff_v_b5nbmcilpi_contribution_product) + (ff_r_b5nbmcilpi_contribution_product))) /\ ((((exists ff_h_b5nbmcilpi_contribution_product_successor. ff_h_b5nbmcilpi_contribution_product_successor + S (ff_s_b5nbmcilpi_contribution_product) = S ((S (S ff_i_b5nbmcilpi_contribution_product)) * ff_v_b5nbmcilpi_contribution_product)) /\ exists ff_q_b5nbmcilpi_contribution_product_successor. ff_u_b5nbmcilpi_contribution_product = ff_q_b5nbmcilpi_contribution_product_successor * S ((S (S ff_i_b5nbmcilpi_contribution_product)) * ff_v_b5nbmcilpi_contribution_product) + (ff_s_b5nbmcilpi_contribution_product))) /\ ff_s_b5nbmcilpi_contribution_product = ff_r_b5nbmcilpi_contribution_product * ff_p_b5nbmcilpi_contribution_product)))))))) -> (exists bpr_code_b5nbmcilpi_primorial bpr_scale_b5nbmcilpi_primorial. ((forall bpr_index_b5nbmcilpi_primorial_mask. (exists bpr_gap_b5nbmcilpi_primorial_mask_bound. bpr_gap_b5nbmcilpi_primorial_mask_bound + S (bpr_index_b5nbmcilpi_primorial_mask) = g) -> exists bpr_value_b5nbmcilpi_primorial_mask. ((((exists bpr_height_b5nbmcilpi_primorial_mask_decoded. bpr_height_b5nbmcilpi_primorial_mask_decoded + S (bpr_value_b5nbmcilpi_primorial_mask) = S ((S (bpr_index_b5nbmcilpi_primorial_mask)) * bpr_scale_b5nbmcilpi_primorial)) /\ exists bpr_quotient_b5nbmcilpi_primorial_mask_decoded. bpr_code_b5nbmcilpi_primorial = bpr_quotient_b5nbmcilpi_primorial_mask_decoded * S ((S (bpr_index_b5nbmcilpi_primorial_mask)) * bpr_scale_b5nbmcilpi_primorial) + (bpr_value_b5nbmcilpi_primorial_mask))) /\ (((((~(S (s + bpr_index_b5nbmcilpi_primorial_mask) = 1) /\ forall bpr_left_b5nbmcilpi_primorial_mask_choice_prime bpr_right_b5nbmcilpi_primorial_mask_choice_prime. S (s + bpr_index_b5nbmcilpi_primorial_mask) = bpr_left_b5nbmcilpi_primorial_mask_choice_prime * bpr_right_b5nbmcilpi_primorial_mask_choice_prime -> bpr_left_b5nbmcilpi_primorial_mask_choice_prime = 1 \/ bpr_right_b5nbmcilpi_primorial_mask_choice_prime = 1)) /\ bpr_value_b5nbmcilpi_primorial_mask = S (s + bpr_index_b5nbmcilpi_primorial_mask)) \/ (~((~(S (s + bpr_index_b5nbmcilpi_primorial_mask) = 1) /\ forall bpr_left_b5nbmcilpi_primorial_mask_choice_prime bpr_right_b5nbmcilpi_primorial_mask_choice_prime. S (s + bpr_index_b5nbmcilpi_primorial_mask) = bpr_left_b5nbmcilpi_primorial_mask_choice_prime * bpr_right_b5nbmcilpi_primorial_mask_choice_prime -> bpr_left_b5nbmcilpi_primorial_mask_choice_prime = 1 \/ bpr_right_b5nbmcilpi_primorial_mask_choice_prime = 1)) /\ bpr_value_b5nbmcilpi_primorial_mask = 1))))) /\ (exists ff_u_b5nbmcilpi_primorial_product ff_v_b5nbmcilpi_primorial_product. ((((exists ff_h_b5nbmcilpi_primorial_product_start. ff_h_b5nbmcilpi_primorial_product_start + S (1) = S ((S (0)) * ff_v_b5nbmcilpi_primorial_product)) /\ exists ff_q_b5nbmcilpi_primorial_product_start. ff_u_b5nbmcilpi_primorial_product = ff_q_b5nbmcilpi_primorial_product_start * S ((S (0)) * ff_v_b5nbmcilpi_primorial_product) + (1))) /\ ((((exists ff_h_b5nbmcilpi_primorial_product_terminal. ff_h_b5nbmcilpi_primorial_product_terminal + S (P) = S ((S (g)) * ff_v_b5nbmcilpi_primorial_product)) /\ exists ff_q_b5nbmcilpi_primorial_product_terminal. ff_u_b5nbmcilpi_primorial_product = ff_q_b5nbmcilpi_primorial_product_terminal * S ((S (g)) * ff_v_b5nbmcilpi_primorial_product) + (P))) /\ forall ff_i_b5nbmcilpi_primorial_product. (exists ff_lt_b5nbmcilpi_primorial_product_bound. ff_lt_b5nbmcilpi_primorial_product_bound + S ff_i_b5nbmcilpi_primorial_product = g) -> exists ff_p_b5nbmcilpi_primorial_product ff_r_b5nbmcilpi_primorial_product ff_s_b5nbmcilpi_primorial_product. ((((exists ff_h_b5nbmcilpi_primorial_product_factor. ff_h_b5nbmcilpi_primorial_product_factor + S (ff_p_b5nbmcilpi_primorial_product) = S ((S (ff_i_b5nbmcilpi_primorial_product)) * bpr_scale_b5nbmcilpi_primorial)) /\ exists ff_q_b5nbmcilpi_primorial_product_factor. bpr_code_b5nbmcilpi_primorial = ff_q_b5nbmcilpi_primorial_product_factor * S ((S (ff_i_b5nbmcilpi_primorial_product)) * bpr_scale_b5nbmcilpi_primorial) + (ff_p_b5nbmcilpi_primorial_product))) /\ ((((exists ff_h_b5nbmcilpi_primorial_product_partial. ff_h_b5nbmcilpi_primorial_product_partial + S (ff_r_b5nbmcilpi_primorial_product) = S ((S (ff_i_b5nbmcilpi_primorial_product)) * ff_v_b5nbmcilpi_primorial_product)) /\ exists ff_q_b5nbmcilpi_primorial_product_partial. ff_u_b5nbmcilpi_primorial_product = ff_q_b5nbmcilpi_primorial_product_partial * S ((S (ff_i_b5nbmcilpi_primorial_product)) * ff_v_b5nbmcilpi_primorial_product) + (ff_r_b5nbmcilpi_primorial_product))) /\ ((((exists ff_h_b5nbmcilpi_primorial_product_successor. ff_h_b5nbmcilpi_primorial_product_successor + S (ff_s_b5nbmcilpi_primorial_product) = S ((S (S ff_i_b5nbmcilpi_primorial_product)) * ff_v_b5nbmcilpi_primorial_product)) /\ exists ff_q_b5nbmcilpi_primorial_product_successor. ff_u_b5nbmcilpi_primorial_product = ff_q_b5nbmcilpi_primorial_product_successor * S ((S (S ff_i_b5nbmcilpi_primorial_product)) * ff_v_b5nbmcilpi_primorial_product) + (ff_s_b5nbmcilpi_primorial_product))) /\ ff_s_b5nbmcilpi_primorial_product = ff_r_b5nbmcilpi_primorial_product * ff_p_b5nbmcilpi_primorial_product)))))))) -> (exists bcf_le_gap_b5nbmcilpi_result. bcf_le_gap_b5nbmcilpi_result + (y) = P)

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

110 script commands · 24 reading checkpoints · 10 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 (5)
01Fix variables and assumptionsL1–10

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

  1. L1
    intro n
  2. L2
    intro s
  3. L3
    intro q
  4. L4
    intro r
  5. L5
    intro C
  6. L6
    intro g
  7. L7
    intro y
  8. L8
    intro P
  9. L9
    intro hexclusion
  10. L10
    intro hpositive
02Fix variables and assumptionsL11–16

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

  1. L11
    intro hfloor
  2. L12
    intro hdivision
  3. L13
    intro hcentral
  4. L14
    intro hgap
  5. L15
    intro hcontribution
  6. L16
    intro hprimorial
03Separate the logical casesL17–22

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

  1. L17
    cases hcontribution
  2. L18
    cases hcontribution_witness
  3. L19
    cases hcontribution_witness_witness
  4. L20
    cases hprimorial
  5. L21
    cases hprimorial_witness
  6. L22
    cases hprimorial_witness_witness
04Establish hpointwiseL23–29

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

  1. L23
    have hpointwise : ∀ i. ∀ a. ∀ p. Lt(i,g) → BetaAt(x,x1,i,a) → BetaAt(x2,x3,i,p) → Le(a,p)Definitions: Lt(i,g)BetaAt(x,x1,i,a)BetaAt(x2,x3,i,p)Le(a,p)Original native command in the exact edition
  2. L24
    intro i
  3. L25
    intro a
  4. L26
    intro p
  5. L27
    intro hi
  6. L28
    intro ha
  7. L29
    intro hp
05Establish hleft_entryL30–32

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

  1. L30
    have hleft_entry : ∃ u. BetaAt(x,x1,i,u) ∧ (Prime(S (s + i)) ∧ (∃ y. PowerValuation(S (s + i),C,y) ∧ Pow(S (s + i),y,u)) ∨ ¬Prime(S (s + i)) ∧ u = 1)Definitions: BetaAt(x,x1,i,u)Prime(S (s + i))PowerValuation(S (s + i),C,y)Pow(S (s + i),y,u)Original native command in the exact edition
  2. L31
    apply hcontribution_witness_witness_left
  3. L32
    exact hi
06Separate the logical casesL33–34

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

  1. L33
    cases hleft_entry
  2. L34
    cases hleft_entry_witness
07Establish hright_entryL35–37

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

  1. L35
    have hright_entry : ∃ v. BetaAt(x2,x3,i,v) ∧ (Prime(S (s + i)) ∧ v = S (s + i) ∨ ¬Prime(S (s + i)) ∧ v = 1)Definitions: BetaAt(x2,x3,i,v)Prime(S (s + i))Original native command in the exact edition
  2. L36
    apply hprimorial_witness_witness_left
  3. L37
    exact hi
08Separate the logical casesL38–39

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

  1. L38
    cases hright_entry
  2. L39
    cases hright_entry_witness
09Establish ha_eqL40–48

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

  1. L40
    have ha_eq : a = x4
  2. L41
    specialize beta_at_unique x
  3. L42
    specialize beta_at_unique x1
  4. L43
    specialize beta_at_unique i
  5. L44
    specialize beta_at_unique a
  6. L45
    specialize beta_at_unique x4
  7. L46
    apply beta_at_unique
  8. L47
    exact ha
  9. L48
    exact hleft_entry_witness_left
10Establish hp_eqL49–57

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

  1. L49
    have hp_eq : p = x5
  2. L50
    specialize beta_at_unique x2
  3. L51
    specialize beta_at_unique x3
  4. L52
    specialize beta_at_unique i
  5. L53
    specialize beta_at_unique p
  6. L54
    specialize beta_at_unique x5
  7. L55
    apply beta_at_unique
  8. L56
    exact hp
  9. L57
    exact hright_entry_witness_left
11Establish haboveL58–58

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

  1. L58
    have habove : Lt(s,S (s + i))Definitions: Lt(s,S (s + i))Original native command in the exact edition
12Construct an explicit witnessL59–59

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

  1. L59
    exists i
13Calculate and transport equalitiesL60–60

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

  1. L60
    trans S (i + s)
14Use earlier factsL61–61

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

  1. L61
    apply PA4
15Calculate and transport equalitiesL62–62

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

  1. L62
    congr
16Use earlier factsL63–65

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

  1. L63
    specialize add_comm i
  2. L64
    specialize add_comm s
  3. L65
    exact add_comm
17Establish hraw_boundL66–71

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

  1. L66
    have hraw_bound : Le(s + S i,s + g)Definitions: Le(s + S i,s + g)Original native command in the exact edition
  2. L67
    specialize add_le_add_left (S i)
  3. L68
    specialize add_le_add_left g
  4. L69
    specialize add_le_add_left s
  5. L70
    apply add_le_add_left
  6. L71
    exact hi
18Establish hadd_succL72–75

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

  1. L72
    have hadd_succ : s + S i = S (s + i)
  2. L73
    apply PA4
  3. L74
    rewrite hadd_succ at hraw_bound
  4. L75
    rewrite hgap at hraw_bound
19Establish hglobal_boundL76–77

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

  1. L76
    have hglobal_bound : Lt(s + i,q)Definitions: Lt(s + i,q)Original native command in the exact edition
  2. L77
    exact hraw_bound
20Establish hfactor_boundL78–87

Establish this local claim before using it. It is not an additional assumption. The following proof commands apply no bertrand middle contribution choice le selector.

  1. L78
    have hfactor_bound : Le(x4,x5)Definitions: Le(x4,x5)Original native command in the exact edition
  2. L79
    specialize no_bertrand_middle_contribution_choice_le_selector n
  3. L80
    specialize no_bertrand_middle_contribution_choice_le_selector s
  4. L81
    specialize no_bertrand_middle_contribution_choice_le_selector q
  5. L82
    specialize no_bertrand_middle_contribution_choice_le_selector r
  6. L83
    specialize no_bertrand_middle_contribution_choice_le_selector C
  7. L84
    specialize no_bertrand_middle_contribution_choice_le_selector (s + i)
  8. L85
    specialize no_bertrand_middle_contribution_choice_le_selector x4
  9. L86
    specialize no_bertrand_middle_contribution_choice_le_selector x5
  10. L87
    apply no_bertrand_middle_contribution_choice_le_selector
21Use earlier factsL88–96

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

  1. L88
    exact hexclusion
  2. L89
    exact hpositive
  3. L90
    exact hfloor
  4. L91
    exact hdivision
  5. L92
    exact hcentral
  6. L93
    exact habove
  7. L94
    exact hglobal_bound
  8. L95
    exact hleft_entry_witness_right
  9. L96
    exact hright_entry_witness_right
22Calculate and transport equalitiesL97–98

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

  1. L97
    rewrite ha_eq
  2. L98
    rewrite hp_eq
23Use earlier factsL99–108

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

  1. L99
    exact hfactor_bound
  2. L100
    specialize beta_product_pointwise_le x
  3. L101
    specialize beta_product_pointwise_le x1
  4. L102
    specialize beta_product_pointwise_le x2
  5. L103
    specialize beta_product_pointwise_le x3
  6. L104
    specialize beta_product_pointwise_le g
  7. L105
    specialize beta_product_pointwise_le y
  8. L106
    specialize beta_product_pointwise_le P
  9. L107
    apply beta_product_pointwise_le
  10. L108
    exact hpointwise
24Use earlier factsL109–110

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

  1. L109
    exact hcontribution_witness_witness_right
  2. L110
    exact hprimorial_witness_witness_right

Library-wide reading audit

Original defined command ledger · 110 lines
  1. 0001intro n
  2. 0002intro s
  3. 0003intro q
  4. 0004intro r
  5. 0005intro C
  6. 0006intro g
  7. 0007intro y
  8. 0008intro P
  9. 0009intro hexclusion
  10. 0010intro hpositive
  11. 0011intro hfloor
  12. 0012intro hdivision
  13. 0013intro hcentral
  14. 0014intro hgap
  15. 0015intro hcontribution
  16. 0016intro hprimorial
  17. 0017cases hcontribution
  18. 0018cases hcontribution_witness
  19. 0019cases hcontribution_witness_witness
  20. 0020cases hprimorial
  21. 0021cases hprimorial_witness
  22. 0022cases hprimorial_witness_witness
  23. 0023have hpointwise : ∀ i. ∀ a. ∀ p. Lt(i,g)BetaAt(x,x1,i,a)BetaAt(x2,x3,i,p)Le(a,p)
    Exact native replay linehave hpointwise : forall i a p. (exists bcf_lt_gap_b5nbmcilpi_pointwise_bound. bcf_lt_gap_b5nbmcilpi_pointwise_bound + S (i) = g) -> (((exists bpr_height_b5nbmcilpi_pointwise_left. bpr_height_b5nbmcilpi_pointwise_left + S (a) = S ((S (i)) * x1)) /\ exists bpr_quotient_b5nbmcilpi_pointwise_left. x = bpr_quotient_b5nbmcilpi_pointwise_left * S ((S (i)) * x1) + (a))) -> (((exists bpr_height_b5nbmcilpi_pointwise_right. bpr_height_b5nbmcilpi_pointwise_right + S (p) = S ((S (i)) * x3)) /\ exists bpr_quotient_b5nbmcilpi_pointwise_right. x2 = bpr_quotient_b5nbmcilpi_pointwise_right * S ((S (i)) * x3) + (p))) -> (exists bcf_le_gap_b5nbmcilpi_pointwise_result. bcf_le_gap_b5nbmcilpi_pointwise_result + (a) = p)
  24. 0024intro i
  25. 0025intro a
  26. 0026intro p
  27. 0027intro hi
  28. 0028intro ha
  29. 0029intro hp
  30. 0030have hleft_entry : ∃ u. BetaAt(x,x1,i,u) ∧ (Prime(S (s + i)) ∧ (∃ y. PowerValuation(S (s + i),C,y)Pow(S (s + i),y,u)) ∨ ¬Prime(S (s + i)) ∧ u = 1)
    Exact native replay linehave hleft_entry : exists u. (((exists bpr_height_b5nbmcilpi_left_entry_decoded. bpr_height_b5nbmcilpi_left_entry_decoded + S (u) = S ((S (i)) * x1)) /\ exists bpr_quotient_b5nbmcilpi_left_entry_decoded. x = bpr_quotient_b5nbmcilpi_left_entry_decoded * S ((S (i)) * x1) + (u))) /\ (((((~(S (s + i) = 1) /\ forall bpr_left_b5nbmcilpi_left_entry_choice_prime bpr_right_b5nbmcilpi_left_entry_choice_prime. S (s + i) = bpr_left_b5nbmcilpi_left_entry_choice_prime * bpr_right_b5nbmcilpi_left_entry_choice_prime -> bpr_left_b5nbmcilpi_left_entry_choice_prime = 1 \/ bpr_right_b5nbmcilpi_left_entry_choice_prime = 1)) /\ exists bpr_choice_exponent_b5nbmcilpi_left_entry_choice. ((((exists bpr_le_gap_b5nbmcilpi_left_entry_choice_valuation_selected_bound. bpr_le_gap_b5nbmcilpi_left_entry_choice_valuation_selected_bound + (bpr_choice_exponent_b5nbmcilpi_left_entry_choice) = (C)) /\ (exists bpr_power_value_b5nbmcilpi_left_entry_choice_valuation_selected. ((exists bpr_power_code_b5nbmcilpi_left_entry_choice_valuation_selected_power bpr_power_scale_b5nbmcilpi_left_entry_choice_valuation_selected_power. ((forall bpr_power_index_b5nbmcilpi_left_entry_choice_valuation_selected_power. (exists bpr_gap_b5nbmcilpi_left_entry_choice_valuation_selected_power_repeat_bound. bpr_gap_b5nbmcilpi_left_entry_choice_valuation_selected_power_repeat_bound + S (bpr_power_index_b5nbmcilpi_left_entry_choice_valuation_selected_power) = bpr_choice_exponent_b5nbmcilpi_left_entry_choice) -> (((exists bpr_height_b5nbmcilpi_left_entry_choice_valuation_selected_power_repeat_entry. bpr_height_b5nbmcilpi_left_entry_choice_valuation_selected_power_repeat_entry + S (S (s + i)) = S ((S (bpr_power_index_b5nbmcilpi_left_entry_choice_valuation_selected_power)) * bpr_power_scale_b5nbmcilpi_left_entry_choice_valuation_selected_power)) /\ exists bpr_quotient_b5nbmcilpi_left_entry_choice_valuation_selected_power_repeat_entry. bpr_power_code_b5nbmcilpi_left_entry_choice_valuation_selected_power = bpr_quotient_b5nbmcilpi_left_entry_choice_valuation_selected_power_repeat_entry * S ((S (bpr_power_index_b5nbmcilpi_left_entry_choice_valuation_selected_power)) * bpr_power_scale_b5nbmcilpi_left_entry_choice_valuation_selected_power) + (S (s + i))))) /\ (exists ff_u_b5nbmcilpi_left_entry_choice_valuation_selected_power_product ff_v_b5nbmcilpi_left_entry_choice_valuation_selected_power_product. ((((exists ff_h_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_start. ff_h_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_b5nbmcilpi_left_entry_choice_valuation_selected_power_product)) /\ exists ff_q_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_start. ff_u_b5nbmcilpi_left_entry_choice_valuation_selected_power_product = ff_q_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_start * S ((S (0)) * ff_v_b5nbmcilpi_left_entry_choice_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_terminal. ff_h_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_terminal + S (bpr_power_value_b5nbmcilpi_left_entry_choice_valuation_selected) = S ((S (bpr_choice_exponent_b5nbmcilpi_left_entry_choice)) * ff_v_b5nbmcilpi_left_entry_choice_valuation_selected_power_product)) /\ exists ff_q_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_terminal. ff_u_b5nbmcilpi_left_entry_choice_valuation_selected_power_product = ff_q_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_terminal * S ((S (bpr_choice_exponent_b5nbmcilpi_left_entry_choice)) * ff_v_b5nbmcilpi_left_entry_choice_valuation_selected_power_product) + (bpr_power_value_b5nbmcilpi_left_entry_choice_valuation_selected))) /\ forall ff_i_b5nbmcilpi_left_entry_choice_valuation_selected_power_product. (exists ff_lt_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_bound. ff_lt_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_bound + S ff_i_b5nbmcilpi_left_entry_choice_valuation_selected_power_product = bpr_choice_exponent_b5nbmcilpi_left_entry_choice) -> exists ff_p_b5nbmcilpi_left_entry_choice_valuation_selected_power_product ff_r_b5nbmcilpi_left_entry_choice_valuation_selected_power_product ff_s_b5nbmcilpi_left_entry_choice_valuation_selected_power_product. ((((exists ff_h_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_factor. ff_h_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_factor + S (ff_p_b5nbmcilpi_left_entry_choice_valuation_selected_power_product) = S ((S (ff_i_b5nbmcilpi_left_entry_choice_valuation_selected_power_product)) * bpr_power_scale_b5nbmcilpi_left_entry_choice_valuation_selected_power)) /\ exists ff_q_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_factor. bpr_power_code_b5nbmcilpi_left_entry_choice_valuation_selected_power = ff_q_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_factor * S ((S (ff_i_b5nbmcilpi_left_entry_choice_valuation_selected_power_product)) * bpr_power_scale_b5nbmcilpi_left_entry_choice_valuation_selected_power) + (ff_p_b5nbmcilpi_left_entry_choice_valuation_selected_power_product))) /\ ((((exists ff_h_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_partial. ff_h_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_partial + S (ff_r_b5nbmcilpi_left_entry_choice_valuation_selected_power_product) = S ((S (ff_i_b5nbmcilpi_left_entry_choice_valuation_selected_power_product)) * ff_v_b5nbmcilpi_left_entry_choice_valuation_selected_power_product)) /\ exists ff_q_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_partial. ff_u_b5nbmcilpi_left_entry_choice_valuation_selected_power_product = ff_q_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_partial * S ((S (ff_i_b5nbmcilpi_left_entry_choice_valuation_selected_power_product)) * ff_v_b5nbmcilpi_left_entry_choice_valuation_selected_power_product) + (ff_r_b5nbmcilpi_left_entry_choice_valuation_selected_power_product))) /\ ((((exists ff_h_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_successor. ff_h_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_successor + S (ff_s_b5nbmcilpi_left_entry_choice_valuation_selected_power_product) = S ((S (S ff_i_b5nbmcilpi_left_entry_choice_valuation_selected_power_product)) * ff_v_b5nbmcilpi_left_entry_choice_valuation_selected_power_product)) /\ exists ff_q_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_successor. ff_u_b5nbmcilpi_left_entry_choice_valuation_selected_power_product = ff_q_b5nbmcilpi_left_entry_choice_valuation_selected_power_product_successor * S ((S (S ff_i_b5nbmcilpi_left_entry_choice_valuation_selected_power_product)) * ff_v_b5nbmcilpi_left_entry_choice_valuation_selected_power_product) + (ff_s_b5nbmcilpi_left_entry_choice_valuation_selected_power_product))) /\ ff_s_b5nbmcilpi_left_entry_choice_valuation_selected_power_product = ff_r_b5nbmcilpi_left_entry_choice_valuation_selected_power_product * ff_p_b5nbmcilpi_left_entry_choice_valuation_selected_power_product)))))))) /\ (exists bpr_divides_quotient_b5nbmcilpi_left_entry_choice_valuation_selected_divides. C = (bpr_power_value_b5nbmcilpi_left_entry_choice_valuation_selected) * bpr_divides_quotient_b5nbmcilpi_left_entry_choice_valuation_selected_divides)))) /\ forall bpr_valuation_candidate_b5nbmcilpi_left_entry_choice_valuation. (exists bpr_le_gap_b5nbmcilpi_left_entry_choice_valuation_candidate_bound. bpr_le_gap_b5nbmcilpi_left_entry_choice_valuation_candidate_bound + (bpr_valuation_candidate_b5nbmcilpi_left_entry_choice_valuation) = (C)) -> (exists bpr_power_value_b5nbmcilpi_left_entry_choice_valuation_candidate. ((exists bpr_power_code_b5nbmcilpi_left_entry_choice_valuation_candidate_power bpr_power_scale_b5nbmcilpi_left_entry_choice_valuation_candidate_power. ((forall bpr_power_index_b5nbmcilpi_left_entry_choice_valuation_candidate_power. (exists bpr_gap_b5nbmcilpi_left_entry_choice_valuation_candidate_power_repeat_bound. bpr_gap_b5nbmcilpi_left_entry_choice_valuation_candidate_power_repeat_bound + S (bpr_power_index_b5nbmcilpi_left_entry_choice_valuation_candidate_power) = bpr_valuation_candidate_b5nbmcilpi_left_entry_choice_valuation) -> (((exists bpr_height_b5nbmcilpi_left_entry_choice_valuation_candidate_power_repeat_entry. bpr_height_b5nbmcilpi_left_entry_choice_valuation_candidate_power_repeat_entry + S (S (s + i)) = S ((S (bpr_power_index_b5nbmcilpi_left_entry_choice_valuation_candidate_power)) * bpr_power_scale_b5nbmcilpi_left_entry_choice_valuation_candidate_power)) /\ exists bpr_quotient_b5nbmcilpi_left_entry_choice_valuation_candidate_power_repeat_entry. bpr_power_code_b5nbmcilpi_left_entry_choice_valuation_candidate_power = bpr_quotient_b5nbmcilpi_left_entry_choice_valuation_candidate_power_repeat_entry * S ((S (bpr_power_index_b5nbmcilpi_left_entry_choice_valuation_candidate_power)) * bpr_power_scale_b5nbmcilpi_left_entry_choice_valuation_candidate_power) + (S (s + i))))) /\ (exists ff_u_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product ff_v_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product. ((((exists ff_h_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_start. ff_h_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product)) /\ exists ff_q_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_start. ff_u_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product = ff_q_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_start * S ((S (0)) * ff_v_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_terminal. ff_h_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_terminal + S (bpr_power_value_b5nbmcilpi_left_entry_choice_valuation_candidate) = S ((S (bpr_valuation_candidate_b5nbmcilpi_left_entry_choice_valuation)) * ff_v_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product)) /\ exists ff_q_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_terminal. ff_u_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product = ff_q_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_terminal * S ((S (bpr_valuation_candidate_b5nbmcilpi_left_entry_choice_valuation)) * ff_v_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product) + (bpr_power_value_b5nbmcilpi_left_entry_choice_valuation_candidate))) /\ forall ff_i_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product. (exists ff_lt_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_bound. ff_lt_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_bound + S ff_i_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product = bpr_valuation_candidate_b5nbmcilpi_left_entry_choice_valuation) -> exists ff_p_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product ff_r_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product ff_s_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product. ((((exists ff_h_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_factor. ff_h_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_factor + S (ff_p_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product) = S ((S (ff_i_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product)) * bpr_power_scale_b5nbmcilpi_left_entry_choice_valuation_candidate_power)) /\ exists ff_q_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_factor. bpr_power_code_b5nbmcilpi_left_entry_choice_valuation_candidate_power = ff_q_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_factor * S ((S (ff_i_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product)) * bpr_power_scale_b5nbmcilpi_left_entry_choice_valuation_candidate_power) + (ff_p_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_partial. ff_h_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_partial + S (ff_r_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product) = S ((S (ff_i_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product)) * ff_v_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product)) /\ exists ff_q_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_partial. ff_u_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product = ff_q_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_partial * S ((S (ff_i_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product)) * ff_v_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product) + (ff_r_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_successor. ff_h_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_successor + S (ff_s_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product) = S ((S (S ff_i_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product)) * ff_v_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product)) /\ exists ff_q_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_successor. ff_u_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product = ff_q_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product_successor * S ((S (S ff_i_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product)) * ff_v_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product) + (ff_s_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product))) /\ ff_s_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product = ff_r_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product * ff_p_b5nbmcilpi_left_entry_choice_valuation_candidate_power_product)))))))) /\ (exists bpr_divides_quotient_b5nbmcilpi_left_entry_choice_valuation_candidate_divides. C = (bpr_power_value_b5nbmcilpi_left_entry_choice_valuation_candidate) * bpr_divides_quotient_b5nbmcilpi_left_entry_choice_valuation_candidate_divides))) -> (exists bpr_le_gap_b5nbmcilpi_left_entry_choice_valuation_candidate_below. bpr_le_gap_b5nbmcilpi_left_entry_choice_valuation_candidate_below + (bpr_valuation_candidate_b5nbmcilpi_left_entry_choice_valuation) = (bpr_choice_exponent_b5nbmcilpi_left_entry_choice))) /\ (exists bpr_power_code_b5nbmcilpi_left_entry_choice_power bpr_power_scale_b5nbmcilpi_left_entry_choice_power. ((forall bpr_power_index_b5nbmcilpi_left_entry_choice_power. (exists bpr_gap_b5nbmcilpi_left_entry_choice_power_repeat_bound. bpr_gap_b5nbmcilpi_left_entry_choice_power_repeat_bound + S (bpr_power_index_b5nbmcilpi_left_entry_choice_power) = bpr_choice_exponent_b5nbmcilpi_left_entry_choice) -> (((exists bpr_height_b5nbmcilpi_left_entry_choice_power_repeat_entry. bpr_height_b5nbmcilpi_left_entry_choice_power_repeat_entry + S (S (s + i)) = S ((S (bpr_power_index_b5nbmcilpi_left_entry_choice_power)) * bpr_power_scale_b5nbmcilpi_left_entry_choice_power)) /\ exists bpr_quotient_b5nbmcilpi_left_entry_choice_power_repeat_entry. bpr_power_code_b5nbmcilpi_left_entry_choice_power = bpr_quotient_b5nbmcilpi_left_entry_choice_power_repeat_entry * S ((S (bpr_power_index_b5nbmcilpi_left_entry_choice_power)) * bpr_power_scale_b5nbmcilpi_left_entry_choice_power) + (S (s + i))))) /\ (exists ff_u_b5nbmcilpi_left_entry_choice_power_product ff_v_b5nbmcilpi_left_entry_choice_power_product. ((((exists ff_h_b5nbmcilpi_left_entry_choice_power_product_start. ff_h_b5nbmcilpi_left_entry_choice_power_product_start + S (1) = S ((S (0)) * ff_v_b5nbmcilpi_left_entry_choice_power_product)) /\ exists ff_q_b5nbmcilpi_left_entry_choice_power_product_start. ff_u_b5nbmcilpi_left_entry_choice_power_product = ff_q_b5nbmcilpi_left_entry_choice_power_product_start * S ((S (0)) * ff_v_b5nbmcilpi_left_entry_choice_power_product) + (1))) /\ ((((exists ff_h_b5nbmcilpi_left_entry_choice_power_product_terminal. ff_h_b5nbmcilpi_left_entry_choice_power_product_terminal + S (u) = S ((S (bpr_choice_exponent_b5nbmcilpi_left_entry_choice)) * ff_v_b5nbmcilpi_left_entry_choice_power_product)) /\ exists ff_q_b5nbmcilpi_left_entry_choice_power_product_terminal. ff_u_b5nbmcilpi_left_entry_choice_power_product = ff_q_b5nbmcilpi_left_entry_choice_power_product_terminal * S ((S (bpr_choice_exponent_b5nbmcilpi_left_entry_choice)) * ff_v_b5nbmcilpi_left_entry_choice_power_product) + (u))) /\ forall ff_i_b5nbmcilpi_left_entry_choice_power_product. (exists ff_lt_b5nbmcilpi_left_entry_choice_power_product_bound. ff_lt_b5nbmcilpi_left_entry_choice_power_product_bound + S ff_i_b5nbmcilpi_left_entry_choice_power_product = bpr_choice_exponent_b5nbmcilpi_left_entry_choice) -> exists ff_p_b5nbmcilpi_left_entry_choice_power_product ff_r_b5nbmcilpi_left_entry_choice_power_product ff_s_b5nbmcilpi_left_entry_choice_power_product. ((((exists ff_h_b5nbmcilpi_left_entry_choice_power_product_factor. ff_h_b5nbmcilpi_left_entry_choice_power_product_factor + S (ff_p_b5nbmcilpi_left_entry_choice_power_product) = S ((S (ff_i_b5nbmcilpi_left_entry_choice_power_product)) * bpr_power_scale_b5nbmcilpi_left_entry_choice_power)) /\ exists ff_q_b5nbmcilpi_left_entry_choice_power_product_factor. bpr_power_code_b5nbmcilpi_left_entry_choice_power = ff_q_b5nbmcilpi_left_entry_choice_power_product_factor * S ((S (ff_i_b5nbmcilpi_left_entry_choice_power_product)) * bpr_power_scale_b5nbmcilpi_left_entry_choice_power) + (ff_p_b5nbmcilpi_left_entry_choice_power_product))) /\ ((((exists ff_h_b5nbmcilpi_left_entry_choice_power_product_partial. ff_h_b5nbmcilpi_left_entry_choice_power_product_partial + S (ff_r_b5nbmcilpi_left_entry_choice_power_product) = S ((S (ff_i_b5nbmcilpi_left_entry_choice_power_product)) * ff_v_b5nbmcilpi_left_entry_choice_power_product)) /\ exists ff_q_b5nbmcilpi_left_entry_choice_power_product_partial. ff_u_b5nbmcilpi_left_entry_choice_power_product = ff_q_b5nbmcilpi_left_entry_choice_power_product_partial * S ((S (ff_i_b5nbmcilpi_left_entry_choice_power_product)) * ff_v_b5nbmcilpi_left_entry_choice_power_product) + (ff_r_b5nbmcilpi_left_entry_choice_power_product))) /\ ((((exists ff_h_b5nbmcilpi_left_entry_choice_power_product_successor. ff_h_b5nbmcilpi_left_entry_choice_power_product_successor + S (ff_s_b5nbmcilpi_left_entry_choice_power_product) = S ((S (S ff_i_b5nbmcilpi_left_entry_choice_power_product)) * ff_v_b5nbmcilpi_left_entry_choice_power_product)) /\ exists ff_q_b5nbmcilpi_left_entry_choice_power_product_successor. ff_u_b5nbmcilpi_left_entry_choice_power_product = ff_q_b5nbmcilpi_left_entry_choice_power_product_successor * S ((S (S ff_i_b5nbmcilpi_left_entry_choice_power_product)) * ff_v_b5nbmcilpi_left_entry_choice_power_product) + (ff_s_b5nbmcilpi_left_entry_choice_power_product))) /\ ff_s_b5nbmcilpi_left_entry_choice_power_product = ff_r_b5nbmcilpi_left_entry_choice_power_product * ff_p_b5nbmcilpi_left_entry_choice_power_product)))))))))) \/ (~((~(S (s + i) = 1) /\ forall bpr_left_b5nbmcilpi_left_entry_choice_prime bpr_right_b5nbmcilpi_left_entry_choice_prime. S (s + i) = bpr_left_b5nbmcilpi_left_entry_choice_prime * bpr_right_b5nbmcilpi_left_entry_choice_prime -> bpr_left_b5nbmcilpi_left_entry_choice_prime = 1 \/ bpr_right_b5nbmcilpi_left_entry_choice_prime = 1)) /\ u = 1)))
  31. 0031apply hcontribution_witness_witness_left
  32. 0032exact hi
  33. 0033cases hleft_entry
  34. 0034cases hleft_entry_witness
  35. 0035have hright_entry : ∃ v. BetaAt(x2,x3,i,v) ∧ (Prime(S (s + i)) ∧ v = S (s + i) ∨ ¬Prime(S (s + i)) ∧ v = 1)
    Exact native replay linehave hright_entry : exists v. (((exists bpr_height_b5nbmcilpi_right_entry_decoded. bpr_height_b5nbmcilpi_right_entry_decoded + S (v) = S ((S (i)) * x3)) /\ exists bpr_quotient_b5nbmcilpi_right_entry_decoded. x2 = bpr_quotient_b5nbmcilpi_right_entry_decoded * S ((S (i)) * x3) + (v))) /\ (((((~(S (s + i) = 1) /\ forall bpr_left_b5nbmcilpi_right_entry_choice_prime bpr_right_b5nbmcilpi_right_entry_choice_prime. S (s + i) = bpr_left_b5nbmcilpi_right_entry_choice_prime * bpr_right_b5nbmcilpi_right_entry_choice_prime -> bpr_left_b5nbmcilpi_right_entry_choice_prime = 1 \/ bpr_right_b5nbmcilpi_right_entry_choice_prime = 1)) /\ v = S (s + i)) \/ (~((~(S (s + i) = 1) /\ forall bpr_left_b5nbmcilpi_right_entry_choice_prime bpr_right_b5nbmcilpi_right_entry_choice_prime. S (s + i) = bpr_left_b5nbmcilpi_right_entry_choice_prime * bpr_right_b5nbmcilpi_right_entry_choice_prime -> bpr_left_b5nbmcilpi_right_entry_choice_prime = 1 \/ bpr_right_b5nbmcilpi_right_entry_choice_prime = 1)) /\ v = 1)))
  36. 0036apply hprimorial_witness_witness_left
  37. 0037exact hi
  38. 0038cases hright_entry
  39. 0039cases hright_entry_witness
  40. 0040have ha_eq : a = x4
  41. 0041specialize beta_at_unique x
  42. 0042specialize beta_at_unique x1
  43. 0043specialize beta_at_unique i
  44. 0044specialize beta_at_unique a
  45. 0045specialize beta_at_unique x4
  46. 0046apply beta_at_unique
  47. 0047exact ha
  48. 0048exact hleft_entry_witness_left
  49. 0049have hp_eq : p = x5
  50. 0050specialize beta_at_unique x2
  51. 0051specialize beta_at_unique x3
  52. 0052specialize beta_at_unique i
  53. 0053specialize beta_at_unique p
  54. 0054specialize beta_at_unique x5
  55. 0055apply beta_at_unique
  56. 0056exact hp
  57. 0057exact hright_entry_witness_left
  58. 0058have habove : Lt(s,S (s + i))
    Exact native replay linehave habove : exists bcf_lt_gap_b5nbmcilpi_global_above. bcf_lt_gap_b5nbmcilpi_global_above + S (s) = S (s + i)
  59. 0059exists i
  60. 0060trans S (i + s)
  61. 0061apply PA4
  62. 0062congr
  63. 0063specialize add_comm i
  64. 0064specialize add_comm s
  65. 0065exact add_comm
  66. 0066have hraw_bound : Le(s + S i,s + g)
    Exact native replay linehave hraw_bound : exists bcf_le_gap_b5nbmcilpi_raw_bound. bcf_le_gap_b5nbmcilpi_raw_bound + (s + S i) = s + g
  67. 0067specialize add_le_add_left (S i)
  68. 0068specialize add_le_add_left g
  69. 0069specialize add_le_add_left s
  70. 0070apply add_le_add_left
  71. 0071exact hi
  72. 0072have hadd_succ : s + S i = S (s + i)
  73. 0073apply PA4
  74. 0074rewrite hadd_succ at hraw_bound
  75. 0075rewrite hgap at hraw_bound
  76. 0076have hglobal_bound : Lt(s + i,q)
    Exact native replay linehave hglobal_bound : exists bcf_le_gap_b5nbmcilpi_global_bound. bcf_le_gap_b5nbmcilpi_global_bound + (S (s + i)) = q
  77. 0077exact hraw_bound
  78. 0078have hfactor_bound : Le(x4,x5)
    Exact native replay linehave hfactor_bound : exists bcf_le_gap_b5nbmcilpi_factor_bound. bcf_le_gap_b5nbmcilpi_factor_bound + (x4) = x5
  79. 0079specialize no_bertrand_middle_contribution_choice_le_selector n
  80. 0080specialize no_bertrand_middle_contribution_choice_le_selector s
  81. 0081specialize no_bertrand_middle_contribution_choice_le_selector q
  82. 0082specialize no_bertrand_middle_contribution_choice_le_selector r
  83. 0083specialize no_bertrand_middle_contribution_choice_le_selector C
  84. 0084specialize no_bertrand_middle_contribution_choice_le_selector (s + i)
  85. 0085specialize no_bertrand_middle_contribution_choice_le_selector x4
  86. 0086specialize no_bertrand_middle_contribution_choice_le_selector x5
  87. 0087apply no_bertrand_middle_contribution_choice_le_selector
  88. 0088exact hexclusion
  89. 0089exact hpositive
  90. 0090exact hfloor
  91. 0091exact hdivision
  92. 0092exact hcentral
  93. 0093exact habove
  94. 0094exact hglobal_bound
  95. 0095exact hleft_entry_witness_right
  96. 0096exact hright_entry_witness_right
  97. 0097rewrite ha_eq
  98. 0098rewrite hp_eq
  99. 0099exact hfactor_bound
  100. 0100specialize beta_product_pointwise_le x
  101. 0101specialize beta_product_pointwise_le x1
  102. 0102specialize beta_product_pointwise_le x2
  103. 0103specialize beta_product_pointwise_le x3
  104. 0104specialize beta_product_pointwise_le g
  105. 0105specialize beta_product_pointwise_le y
  106. 0106specialize beta_product_pointwise_le P
  107. 0107apply beta_product_pointwise_le
  108. 0108exact hpointwise
  109. 0109exact hcontribution_witness_witness_right
  110. 0110exact hprimorial_witness_witness_right