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. ∀ z. ∀ A. (∀ 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) → (∃ x. ∃ y. (∀ m. Lt(m,s) → ∃ k. BetaAt(x,y,m,k) ∧ (Prime(S m) ∧ (∃ i. PowerValuation(S m,C,i) ∧ Pow(S m,i,k)) ∨ ¬Prime(S m) ∧ k = 1)) ∧ Product(x,y,s,z)) → Pow(n + n,s,A) → Le(z,A)Every purple notation token opens its conservative definition. Expanding the displayed statement recovers the exact first-order Peano-arithmetic formula checked by the unchanged kernel.
Definitions used by this theorem
In the theorem statement
PD0001 Le PD0002 Lt PD0004 Prime PD0007 DivRem PD0013 BetaAt PD0014 Product PD0020 Pow PD0042 CentralBinom PD0046 PowerValuation PD0051 FloorSqrt16 occurrences
In local proof propositions
9 occurrences
Exact expanded native-PA statement
forall n s q r C z A. (forall bpr_prime_candidate_b5nbscplp_exclusion. ((exists bpr_gap_b5nbscplp_exclusion_lower. bpr_gap_b5nbscplp_exclusion_lower + S (n) = bpr_prime_candidate_b5nbscplp_exclusion) /\ (exists bpr_le_gap_b5nbscplp_exclusion_upper. bpr_le_gap_b5nbscplp_exclusion_upper + (bpr_prime_candidate_b5nbscplp_exclusion) = (n + n))) -> ~((~(bpr_prime_candidate_b5nbscplp_exclusion = 1) /\ forall bpr_left_b5nbscplp_exclusion_prime bpr_right_b5nbscplp_exclusion_prime. bpr_prime_candidate_b5nbscplp_exclusion = bpr_left_b5nbscplp_exclusion_prime * bpr_right_b5nbscplp_exclusion_prime -> bpr_left_b5nbscplp_exclusion_prime = 1 \/ bpr_right_b5nbscplp_exclusion_prime = 1))) -> (exists bcf_lt_gap_b5nbscplp_positive. bcf_lt_gap_b5nbscplp_positive + S (2) = n) -> (((exists bcs_sqrt_lower_gap_b5nbscplp_floor. bcs_sqrt_lower_gap_b5nbscplp_floor + (s) * (s) = (n + n)) /\ exists bcs_sqrt_upper_gap_b5nbscplp_floor. bcs_sqrt_upper_gap_b5nbscplp_floor + S (n + n) = S (s) * S (s))) -> (((n + n) = (3) * (q) + (r) /\ (exists bcf_lt_gap_b5nbscplp_division_bound. bcf_lt_gap_b5nbscplp_division_bound + S (r) = 3))) -> (((exists bcf_lt_gap_b5nbscplp_central_out_of_range. bcf_lt_gap_b5nbscplp_central_out_of_range + S (n + n) = n) /\ C = 0) \/ ((exists bcf_le_gap_b5nbscplp_central_in_range. bcf_le_gap_b5nbscplp_central_in_range + (n) = n + n) /\ (exists bcf_row_code_code_b5nbscplp_central bcf_row_code_scale_b5nbscplp_central bcf_row_scale_code_b5nbscplp_central bcf_row_scale_scale_b5nbscplp_central bcf_row_code_b5nbscplp_central bcf_row_scale_b5nbscplp_central. ((forall bcf_row_index_b5nbscplp_central_table. (exists bcf_lt_gap_b5nbscplp_central_table_row_bound. bcf_lt_gap_b5nbscplp_central_table_row_bound + S (bcf_row_index_b5nbscplp_central_table) = S (n + n)) -> exists bcf_row_code_b5nbscplp_central_table bcf_row_scale_b5nbscplp_central_table. ((((exists bcf_height_b5nbscplp_central_table_decoded_row_code. bcf_height_b5nbscplp_central_table_decoded_row_code + S (bcf_row_code_b5nbscplp_central_table) = S ((S (bcf_row_index_b5nbscplp_central_table)) * bcf_row_code_scale_b5nbscplp_central)) /\ exists bcf_quotient_b5nbscplp_central_table_decoded_row_code. bcf_row_code_code_b5nbscplp_central = bcf_quotient_b5nbscplp_central_table_decoded_row_code * S ((S (bcf_row_index_b5nbscplp_central_table)) * bcf_row_code_scale_b5nbscplp_central) + (bcf_row_code_b5nbscplp_central_table))) /\ ((((exists bcf_height_b5nbscplp_central_table_decoded_row_scale. bcf_height_b5nbscplp_central_table_decoded_row_scale + S (bcf_row_scale_b5nbscplp_central_table) = S ((S (bcf_row_index_b5nbscplp_central_table)) * bcf_row_scale_scale_b5nbscplp_central)) /\ exists bcf_quotient_b5nbscplp_central_table_decoded_row_scale. bcf_row_scale_code_b5nbscplp_central = bcf_quotient_b5nbscplp_central_table_decoded_row_scale * S ((S (bcf_row_index_b5nbscplp_central_table)) * bcf_row_scale_scale_b5nbscplp_central) + (bcf_row_scale_b5nbscplp_central_table))) /\ ((bcf_row_index_b5nbscplp_central_table = 0 /\ (forall bcf_index_b5nbscplp_central_table_zero_row. (exists bcf_lt_gap_b5nbscplp_central_table_zero_row_bound. bcf_lt_gap_b5nbscplp_central_table_zero_row_bound + S (bcf_index_b5nbscplp_central_table_zero_row) = S (n + n)) -> exists bcf_value_b5nbscplp_central_table_zero_row. ((((exists bcf_height_b5nbscplp_central_table_zero_row_entry. bcf_height_b5nbscplp_central_table_zero_row_entry + S (bcf_value_b5nbscplp_central_table_zero_row) = S ((S (bcf_index_b5nbscplp_central_table_zero_row)) * bcf_row_scale_b5nbscplp_central_table)) /\ exists bcf_quotient_b5nbscplp_central_table_zero_row_entry. bcf_row_code_b5nbscplp_central_table = bcf_quotient_b5nbscplp_central_table_zero_row_entry * S ((S (bcf_index_b5nbscplp_central_table_zero_row)) * bcf_row_scale_b5nbscplp_central_table) + (bcf_value_b5nbscplp_central_table_zero_row))) /\ ((bcf_index_b5nbscplp_central_table_zero_row = 0 /\ bcf_value_b5nbscplp_central_table_zero_row = 1) \/ exists bcf_predecessor_b5nbscplp_central_table_zero_row. bcf_index_b5nbscplp_central_table_zero_row = S bcf_predecessor_b5nbscplp_central_table_zero_row /\ bcf_value_b5nbscplp_central_table_zero_row = 0)))) \/ exists bcf_predecessor_b5nbscplp_central_table bcf_previous_code_b5nbscplp_central_table bcf_previous_scale_b5nbscplp_central_table. bcf_row_index_b5nbscplp_central_table = S bcf_predecessor_b5nbscplp_central_table /\ ((((exists bcf_height_b5nbscplp_central_table_decoded_previous_code. bcf_height_b5nbscplp_central_table_decoded_previous_code + S (bcf_previous_code_b5nbscplp_central_table) = S ((S (bcf_predecessor_b5nbscplp_central_table)) * bcf_row_code_scale_b5nbscplp_central)) /\ exists bcf_quotient_b5nbscplp_central_table_decoded_previous_code. bcf_row_code_code_b5nbscplp_central = bcf_quotient_b5nbscplp_central_table_decoded_previous_code * S ((S (bcf_predecessor_b5nbscplp_central_table)) * bcf_row_code_scale_b5nbscplp_central) + (bcf_previous_code_b5nbscplp_central_table))) /\ ((((exists bcf_height_b5nbscplp_central_table_decoded_previous_scale. bcf_height_b5nbscplp_central_table_decoded_previous_scale + S (bcf_previous_scale_b5nbscplp_central_table) = S ((S (bcf_predecessor_b5nbscplp_central_table)) * bcf_row_scale_scale_b5nbscplp_central)) /\ exists bcf_quotient_b5nbscplp_central_table_decoded_previous_scale. bcf_row_scale_code_b5nbscplp_central = bcf_quotient_b5nbscplp_central_table_decoded_previous_scale * S ((S (bcf_predecessor_b5nbscplp_central_table)) * bcf_row_scale_scale_b5nbscplp_central) + (bcf_previous_scale_b5nbscplp_central_table))) /\ (forall bcf_index_b5nbscplp_central_table_row_step. (exists bcf_lt_gap_b5nbscplp_central_table_row_step_bound. bcf_lt_gap_b5nbscplp_central_table_row_step_bound + S (bcf_index_b5nbscplp_central_table_row_step) = S (n + n)) -> exists bcf_value_b5nbscplp_central_table_row_step. ((((exists bcf_height_b5nbscplp_central_table_row_step_entry. bcf_height_b5nbscplp_central_table_row_step_entry + S (bcf_value_b5nbscplp_central_table_row_step) = S ((S (bcf_index_b5nbscplp_central_table_row_step)) * bcf_row_scale_b5nbscplp_central_table)) /\ exists bcf_quotient_b5nbscplp_central_table_row_step_entry. bcf_row_code_b5nbscplp_central_table = bcf_quotient_b5nbscplp_central_table_row_step_entry * S ((S (bcf_index_b5nbscplp_central_table_row_step)) * bcf_row_scale_b5nbscplp_central_table) + (bcf_value_b5nbscplp_central_table_row_step))) /\ ((bcf_index_b5nbscplp_central_table_row_step = 0 /\ bcf_value_b5nbscplp_central_table_row_step = 1) \/ exists bcf_predecessor_b5nbscplp_central_table_row_step bcf_left_b5nbscplp_central_table_row_step bcf_right_b5nbscplp_central_table_row_step. bcf_index_b5nbscplp_central_table_row_step = S bcf_predecessor_b5nbscplp_central_table_row_step /\ ((((exists bcf_height_b5nbscplp_central_table_row_step_previous_left. bcf_height_b5nbscplp_central_table_row_step_previous_left + S (bcf_left_b5nbscplp_central_table_row_step) = S ((S (bcf_predecessor_b5nbscplp_central_table_row_step)) * bcf_previous_scale_b5nbscplp_central_table)) /\ exists bcf_quotient_b5nbscplp_central_table_row_step_previous_left. bcf_previous_code_b5nbscplp_central_table = bcf_quotient_b5nbscplp_central_table_row_step_previous_left * S ((S (bcf_predecessor_b5nbscplp_central_table_row_step)) * bcf_previous_scale_b5nbscplp_central_table) + (bcf_left_b5nbscplp_central_table_row_step))) /\ ((((exists bcf_height_b5nbscplp_central_table_row_step_previous_right. bcf_height_b5nbscplp_central_table_row_step_previous_right + S (bcf_right_b5nbscplp_central_table_row_step) = S ((S (S (bcf_predecessor_b5nbscplp_central_table_row_step))) * bcf_previous_scale_b5nbscplp_central_table)) /\ exists bcf_quotient_b5nbscplp_central_table_row_step_previous_right. bcf_previous_code_b5nbscplp_central_table = bcf_quotient_b5nbscplp_central_table_row_step_previous_right * S ((S (S (bcf_predecessor_b5nbscplp_central_table_row_step))) * bcf_previous_scale_b5nbscplp_central_table) + (bcf_right_b5nbscplp_central_table_row_step))) /\ bcf_value_b5nbscplp_central_table_row_step = bcf_left_b5nbscplp_central_table_row_step + bcf_right_b5nbscplp_central_table_row_step))))))))))) /\ ((((exists bcf_height_b5nbscplp_central_decoded_row_code. bcf_height_b5nbscplp_central_decoded_row_code + S (bcf_row_code_b5nbscplp_central) = S ((S (n + n)) * bcf_row_code_scale_b5nbscplp_central)) /\ exists bcf_quotient_b5nbscplp_central_decoded_row_code. bcf_row_code_code_b5nbscplp_central = bcf_quotient_b5nbscplp_central_decoded_row_code * S ((S (n + n)) * bcf_row_code_scale_b5nbscplp_central) + (bcf_row_code_b5nbscplp_central))) /\ ((((exists bcf_height_b5nbscplp_central_decoded_row_scale. bcf_height_b5nbscplp_central_decoded_row_scale + S (bcf_row_scale_b5nbscplp_central) = S ((S (n + n)) * bcf_row_scale_scale_b5nbscplp_central)) /\ exists bcf_quotient_b5nbscplp_central_decoded_row_scale. bcf_row_scale_code_b5nbscplp_central = bcf_quotient_b5nbscplp_central_decoded_row_scale * S ((S (n + n)) * bcf_row_scale_scale_b5nbscplp_central) + (bcf_row_scale_b5nbscplp_central))) /\ (((exists bcf_height_b5nbscplp_central_decoded_value. bcf_height_b5nbscplp_central_decoded_value + S (C) = S ((S (n)) * bcf_row_scale_b5nbscplp_central)) /\ exists bcf_quotient_b5nbscplp_central_decoded_value. bcf_row_code_b5nbscplp_central = bcf_quotient_b5nbscplp_central_decoded_value * S ((S (n)) * bcf_row_scale_b5nbscplp_central) + (C))))))))) -> (exists bpr_product_code_b5nbscplp_source bpr_product_scale_b5nbscplp_source. ((forall bpr_prefix_index_b5nbscplp_source_prefix. (exists bpr_gap_b5nbscplp_source_prefix_bound. bpr_gap_b5nbscplp_source_prefix_bound + S (bpr_prefix_index_b5nbscplp_source_prefix) = s) -> exists bpr_prefix_value_b5nbscplp_source_prefix. ((((exists bpr_height_b5nbscplp_source_prefix_decoded. bpr_height_b5nbscplp_source_prefix_decoded + S (bpr_prefix_value_b5nbscplp_source_prefix) = S ((S (bpr_prefix_index_b5nbscplp_source_prefix)) * bpr_product_scale_b5nbscplp_source)) /\ exists bpr_quotient_b5nbscplp_source_prefix_decoded. bpr_product_code_b5nbscplp_source = bpr_quotient_b5nbscplp_source_prefix_decoded * S ((S (bpr_prefix_index_b5nbscplp_source_prefix)) * bpr_product_scale_b5nbscplp_source) + (bpr_prefix_value_b5nbscplp_source_prefix))) /\ (((((~(S (bpr_prefix_index_b5nbscplp_source_prefix) = 1) /\ forall bpr_left_b5nbscplp_source_prefix_choice_prime bpr_right_b5nbscplp_source_prefix_choice_prime. S (bpr_prefix_index_b5nbscplp_source_prefix) = bpr_left_b5nbscplp_source_prefix_choice_prime * bpr_right_b5nbscplp_source_prefix_choice_prime -> bpr_left_b5nbscplp_source_prefix_choice_prime = 1 \/ bpr_right_b5nbscplp_source_prefix_choice_prime = 1)) /\ exists bpr_choice_exponent_b5nbscplp_source_prefix_choice. ((((exists bpr_le_gap_b5nbscplp_source_prefix_choice_valuation_selected_bound. bpr_le_gap_b5nbscplp_source_prefix_choice_valuation_selected_bound + (bpr_choice_exponent_b5nbscplp_source_prefix_choice) = (C)) /\ (exists bpr_power_value_b5nbscplp_source_prefix_choice_valuation_selected. ((exists bpr_power_code_b5nbscplp_source_prefix_choice_valuation_selected_power bpr_power_scale_b5nbscplp_source_prefix_choice_valuation_selected_power. ((forall bpr_power_index_b5nbscplp_source_prefix_choice_valuation_selected_power. (exists bpr_gap_b5nbscplp_source_prefix_choice_valuation_selected_power_repeat_bound. bpr_gap_b5nbscplp_source_prefix_choice_valuation_selected_power_repeat_bound + S (bpr_power_index_b5nbscplp_source_prefix_choice_valuation_selected_power) = bpr_choice_exponent_b5nbscplp_source_prefix_choice) -> (((exists bpr_height_b5nbscplp_source_prefix_choice_valuation_selected_power_repeat_entry. bpr_height_b5nbscplp_source_prefix_choice_valuation_selected_power_repeat_entry + S (S (bpr_prefix_index_b5nbscplp_source_prefix)) = S ((S (bpr_power_index_b5nbscplp_source_prefix_choice_valuation_selected_power)) * bpr_power_scale_b5nbscplp_source_prefix_choice_valuation_selected_power)) /\ exists bpr_quotient_b5nbscplp_source_prefix_choice_valuation_selected_power_repeat_entry. bpr_power_code_b5nbscplp_source_prefix_choice_valuation_selected_power = bpr_quotient_b5nbscplp_source_prefix_choice_valuation_selected_power_repeat_entry * S ((S (bpr_power_index_b5nbscplp_source_prefix_choice_valuation_selected_power)) * bpr_power_scale_b5nbscplp_source_prefix_choice_valuation_selected_power) + (S (bpr_prefix_index_b5nbscplp_source_prefix))))) /\ (exists ff_u_b5nbscplp_source_prefix_choice_valuation_selected_power_product ff_v_b5nbscplp_source_prefix_choice_valuation_selected_power_product. ((((exists ff_h_b5nbscplp_source_prefix_choice_valuation_selected_power_product_start. ff_h_b5nbscplp_source_prefix_choice_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_b5nbscplp_source_prefix_choice_valuation_selected_power_product)) /\ exists ff_q_b5nbscplp_source_prefix_choice_valuation_selected_power_product_start. ff_u_b5nbscplp_source_prefix_choice_valuation_selected_power_product = ff_q_b5nbscplp_source_prefix_choice_valuation_selected_power_product_start * S ((S (0)) * ff_v_b5nbscplp_source_prefix_choice_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_b5nbscplp_source_prefix_choice_valuation_selected_power_product_terminal. ff_h_b5nbscplp_source_prefix_choice_valuation_selected_power_product_terminal + S (bpr_power_value_b5nbscplp_source_prefix_choice_valuation_selected) = S ((S (bpr_choice_exponent_b5nbscplp_source_prefix_choice)) * ff_v_b5nbscplp_source_prefix_choice_valuation_selected_power_product)) /\ exists ff_q_b5nbscplp_source_prefix_choice_valuation_selected_power_product_terminal. ff_u_b5nbscplp_source_prefix_choice_valuation_selected_power_product = ff_q_b5nbscplp_source_prefix_choice_valuation_selected_power_product_terminal * S ((S (bpr_choice_exponent_b5nbscplp_source_prefix_choice)) * ff_v_b5nbscplp_source_prefix_choice_valuation_selected_power_product) + (bpr_power_value_b5nbscplp_source_prefix_choice_valuation_selected))) /\ forall ff_i_b5nbscplp_source_prefix_choice_valuation_selected_power_product. (exists ff_lt_b5nbscplp_source_prefix_choice_valuation_selected_power_product_bound. ff_lt_b5nbscplp_source_prefix_choice_valuation_selected_power_product_bound + S ff_i_b5nbscplp_source_prefix_choice_valuation_selected_power_product = bpr_choice_exponent_b5nbscplp_source_prefix_choice) -> exists ff_p_b5nbscplp_source_prefix_choice_valuation_selected_power_product ff_r_b5nbscplp_source_prefix_choice_valuation_selected_power_product ff_s_b5nbscplp_source_prefix_choice_valuation_selected_power_product. ((((exists ff_h_b5nbscplp_source_prefix_choice_valuation_selected_power_product_factor. ff_h_b5nbscplp_source_prefix_choice_valuation_selected_power_product_factor + S (ff_p_b5nbscplp_source_prefix_choice_valuation_selected_power_product) = S ((S (ff_i_b5nbscplp_source_prefix_choice_valuation_selected_power_product)) * bpr_power_scale_b5nbscplp_source_prefix_choice_valuation_selected_power)) /\ exists ff_q_b5nbscplp_source_prefix_choice_valuation_selected_power_product_factor. bpr_power_code_b5nbscplp_source_prefix_choice_valuation_selected_power = ff_q_b5nbscplp_source_prefix_choice_valuation_selected_power_product_factor * S ((S (ff_i_b5nbscplp_source_prefix_choice_valuation_selected_power_product)) * bpr_power_scale_b5nbscplp_source_prefix_choice_valuation_selected_power) + (ff_p_b5nbscplp_source_prefix_choice_valuation_selected_power_product))) /\ ((((exists ff_h_b5nbscplp_source_prefix_choice_valuation_selected_power_product_partial. ff_h_b5nbscplp_source_prefix_choice_valuation_selected_power_product_partial + S (ff_r_b5nbscplp_source_prefix_choice_valuation_selected_power_product) = S ((S (ff_i_b5nbscplp_source_prefix_choice_valuation_selected_power_product)) * ff_v_b5nbscplp_source_prefix_choice_valuation_selected_power_product)) /\ exists ff_q_b5nbscplp_source_prefix_choice_valuation_selected_power_product_partial. ff_u_b5nbscplp_source_prefix_choice_valuation_selected_power_product = ff_q_b5nbscplp_source_prefix_choice_valuation_selected_power_product_partial * S ((S (ff_i_b5nbscplp_source_prefix_choice_valuation_selected_power_product)) * ff_v_b5nbscplp_source_prefix_choice_valuation_selected_power_product) + (ff_r_b5nbscplp_source_prefix_choice_valuation_selected_power_product))) /\ ((((exists ff_h_b5nbscplp_source_prefix_choice_valuation_selected_power_product_successor. ff_h_b5nbscplp_source_prefix_choice_valuation_selected_power_product_successor + S (ff_s_b5nbscplp_source_prefix_choice_valuation_selected_power_product) = S ((S (S ff_i_b5nbscplp_source_prefix_choice_valuation_selected_power_product)) * ff_v_b5nbscplp_source_prefix_choice_valuation_selected_power_product)) /\ exists ff_q_b5nbscplp_source_prefix_choice_valuation_selected_power_product_successor. ff_u_b5nbscplp_source_prefix_choice_valuation_selected_power_product = ff_q_b5nbscplp_source_prefix_choice_valuation_selected_power_product_successor * S ((S (S ff_i_b5nbscplp_source_prefix_choice_valuation_selected_power_product)) * ff_v_b5nbscplp_source_prefix_choice_valuation_selected_power_product) + (ff_s_b5nbscplp_source_prefix_choice_valuation_selected_power_product))) /\ ff_s_b5nbscplp_source_prefix_choice_valuation_selected_power_product = ff_r_b5nbscplp_source_prefix_choice_valuation_selected_power_product * ff_p_b5nbscplp_source_prefix_choice_valuation_selected_power_product)))))))) /\ (exists bpr_divides_quotient_b5nbscplp_source_prefix_choice_valuation_selected_divides. C = (bpr_power_value_b5nbscplp_source_prefix_choice_valuation_selected) * bpr_divides_quotient_b5nbscplp_source_prefix_choice_valuation_selected_divides)))) /\ forall bpr_valuation_candidate_b5nbscplp_source_prefix_choice_valuation. (exists bpr_le_gap_b5nbscplp_source_prefix_choice_valuation_candidate_bound. bpr_le_gap_b5nbscplp_source_prefix_choice_valuation_candidate_bound + (bpr_valuation_candidate_b5nbscplp_source_prefix_choice_valuation) = (C)) -> (exists bpr_power_value_b5nbscplp_source_prefix_choice_valuation_candidate. ((exists bpr_power_code_b5nbscplp_source_prefix_choice_valuation_candidate_power bpr_power_scale_b5nbscplp_source_prefix_choice_valuation_candidate_power. ((forall bpr_power_index_b5nbscplp_source_prefix_choice_valuation_candidate_power. (exists bpr_gap_b5nbscplp_source_prefix_choice_valuation_candidate_power_repeat_bound. bpr_gap_b5nbscplp_source_prefix_choice_valuation_candidate_power_repeat_bound + S (bpr_power_index_b5nbscplp_source_prefix_choice_valuation_candidate_power) = bpr_valuation_candidate_b5nbscplp_source_prefix_choice_valuation) -> (((exists bpr_height_b5nbscplp_source_prefix_choice_valuation_candidate_power_repeat_entry. bpr_height_b5nbscplp_source_prefix_choice_valuation_candidate_power_repeat_entry + S (S (bpr_prefix_index_b5nbscplp_source_prefix)) = S ((S (bpr_power_index_b5nbscplp_source_prefix_choice_valuation_candidate_power)) * bpr_power_scale_b5nbscplp_source_prefix_choice_valuation_candidate_power)) /\ exists bpr_quotient_b5nbscplp_source_prefix_choice_valuation_candidate_power_repeat_entry. bpr_power_code_b5nbscplp_source_prefix_choice_valuation_candidate_power = bpr_quotient_b5nbscplp_source_prefix_choice_valuation_candidate_power_repeat_entry * S ((S (bpr_power_index_b5nbscplp_source_prefix_choice_valuation_candidate_power)) * bpr_power_scale_b5nbscplp_source_prefix_choice_valuation_candidate_power) + (S (bpr_prefix_index_b5nbscplp_source_prefix))))) /\ (exists ff_u_b5nbscplp_source_prefix_choice_valuation_candidate_power_product ff_v_b5nbscplp_source_prefix_choice_valuation_candidate_power_product. ((((exists ff_h_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_start. ff_h_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_b5nbscplp_source_prefix_choice_valuation_candidate_power_product)) /\ exists ff_q_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_start. ff_u_b5nbscplp_source_prefix_choice_valuation_candidate_power_product = ff_q_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_start * S ((S (0)) * ff_v_b5nbscplp_source_prefix_choice_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_terminal. ff_h_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_terminal + S (bpr_power_value_b5nbscplp_source_prefix_choice_valuation_candidate) = S ((S (bpr_valuation_candidate_b5nbscplp_source_prefix_choice_valuation)) * ff_v_b5nbscplp_source_prefix_choice_valuation_candidate_power_product)) /\ exists ff_q_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_terminal. ff_u_b5nbscplp_source_prefix_choice_valuation_candidate_power_product = ff_q_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_terminal * S ((S (bpr_valuation_candidate_b5nbscplp_source_prefix_choice_valuation)) * ff_v_b5nbscplp_source_prefix_choice_valuation_candidate_power_product) + (bpr_power_value_b5nbscplp_source_prefix_choice_valuation_candidate))) /\ forall ff_i_b5nbscplp_source_prefix_choice_valuation_candidate_power_product. (exists ff_lt_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_bound. ff_lt_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_bound + S ff_i_b5nbscplp_source_prefix_choice_valuation_candidate_power_product = bpr_valuation_candidate_b5nbscplp_source_prefix_choice_valuation) -> exists ff_p_b5nbscplp_source_prefix_choice_valuation_candidate_power_product ff_r_b5nbscplp_source_prefix_choice_valuation_candidate_power_product ff_s_b5nbscplp_source_prefix_choice_valuation_candidate_power_product. ((((exists ff_h_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_factor. ff_h_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_factor + S (ff_p_b5nbscplp_source_prefix_choice_valuation_candidate_power_product) = S ((S (ff_i_b5nbscplp_source_prefix_choice_valuation_candidate_power_product)) * bpr_power_scale_b5nbscplp_source_prefix_choice_valuation_candidate_power)) /\ exists ff_q_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_factor. bpr_power_code_b5nbscplp_source_prefix_choice_valuation_candidate_power = ff_q_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_factor * S ((S (ff_i_b5nbscplp_source_prefix_choice_valuation_candidate_power_product)) * bpr_power_scale_b5nbscplp_source_prefix_choice_valuation_candidate_power) + (ff_p_b5nbscplp_source_prefix_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_partial. ff_h_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_partial + S (ff_r_b5nbscplp_source_prefix_choice_valuation_candidate_power_product) = S ((S (ff_i_b5nbscplp_source_prefix_choice_valuation_candidate_power_product)) * ff_v_b5nbscplp_source_prefix_choice_valuation_candidate_power_product)) /\ exists ff_q_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_partial. ff_u_b5nbscplp_source_prefix_choice_valuation_candidate_power_product = ff_q_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_partial * S ((S (ff_i_b5nbscplp_source_prefix_choice_valuation_candidate_power_product)) * ff_v_b5nbscplp_source_prefix_choice_valuation_candidate_power_product) + (ff_r_b5nbscplp_source_prefix_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_successor. ff_h_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_successor + S (ff_s_b5nbscplp_source_prefix_choice_valuation_candidate_power_product) = S ((S (S ff_i_b5nbscplp_source_prefix_choice_valuation_candidate_power_product)) * ff_v_b5nbscplp_source_prefix_choice_valuation_candidate_power_product)) /\ exists ff_q_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_successor. ff_u_b5nbscplp_source_prefix_choice_valuation_candidate_power_product = ff_q_b5nbscplp_source_prefix_choice_valuation_candidate_power_product_successor * S ((S (S ff_i_b5nbscplp_source_prefix_choice_valuation_candidate_power_product)) * ff_v_b5nbscplp_source_prefix_choice_valuation_candidate_power_product) + (ff_s_b5nbscplp_source_prefix_choice_valuation_candidate_power_product))) /\ ff_s_b5nbscplp_source_prefix_choice_valuation_candidate_power_product = ff_r_b5nbscplp_source_prefix_choice_valuation_candidate_power_product * ff_p_b5nbscplp_source_prefix_choice_valuation_candidate_power_product)))))))) /\ (exists bpr_divides_quotient_b5nbscplp_source_prefix_choice_valuation_candidate_divides. C = (bpr_power_value_b5nbscplp_source_prefix_choice_valuation_candidate) * bpr_divides_quotient_b5nbscplp_source_prefix_choice_valuation_candidate_divides))) -> (exists bpr_le_gap_b5nbscplp_source_prefix_choice_valuation_candidate_below. bpr_le_gap_b5nbscplp_source_prefix_choice_valuation_candidate_below + (bpr_valuation_candidate_b5nbscplp_source_prefix_choice_valuation) = (bpr_choice_exponent_b5nbscplp_source_prefix_choice))) /\ (exists bpr_power_code_b5nbscplp_source_prefix_choice_power bpr_power_scale_b5nbscplp_source_prefix_choice_power. ((forall bpr_power_index_b5nbscplp_source_prefix_choice_power. (exists bpr_gap_b5nbscplp_source_prefix_choice_power_repeat_bound. bpr_gap_b5nbscplp_source_prefix_choice_power_repeat_bound + S (bpr_power_index_b5nbscplp_source_prefix_choice_power) = bpr_choice_exponent_b5nbscplp_source_prefix_choice) -> (((exists bpr_height_b5nbscplp_source_prefix_choice_power_repeat_entry. bpr_height_b5nbscplp_source_prefix_choice_power_repeat_entry + S (S (bpr_prefix_index_b5nbscplp_source_prefix)) = S ((S (bpr_power_index_b5nbscplp_source_prefix_choice_power)) * bpr_power_scale_b5nbscplp_source_prefix_choice_power)) /\ exists bpr_quotient_b5nbscplp_source_prefix_choice_power_repeat_entry. bpr_power_code_b5nbscplp_source_prefix_choice_power = bpr_quotient_b5nbscplp_source_prefix_choice_power_repeat_entry * S ((S (bpr_power_index_b5nbscplp_source_prefix_choice_power)) * bpr_power_scale_b5nbscplp_source_prefix_choice_power) + (S (bpr_prefix_index_b5nbscplp_source_prefix))))) /\ (exists ff_u_b5nbscplp_source_prefix_choice_power_product ff_v_b5nbscplp_source_prefix_choice_power_product. ((((exists ff_h_b5nbscplp_source_prefix_choice_power_product_start. ff_h_b5nbscplp_source_prefix_choice_power_product_start + S (1) = S ((S (0)) * ff_v_b5nbscplp_source_prefix_choice_power_product)) /\ exists ff_q_b5nbscplp_source_prefix_choice_power_product_start. ff_u_b5nbscplp_source_prefix_choice_power_product = ff_q_b5nbscplp_source_prefix_choice_power_product_start * S ((S (0)) * ff_v_b5nbscplp_source_prefix_choice_power_product) + (1))) /\ ((((exists ff_h_b5nbscplp_source_prefix_choice_power_product_terminal. ff_h_b5nbscplp_source_prefix_choice_power_product_terminal + S (bpr_prefix_value_b5nbscplp_source_prefix) = S ((S (bpr_choice_exponent_b5nbscplp_source_prefix_choice)) * ff_v_b5nbscplp_source_prefix_choice_power_product)) /\ exists ff_q_b5nbscplp_source_prefix_choice_power_product_terminal. ff_u_b5nbscplp_source_prefix_choice_power_product = ff_q_b5nbscplp_source_prefix_choice_power_product_terminal * S ((S (bpr_choice_exponent_b5nbscplp_source_prefix_choice)) * ff_v_b5nbscplp_source_prefix_choice_power_product) + (bpr_prefix_value_b5nbscplp_source_prefix))) /\ forall ff_i_b5nbscplp_source_prefix_choice_power_product. (exists ff_lt_b5nbscplp_source_prefix_choice_power_product_bound. ff_lt_b5nbscplp_source_prefix_choice_power_product_bound + S ff_i_b5nbscplp_source_prefix_choice_power_product = bpr_choice_exponent_b5nbscplp_source_prefix_choice) -> exists ff_p_b5nbscplp_source_prefix_choice_power_product ff_r_b5nbscplp_source_prefix_choice_power_product ff_s_b5nbscplp_source_prefix_choice_power_product. ((((exists ff_h_b5nbscplp_source_prefix_choice_power_product_factor. ff_h_b5nbscplp_source_prefix_choice_power_product_factor + S (ff_p_b5nbscplp_source_prefix_choice_power_product) = S ((S (ff_i_b5nbscplp_source_prefix_choice_power_product)) * bpr_power_scale_b5nbscplp_source_prefix_choice_power)) /\ exists ff_q_b5nbscplp_source_prefix_choice_power_product_factor. bpr_power_code_b5nbscplp_source_prefix_choice_power = ff_q_b5nbscplp_source_prefix_choice_power_product_factor * S ((S (ff_i_b5nbscplp_source_prefix_choice_power_product)) * bpr_power_scale_b5nbscplp_source_prefix_choice_power) + (ff_p_b5nbscplp_source_prefix_choice_power_product))) /\ ((((exists ff_h_b5nbscplp_source_prefix_choice_power_product_partial. ff_h_b5nbscplp_source_prefix_choice_power_product_partial + S (ff_r_b5nbscplp_source_prefix_choice_power_product) = S ((S (ff_i_b5nbscplp_source_prefix_choice_power_product)) * ff_v_b5nbscplp_source_prefix_choice_power_product)) /\ exists ff_q_b5nbscplp_source_prefix_choice_power_product_partial. ff_u_b5nbscplp_source_prefix_choice_power_product = ff_q_b5nbscplp_source_prefix_choice_power_product_partial * S ((S (ff_i_b5nbscplp_source_prefix_choice_power_product)) * ff_v_b5nbscplp_source_prefix_choice_power_product) + (ff_r_b5nbscplp_source_prefix_choice_power_product))) /\ ((((exists ff_h_b5nbscplp_source_prefix_choice_power_product_successor. ff_h_b5nbscplp_source_prefix_choice_power_product_successor + S (ff_s_b5nbscplp_source_prefix_choice_power_product) = S ((S (S ff_i_b5nbscplp_source_prefix_choice_power_product)) * ff_v_b5nbscplp_source_prefix_choice_power_product)) /\ exists ff_q_b5nbscplp_source_prefix_choice_power_product_successor. ff_u_b5nbscplp_source_prefix_choice_power_product = ff_q_b5nbscplp_source_prefix_choice_power_product_successor * S ((S (S ff_i_b5nbscplp_source_prefix_choice_power_product)) * ff_v_b5nbscplp_source_prefix_choice_power_product) + (ff_s_b5nbscplp_source_prefix_choice_power_product))) /\ ff_s_b5nbscplp_source_prefix_choice_power_product = ff_r_b5nbscplp_source_prefix_choice_power_product * ff_p_b5nbscplp_source_prefix_choice_power_product)))))))))) \/ (~((~(S (bpr_prefix_index_b5nbscplp_source_prefix) = 1) /\ forall bpr_left_b5nbscplp_source_prefix_choice_prime bpr_right_b5nbscplp_source_prefix_choice_prime. S (bpr_prefix_index_b5nbscplp_source_prefix) = bpr_left_b5nbscplp_source_prefix_choice_prime * bpr_right_b5nbscplp_source_prefix_choice_prime -> bpr_left_b5nbscplp_source_prefix_choice_prime = 1 \/ bpr_right_b5nbscplp_source_prefix_choice_prime = 1)) /\ bpr_prefix_value_b5nbscplp_source_prefix = 1))))) /\ (exists ff_u_b5nbscplp_source_product ff_v_b5nbscplp_source_product. ((((exists ff_h_b5nbscplp_source_product_start. ff_h_b5nbscplp_source_product_start + S (1) = S ((S (0)) * ff_v_b5nbscplp_source_product)) /\ exists ff_q_b5nbscplp_source_product_start. ff_u_b5nbscplp_source_product = ff_q_b5nbscplp_source_product_start * S ((S (0)) * ff_v_b5nbscplp_source_product) + (1))) /\ ((((exists ff_h_b5nbscplp_source_product_terminal. ff_h_b5nbscplp_source_product_terminal + S (z) = S ((S (s)) * ff_v_b5nbscplp_source_product)) /\ exists ff_q_b5nbscplp_source_product_terminal. ff_u_b5nbscplp_source_product = ff_q_b5nbscplp_source_product_terminal * S ((S (s)) * ff_v_b5nbscplp_source_product) + (z))) /\ forall ff_i_b5nbscplp_source_product. (exists ff_lt_b5nbscplp_source_product_bound. ff_lt_b5nbscplp_source_product_bound + S ff_i_b5nbscplp_source_product = s) -> exists ff_p_b5nbscplp_source_product ff_r_b5nbscplp_source_product ff_s_b5nbscplp_source_product. ((((exists ff_h_b5nbscplp_source_product_factor. ff_h_b5nbscplp_source_product_factor + S (ff_p_b5nbscplp_source_product) = S ((S (ff_i_b5nbscplp_source_product)) * bpr_product_scale_b5nbscplp_source)) /\ exists ff_q_b5nbscplp_source_product_factor. bpr_product_code_b5nbscplp_source = ff_q_b5nbscplp_source_product_factor * S ((S (ff_i_b5nbscplp_source_product)) * bpr_product_scale_b5nbscplp_source) + (ff_p_b5nbscplp_source_product))) /\ ((((exists ff_h_b5nbscplp_source_product_partial. ff_h_b5nbscplp_source_product_partial + S (ff_r_b5nbscplp_source_product) = S ((S (ff_i_b5nbscplp_source_product)) * ff_v_b5nbscplp_source_product)) /\ exists ff_q_b5nbscplp_source_product_partial. ff_u_b5nbscplp_source_product = ff_q_b5nbscplp_source_product_partial * S ((S (ff_i_b5nbscplp_source_product)) * ff_v_b5nbscplp_source_product) + (ff_r_b5nbscplp_source_product))) /\ ((((exists ff_h_b5nbscplp_source_product_successor. ff_h_b5nbscplp_source_product_successor + S (ff_s_b5nbscplp_source_product) = S ((S (S ff_i_b5nbscplp_source_product)) * ff_v_b5nbscplp_source_product)) /\ exists ff_q_b5nbscplp_source_product_successor. ff_u_b5nbscplp_source_product = ff_q_b5nbscplp_source_product_successor * S ((S (S ff_i_b5nbscplp_source_product)) * ff_v_b5nbscplp_source_product) + (ff_s_b5nbscplp_source_product))) /\ ff_s_b5nbscplp_source_product = ff_r_b5nbscplp_source_product * ff_p_b5nbscplp_source_product)))))))) -> (exists bpvi_b_b5nbscplp_power bpvi_c_b5nbscplp_power. ((forall bpvi_i_b5nbscplp_power. (exists bpvi_repeat_gap_b5nbscplp_power. bpvi_repeat_gap_b5nbscplp_power + S bpvi_i_b5nbscplp_power = s) -> (((exists bpvi_h_b5nbscplp_power_repeat. bpvi_h_b5nbscplp_power_repeat + S (n + n) = S ((S (bpvi_i_b5nbscplp_power)) * bpvi_c_b5nbscplp_power)) /\ exists bpvi_q_b5nbscplp_power_repeat. bpvi_b_b5nbscplp_power = bpvi_q_b5nbscplp_power_repeat * S ((S (bpvi_i_b5nbscplp_power)) * bpvi_c_b5nbscplp_power) + (n + n)))) /\ (exists bpvi_u_b5nbscplp_power bpvi_v_b5nbscplp_power. ((((exists bpvi_h_b5nbscplp_power_start. bpvi_h_b5nbscplp_power_start + S (1) = S ((S (0)) * bpvi_v_b5nbscplp_power)) /\ exists bpvi_q_b5nbscplp_power_start. bpvi_u_b5nbscplp_power = bpvi_q_b5nbscplp_power_start * S ((S (0)) * bpvi_v_b5nbscplp_power) + (1))) /\ ((((exists bpvi_h_b5nbscplp_power_terminal. bpvi_h_b5nbscplp_power_terminal + S (A) = S ((S (s)) * bpvi_v_b5nbscplp_power)) /\ exists bpvi_q_b5nbscplp_power_terminal. bpvi_u_b5nbscplp_power = bpvi_q_b5nbscplp_power_terminal * S ((S (s)) * bpvi_v_b5nbscplp_power) + (A))) /\ forall bpvi_j_b5nbscplp_power. (exists bpvi_product_gap_b5nbscplp_power. bpvi_product_gap_b5nbscplp_power + S bpvi_j_b5nbscplp_power = s) -> exists bpvi_factor_b5nbscplp_power bpvi_partial_b5nbscplp_power bpvi_successor_b5nbscplp_power. ((((exists bpvi_h_b5nbscplp_power_factor. bpvi_h_b5nbscplp_power_factor + S (bpvi_factor_b5nbscplp_power) = S ((S (bpvi_j_b5nbscplp_power)) * bpvi_c_b5nbscplp_power)) /\ exists bpvi_q_b5nbscplp_power_factor. bpvi_b_b5nbscplp_power = bpvi_q_b5nbscplp_power_factor * S ((S (bpvi_j_b5nbscplp_power)) * bpvi_c_b5nbscplp_power) + (bpvi_factor_b5nbscplp_power))) /\ ((((exists bpvi_h_b5nbscplp_power_partial. bpvi_h_b5nbscplp_power_partial + S (bpvi_partial_b5nbscplp_power) = S ((S (bpvi_j_b5nbscplp_power)) * bpvi_v_b5nbscplp_power)) /\ exists bpvi_q_b5nbscplp_power_partial. bpvi_u_b5nbscplp_power = bpvi_q_b5nbscplp_power_partial * S ((S (bpvi_j_b5nbscplp_power)) * bpvi_v_b5nbscplp_power) + (bpvi_partial_b5nbscplp_power))) /\ ((((exists bpvi_h_b5nbscplp_power_successor. bpvi_h_b5nbscplp_power_successor + S (bpvi_successor_b5nbscplp_power) = S ((S (S bpvi_j_b5nbscplp_power)) * bpvi_v_b5nbscplp_power)) /\ exists bpvi_q_b5nbscplp_power_successor. bpvi_u_b5nbscplp_power = bpvi_q_b5nbscplp_power_successor * S ((S (S bpvi_j_b5nbscplp_power)) * bpvi_v_b5nbscplp_power) + (bpvi_successor_b5nbscplp_power))) /\ bpvi_successor_b5nbscplp_power = bpvi_partial_b5nbscplp_power * bpvi_factor_b5nbscplp_power)))))))) -> (exists bcf_le_gap_b5nbscplp_result. bcf_le_gap_b5nbscplp_result + (z) = A)Proof neighborhood
Direct theorem prerequisites
BT0042 beta_at_unique BT00XA beta_product_uniform_le_pow BT010V no_bertrand_small_contribution_choice_le_doubleDirect theorem dependents
Definition-aware tactic body
Only local propositions introduced by have or suffices are compacted. Every changed line has an exact-AST conservative-expansion receipt; the kernel still receives the immutable original tactic script.
Read the argument
Proof checkpoints
This is a reading aid, not a new proof or a proof-tree certificate. Checkpoint groups are consecutive commands, not inferred branch boundaries. Every step links to the preserved script.
Named ingredients (3)
01Fix variables and assumptionsL1–10
02Fix variables and assumptionsL11–14
03Separate the logical casesL15–17
04Establish huniformL18–22
Establish this local claim before using it. It is not an additional assumption.
- L18
have huniform : ∀ i. ∀ a. Lt(i,s) → BetaAt(x,x1,i,a) → Le(a,n + n)Definitions: Lt(i,s)BetaAt(x,x1,i,a)Le(a,n + n)Original native command in the exact edition - L19
intro i - L20
intro a - L21
intro hi - L22
intro hdecoded
05Establish hentryL23–25
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply hsource witness witness left.
- L23
have hentry : ∃ p. BetaAt(x,x1,i,p) ∧ (Prime(S i) ∧ (∃ y. PowerValuation(S i,C,y) ∧ Pow(S i,y,p)) ∨ ¬Prime(S i) ∧ p = 1)Definitions: BetaAt(x,x1,i,p)Prime(S i)PowerValuation(S i,C,y)Pow(S i,y,p)Original native command in the exact edition - L24
apply hsource_witness_witness_left - L25
exact hi
06Separate the logical casesL26–27
07Establish heqL28–36
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply beta at unique.
08Establish hfactorL37–46
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply no bertrand small contribution choice le double.
- L37
- L38
specialize no_bertrand_small_contribution_choice_le_double n - L39
specialize no_bertrand_small_contribution_choice_le_double s - L40
specialize no_bertrand_small_contribution_choice_le_double q - L41
specialize no_bertrand_small_contribution_choice_le_double r - L42
specialize no_bertrand_small_contribution_choice_le_double C - L43
specialize no_bertrand_small_contribution_choice_le_double i - L44
specialize no_bertrand_small_contribution_choice_le_double x2 - L45
apply no_bertrand_small_contribution_choice_le_double - L46
exact hexclusion
09Use earlier factsL47–52
10Calculate and transport equalitiesL53–53
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L53
rewrite heq
11Use earlier factsL54–63
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L54
exact hfactor - L55
specialize beta_product_uniform_le_pow x - L56
specialize beta_product_uniform_le_pow x1 - L57
specialize beta_product_uniform_le_pow (n + n) - L58
specialize beta_product_uniform_le_pow s - L59
specialize beta_product_uniform_le_pow z - L60
specialize beta_product_uniform_le_pow A - L61
apply beta_product_uniform_le_pow - L62
exact huniform - L63
exact hsource_witness_witness_right
12Use earlier factsL64–64
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L64
exact hpower
Original defined command ledger · 64 lines
- 0001
intro n - 0002
intro s - 0003
intro q - 0004
intro r - 0005
intro C - 0006
intro z - 0007
intro A - 0008
intro hexclusion - 0009
intro hpositive - 0010
intro hfloor - 0011
intro hdivision - 0012
intro hcentral - 0013
intro hsource - 0014
intro hpower - 0015
cases hsource - 0016
cases hsource_witness - 0017
cases hsource_witness_witness - 0018
have huniform : ∀ i. ∀ a. Lt(i,s) → BetaAt(x,x1,i,a) → Le(a,n + n)Exact native replay line
have huniform : forall i a. (exists bcf_lt_gap_b5nbscplp_uniform_bound. bcf_lt_gap_b5nbscplp_uniform_bound + S (i) = s) -> (((exists bpr_height_b5nbscplp_uniform_decoded. bpr_height_b5nbscplp_uniform_decoded + S (a) = S ((S (i)) * x1)) /\ exists bpr_quotient_b5nbscplp_uniform_decoded. x = bpr_quotient_b5nbscplp_uniform_decoded * S ((S (i)) * x1) + (a))) -> (exists bcf_le_gap_b5nbscplp_uniform_result. bcf_le_gap_b5nbscplp_uniform_result + (a) = n + n) - 0019
intro i - 0020
intro a - 0021
intro hi - 0022
intro hdecoded - 0023
have hentry : ∃ p. BetaAt(x,x1,i,p) ∧ (Prime(S i) ∧ (∃ y. PowerValuation(S i,C,y) ∧ Pow(S i,y,p)) ∨ ¬Prime(S i) ∧ p = 1)Exact native replay line
have hentry : exists p. (((exists bpr_height_b5nbscplp_entry_decoded. bpr_height_b5nbscplp_entry_decoded + S (p) = S ((S (i)) * x1)) /\ exists bpr_quotient_b5nbscplp_entry_decoded. x = bpr_quotient_b5nbscplp_entry_decoded * S ((S (i)) * x1) + (p))) /\ (((((~(S (i) = 1) /\ forall bpr_left_b5nbscplp_entry_choice_prime bpr_right_b5nbscplp_entry_choice_prime. S (i) = bpr_left_b5nbscplp_entry_choice_prime * bpr_right_b5nbscplp_entry_choice_prime -> bpr_left_b5nbscplp_entry_choice_prime = 1 \/ bpr_right_b5nbscplp_entry_choice_prime = 1)) /\ exists bpr_choice_exponent_b5nbscplp_entry_choice. ((((exists bpr_le_gap_b5nbscplp_entry_choice_valuation_selected_bound. bpr_le_gap_b5nbscplp_entry_choice_valuation_selected_bound + (bpr_choice_exponent_b5nbscplp_entry_choice) = (C)) /\ (exists bpr_power_value_b5nbscplp_entry_choice_valuation_selected. ((exists bpr_power_code_b5nbscplp_entry_choice_valuation_selected_power bpr_power_scale_b5nbscplp_entry_choice_valuation_selected_power. ((forall bpr_power_index_b5nbscplp_entry_choice_valuation_selected_power. (exists bpr_gap_b5nbscplp_entry_choice_valuation_selected_power_repeat_bound. bpr_gap_b5nbscplp_entry_choice_valuation_selected_power_repeat_bound + S (bpr_power_index_b5nbscplp_entry_choice_valuation_selected_power) = bpr_choice_exponent_b5nbscplp_entry_choice) -> (((exists bpr_height_b5nbscplp_entry_choice_valuation_selected_power_repeat_entry. bpr_height_b5nbscplp_entry_choice_valuation_selected_power_repeat_entry + S (S (i)) = S ((S (bpr_power_index_b5nbscplp_entry_choice_valuation_selected_power)) * bpr_power_scale_b5nbscplp_entry_choice_valuation_selected_power)) /\ exists bpr_quotient_b5nbscplp_entry_choice_valuation_selected_power_repeat_entry. bpr_power_code_b5nbscplp_entry_choice_valuation_selected_power = bpr_quotient_b5nbscplp_entry_choice_valuation_selected_power_repeat_entry * S ((S (bpr_power_index_b5nbscplp_entry_choice_valuation_selected_power)) * bpr_power_scale_b5nbscplp_entry_choice_valuation_selected_power) + (S (i))))) /\ (exists ff_u_b5nbscplp_entry_choice_valuation_selected_power_product ff_v_b5nbscplp_entry_choice_valuation_selected_power_product. ((((exists ff_h_b5nbscplp_entry_choice_valuation_selected_power_product_start. ff_h_b5nbscplp_entry_choice_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_b5nbscplp_entry_choice_valuation_selected_power_product)) /\ exists ff_q_b5nbscplp_entry_choice_valuation_selected_power_product_start. ff_u_b5nbscplp_entry_choice_valuation_selected_power_product = ff_q_b5nbscplp_entry_choice_valuation_selected_power_product_start * S ((S (0)) * ff_v_b5nbscplp_entry_choice_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_b5nbscplp_entry_choice_valuation_selected_power_product_terminal. ff_h_b5nbscplp_entry_choice_valuation_selected_power_product_terminal + S (bpr_power_value_b5nbscplp_entry_choice_valuation_selected) = S ((S (bpr_choice_exponent_b5nbscplp_entry_choice)) * ff_v_b5nbscplp_entry_choice_valuation_selected_power_product)) /\ exists ff_q_b5nbscplp_entry_choice_valuation_selected_power_product_terminal. ff_u_b5nbscplp_entry_choice_valuation_selected_power_product = ff_q_b5nbscplp_entry_choice_valuation_selected_power_product_terminal * S ((S (bpr_choice_exponent_b5nbscplp_entry_choice)) * ff_v_b5nbscplp_entry_choice_valuation_selected_power_product) + (bpr_power_value_b5nbscplp_entry_choice_valuation_selected))) /\ forall ff_i_b5nbscplp_entry_choice_valuation_selected_power_product. (exists ff_lt_b5nbscplp_entry_choice_valuation_selected_power_product_bound. ff_lt_b5nbscplp_entry_choice_valuation_selected_power_product_bound + S ff_i_b5nbscplp_entry_choice_valuation_selected_power_product = bpr_choice_exponent_b5nbscplp_entry_choice) -> exists ff_p_b5nbscplp_entry_choice_valuation_selected_power_product ff_r_b5nbscplp_entry_choice_valuation_selected_power_product ff_s_b5nbscplp_entry_choice_valuation_selected_power_product. ((((exists ff_h_b5nbscplp_entry_choice_valuation_selected_power_product_factor. ff_h_b5nbscplp_entry_choice_valuation_selected_power_product_factor + S (ff_p_b5nbscplp_entry_choice_valuation_selected_power_product) = S ((S (ff_i_b5nbscplp_entry_choice_valuation_selected_power_product)) * bpr_power_scale_b5nbscplp_entry_choice_valuation_selected_power)) /\ exists ff_q_b5nbscplp_entry_choice_valuation_selected_power_product_factor. bpr_power_code_b5nbscplp_entry_choice_valuation_selected_power = ff_q_b5nbscplp_entry_choice_valuation_selected_power_product_factor * S ((S (ff_i_b5nbscplp_entry_choice_valuation_selected_power_product)) * bpr_power_scale_b5nbscplp_entry_choice_valuation_selected_power) + (ff_p_b5nbscplp_entry_choice_valuation_selected_power_product))) /\ ((((exists ff_h_b5nbscplp_entry_choice_valuation_selected_power_product_partial. ff_h_b5nbscplp_entry_choice_valuation_selected_power_product_partial + S (ff_r_b5nbscplp_entry_choice_valuation_selected_power_product) = S ((S (ff_i_b5nbscplp_entry_choice_valuation_selected_power_product)) * ff_v_b5nbscplp_entry_choice_valuation_selected_power_product)) /\ exists ff_q_b5nbscplp_entry_choice_valuation_selected_power_product_partial. ff_u_b5nbscplp_entry_choice_valuation_selected_power_product = ff_q_b5nbscplp_entry_choice_valuation_selected_power_product_partial * S ((S (ff_i_b5nbscplp_entry_choice_valuation_selected_power_product)) * ff_v_b5nbscplp_entry_choice_valuation_selected_power_product) + (ff_r_b5nbscplp_entry_choice_valuation_selected_power_product))) /\ ((((exists ff_h_b5nbscplp_entry_choice_valuation_selected_power_product_successor. ff_h_b5nbscplp_entry_choice_valuation_selected_power_product_successor + S (ff_s_b5nbscplp_entry_choice_valuation_selected_power_product) = S ((S (S ff_i_b5nbscplp_entry_choice_valuation_selected_power_product)) * ff_v_b5nbscplp_entry_choice_valuation_selected_power_product)) /\ exists ff_q_b5nbscplp_entry_choice_valuation_selected_power_product_successor. ff_u_b5nbscplp_entry_choice_valuation_selected_power_product = ff_q_b5nbscplp_entry_choice_valuation_selected_power_product_successor * S ((S (S ff_i_b5nbscplp_entry_choice_valuation_selected_power_product)) * ff_v_b5nbscplp_entry_choice_valuation_selected_power_product) + (ff_s_b5nbscplp_entry_choice_valuation_selected_power_product))) /\ ff_s_b5nbscplp_entry_choice_valuation_selected_power_product = ff_r_b5nbscplp_entry_choice_valuation_selected_power_product * ff_p_b5nbscplp_entry_choice_valuation_selected_power_product)))))))) /\ (exists bpr_divides_quotient_b5nbscplp_entry_choice_valuation_selected_divides. C = (bpr_power_value_b5nbscplp_entry_choice_valuation_selected) * bpr_divides_quotient_b5nbscplp_entry_choice_valuation_selected_divides)))) /\ forall bpr_valuation_candidate_b5nbscplp_entry_choice_valuation. (exists bpr_le_gap_b5nbscplp_entry_choice_valuation_candidate_bound. bpr_le_gap_b5nbscplp_entry_choice_valuation_candidate_bound + (bpr_valuation_candidate_b5nbscplp_entry_choice_valuation) = (C)) -> (exists bpr_power_value_b5nbscplp_entry_choice_valuation_candidate. ((exists bpr_power_code_b5nbscplp_entry_choice_valuation_candidate_power bpr_power_scale_b5nbscplp_entry_choice_valuation_candidate_power. ((forall bpr_power_index_b5nbscplp_entry_choice_valuation_candidate_power. (exists bpr_gap_b5nbscplp_entry_choice_valuation_candidate_power_repeat_bound. bpr_gap_b5nbscplp_entry_choice_valuation_candidate_power_repeat_bound + S (bpr_power_index_b5nbscplp_entry_choice_valuation_candidate_power) = bpr_valuation_candidate_b5nbscplp_entry_choice_valuation) -> (((exists bpr_height_b5nbscplp_entry_choice_valuation_candidate_power_repeat_entry. bpr_height_b5nbscplp_entry_choice_valuation_candidate_power_repeat_entry + S (S (i)) = S ((S (bpr_power_index_b5nbscplp_entry_choice_valuation_candidate_power)) * bpr_power_scale_b5nbscplp_entry_choice_valuation_candidate_power)) /\ exists bpr_quotient_b5nbscplp_entry_choice_valuation_candidate_power_repeat_entry. bpr_power_code_b5nbscplp_entry_choice_valuation_candidate_power = bpr_quotient_b5nbscplp_entry_choice_valuation_candidate_power_repeat_entry * S ((S (bpr_power_index_b5nbscplp_entry_choice_valuation_candidate_power)) * bpr_power_scale_b5nbscplp_entry_choice_valuation_candidate_power) + (S (i))))) /\ (exists ff_u_b5nbscplp_entry_choice_valuation_candidate_power_product ff_v_b5nbscplp_entry_choice_valuation_candidate_power_product. ((((exists ff_h_b5nbscplp_entry_choice_valuation_candidate_power_product_start. ff_h_b5nbscplp_entry_choice_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_b5nbscplp_entry_choice_valuation_candidate_power_product)) /\ exists ff_q_b5nbscplp_entry_choice_valuation_candidate_power_product_start. ff_u_b5nbscplp_entry_choice_valuation_candidate_power_product = ff_q_b5nbscplp_entry_choice_valuation_candidate_power_product_start * S ((S (0)) * ff_v_b5nbscplp_entry_choice_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_b5nbscplp_entry_choice_valuation_candidate_power_product_terminal. ff_h_b5nbscplp_entry_choice_valuation_candidate_power_product_terminal + S (bpr_power_value_b5nbscplp_entry_choice_valuation_candidate) = S ((S (bpr_valuation_candidate_b5nbscplp_entry_choice_valuation)) * ff_v_b5nbscplp_entry_choice_valuation_candidate_power_product)) /\ exists ff_q_b5nbscplp_entry_choice_valuation_candidate_power_product_terminal. ff_u_b5nbscplp_entry_choice_valuation_candidate_power_product = ff_q_b5nbscplp_entry_choice_valuation_candidate_power_product_terminal * S ((S (bpr_valuation_candidate_b5nbscplp_entry_choice_valuation)) * ff_v_b5nbscplp_entry_choice_valuation_candidate_power_product) + (bpr_power_value_b5nbscplp_entry_choice_valuation_candidate))) /\ forall ff_i_b5nbscplp_entry_choice_valuation_candidate_power_product. (exists ff_lt_b5nbscplp_entry_choice_valuation_candidate_power_product_bound. ff_lt_b5nbscplp_entry_choice_valuation_candidate_power_product_bound + S ff_i_b5nbscplp_entry_choice_valuation_candidate_power_product = bpr_valuation_candidate_b5nbscplp_entry_choice_valuation) -> exists ff_p_b5nbscplp_entry_choice_valuation_candidate_power_product ff_r_b5nbscplp_entry_choice_valuation_candidate_power_product ff_s_b5nbscplp_entry_choice_valuation_candidate_power_product. ((((exists ff_h_b5nbscplp_entry_choice_valuation_candidate_power_product_factor. ff_h_b5nbscplp_entry_choice_valuation_candidate_power_product_factor + S (ff_p_b5nbscplp_entry_choice_valuation_candidate_power_product) = S ((S (ff_i_b5nbscplp_entry_choice_valuation_candidate_power_product)) * bpr_power_scale_b5nbscplp_entry_choice_valuation_candidate_power)) /\ exists ff_q_b5nbscplp_entry_choice_valuation_candidate_power_product_factor. bpr_power_code_b5nbscplp_entry_choice_valuation_candidate_power = ff_q_b5nbscplp_entry_choice_valuation_candidate_power_product_factor * S ((S (ff_i_b5nbscplp_entry_choice_valuation_candidate_power_product)) * bpr_power_scale_b5nbscplp_entry_choice_valuation_candidate_power) + (ff_p_b5nbscplp_entry_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_b5nbscplp_entry_choice_valuation_candidate_power_product_partial. ff_h_b5nbscplp_entry_choice_valuation_candidate_power_product_partial + S (ff_r_b5nbscplp_entry_choice_valuation_candidate_power_product) = S ((S (ff_i_b5nbscplp_entry_choice_valuation_candidate_power_product)) * ff_v_b5nbscplp_entry_choice_valuation_candidate_power_product)) /\ exists ff_q_b5nbscplp_entry_choice_valuation_candidate_power_product_partial. ff_u_b5nbscplp_entry_choice_valuation_candidate_power_product = ff_q_b5nbscplp_entry_choice_valuation_candidate_power_product_partial * S ((S (ff_i_b5nbscplp_entry_choice_valuation_candidate_power_product)) * ff_v_b5nbscplp_entry_choice_valuation_candidate_power_product) + (ff_r_b5nbscplp_entry_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_b5nbscplp_entry_choice_valuation_candidate_power_product_successor. ff_h_b5nbscplp_entry_choice_valuation_candidate_power_product_successor + S (ff_s_b5nbscplp_entry_choice_valuation_candidate_power_product) = S ((S (S ff_i_b5nbscplp_entry_choice_valuation_candidate_power_product)) * ff_v_b5nbscplp_entry_choice_valuation_candidate_power_product)) /\ exists ff_q_b5nbscplp_entry_choice_valuation_candidate_power_product_successor. ff_u_b5nbscplp_entry_choice_valuation_candidate_power_product = ff_q_b5nbscplp_entry_choice_valuation_candidate_power_product_successor * S ((S (S ff_i_b5nbscplp_entry_choice_valuation_candidate_power_product)) * ff_v_b5nbscplp_entry_choice_valuation_candidate_power_product) + (ff_s_b5nbscplp_entry_choice_valuation_candidate_power_product))) /\ ff_s_b5nbscplp_entry_choice_valuation_candidate_power_product = ff_r_b5nbscplp_entry_choice_valuation_candidate_power_product * ff_p_b5nbscplp_entry_choice_valuation_candidate_power_product)))))))) /\ (exists bpr_divides_quotient_b5nbscplp_entry_choice_valuation_candidate_divides. C = (bpr_power_value_b5nbscplp_entry_choice_valuation_candidate) * bpr_divides_quotient_b5nbscplp_entry_choice_valuation_candidate_divides))) -> (exists bpr_le_gap_b5nbscplp_entry_choice_valuation_candidate_below. bpr_le_gap_b5nbscplp_entry_choice_valuation_candidate_below + (bpr_valuation_candidate_b5nbscplp_entry_choice_valuation) = (bpr_choice_exponent_b5nbscplp_entry_choice))) /\ (exists bpr_power_code_b5nbscplp_entry_choice_power bpr_power_scale_b5nbscplp_entry_choice_power. ((forall bpr_power_index_b5nbscplp_entry_choice_power. (exists bpr_gap_b5nbscplp_entry_choice_power_repeat_bound. bpr_gap_b5nbscplp_entry_choice_power_repeat_bound + S (bpr_power_index_b5nbscplp_entry_choice_power) = bpr_choice_exponent_b5nbscplp_entry_choice) -> (((exists bpr_height_b5nbscplp_entry_choice_power_repeat_entry. bpr_height_b5nbscplp_entry_choice_power_repeat_entry + S (S (i)) = S ((S (bpr_power_index_b5nbscplp_entry_choice_power)) * bpr_power_scale_b5nbscplp_entry_choice_power)) /\ exists bpr_quotient_b5nbscplp_entry_choice_power_repeat_entry. bpr_power_code_b5nbscplp_entry_choice_power = bpr_quotient_b5nbscplp_entry_choice_power_repeat_entry * S ((S (bpr_power_index_b5nbscplp_entry_choice_power)) * bpr_power_scale_b5nbscplp_entry_choice_power) + (S (i))))) /\ (exists ff_u_b5nbscplp_entry_choice_power_product ff_v_b5nbscplp_entry_choice_power_product. ((((exists ff_h_b5nbscplp_entry_choice_power_product_start. ff_h_b5nbscplp_entry_choice_power_product_start + S (1) = S ((S (0)) * ff_v_b5nbscplp_entry_choice_power_product)) /\ exists ff_q_b5nbscplp_entry_choice_power_product_start. ff_u_b5nbscplp_entry_choice_power_product = ff_q_b5nbscplp_entry_choice_power_product_start * S ((S (0)) * ff_v_b5nbscplp_entry_choice_power_product) + (1))) /\ ((((exists ff_h_b5nbscplp_entry_choice_power_product_terminal. ff_h_b5nbscplp_entry_choice_power_product_terminal + S (p) = S ((S (bpr_choice_exponent_b5nbscplp_entry_choice)) * ff_v_b5nbscplp_entry_choice_power_product)) /\ exists ff_q_b5nbscplp_entry_choice_power_product_terminal. ff_u_b5nbscplp_entry_choice_power_product = ff_q_b5nbscplp_entry_choice_power_product_terminal * S ((S (bpr_choice_exponent_b5nbscplp_entry_choice)) * ff_v_b5nbscplp_entry_choice_power_product) + (p))) /\ forall ff_i_b5nbscplp_entry_choice_power_product. (exists ff_lt_b5nbscplp_entry_choice_power_product_bound. ff_lt_b5nbscplp_entry_choice_power_product_bound + S ff_i_b5nbscplp_entry_choice_power_product = bpr_choice_exponent_b5nbscplp_entry_choice) -> exists ff_p_b5nbscplp_entry_choice_power_product ff_r_b5nbscplp_entry_choice_power_product ff_s_b5nbscplp_entry_choice_power_product. ((((exists ff_h_b5nbscplp_entry_choice_power_product_factor. ff_h_b5nbscplp_entry_choice_power_product_factor + S (ff_p_b5nbscplp_entry_choice_power_product) = S ((S (ff_i_b5nbscplp_entry_choice_power_product)) * bpr_power_scale_b5nbscplp_entry_choice_power)) /\ exists ff_q_b5nbscplp_entry_choice_power_product_factor. bpr_power_code_b5nbscplp_entry_choice_power = ff_q_b5nbscplp_entry_choice_power_product_factor * S ((S (ff_i_b5nbscplp_entry_choice_power_product)) * bpr_power_scale_b5nbscplp_entry_choice_power) + (ff_p_b5nbscplp_entry_choice_power_product))) /\ ((((exists ff_h_b5nbscplp_entry_choice_power_product_partial. ff_h_b5nbscplp_entry_choice_power_product_partial + S (ff_r_b5nbscplp_entry_choice_power_product) = S ((S (ff_i_b5nbscplp_entry_choice_power_product)) * ff_v_b5nbscplp_entry_choice_power_product)) /\ exists ff_q_b5nbscplp_entry_choice_power_product_partial. ff_u_b5nbscplp_entry_choice_power_product = ff_q_b5nbscplp_entry_choice_power_product_partial * S ((S (ff_i_b5nbscplp_entry_choice_power_product)) * ff_v_b5nbscplp_entry_choice_power_product) + (ff_r_b5nbscplp_entry_choice_power_product))) /\ ((((exists ff_h_b5nbscplp_entry_choice_power_product_successor. ff_h_b5nbscplp_entry_choice_power_product_successor + S (ff_s_b5nbscplp_entry_choice_power_product) = S ((S (S ff_i_b5nbscplp_entry_choice_power_product)) * ff_v_b5nbscplp_entry_choice_power_product)) /\ exists ff_q_b5nbscplp_entry_choice_power_product_successor. ff_u_b5nbscplp_entry_choice_power_product = ff_q_b5nbscplp_entry_choice_power_product_successor * S ((S (S ff_i_b5nbscplp_entry_choice_power_product)) * ff_v_b5nbscplp_entry_choice_power_product) + (ff_s_b5nbscplp_entry_choice_power_product))) /\ ff_s_b5nbscplp_entry_choice_power_product = ff_r_b5nbscplp_entry_choice_power_product * ff_p_b5nbscplp_entry_choice_power_product)))))))))) \/ (~((~(S (i) = 1) /\ forall bpr_left_b5nbscplp_entry_choice_prime bpr_right_b5nbscplp_entry_choice_prime. S (i) = bpr_left_b5nbscplp_entry_choice_prime * bpr_right_b5nbscplp_entry_choice_prime -> bpr_left_b5nbscplp_entry_choice_prime = 1 \/ bpr_right_b5nbscplp_entry_choice_prime = 1)) /\ p = 1))) - 0024
apply hsource_witness_witness_left - 0025
exact hi - 0026
cases hentry - 0027
cases hentry_witness - 0028
have heq : a = x2 - 0029
specialize beta_at_unique x - 0030
specialize beta_at_unique x1 - 0031
specialize beta_at_unique i - 0032
specialize beta_at_unique a - 0033
specialize beta_at_unique x2 - 0034
apply beta_at_unique - 0035
exact hdecoded - 0036
exact hentry_witness_left - 0037
have hfactor : Le(x2,n + n)Exact native replay line
have hfactor : exists bcf_le_gap_b5nbscplp_factor. bcf_le_gap_b5nbscplp_factor + (x2) = n + n - 0038
specialize no_bertrand_small_contribution_choice_le_double n - 0039
specialize no_bertrand_small_contribution_choice_le_double s - 0040
specialize no_bertrand_small_contribution_choice_le_double q - 0041
specialize no_bertrand_small_contribution_choice_le_double r - 0042
specialize no_bertrand_small_contribution_choice_le_double C - 0043
specialize no_bertrand_small_contribution_choice_le_double i - 0044
specialize no_bertrand_small_contribution_choice_le_double x2 - 0045
apply no_bertrand_small_contribution_choice_le_double - 0046
exact hexclusion - 0047
exact hpositive - 0048
exact hfloor - 0049
exact hdivision - 0050
exact hcentral - 0051
exact hi - 0052
exact hentry_witness_right - 0053
rewrite heq - 0054
exact hfactor - 0055
specialize beta_product_uniform_le_pow x - 0056
specialize beta_product_uniform_le_pow x1 - 0057
specialize beta_product_uniform_le_pow (n + n) - 0058
specialize beta_product_uniform_le_pow s - 0059
specialize beta_product_uniform_le_pow z - 0060
specialize beta_product_uniform_le_pow A - 0061
apply beta_product_uniform_le_pow - 0062
exact huniform - 0063
exact hsource_witness_witness_right - 0064
exact hpower