BT00YM · Bertrand theorem

no_bertrand_central_prime_contribution_ranges

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

Every central prime contribution has one reviewed factor form.

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. ∀ p. ∀ v. ∀ a. (∀ x. Lt(n,x)Le(x,n + n) → ¬Prime(x)) → Prime(p)Lt(2,n)FloorSqrt(n + n,s)DivRem(n + n,3,q,r)CentralBinom(n,C)PowerValuation(p,C,v)Pow(p,v,a)Le(p,s)Le(a,n + n)Lt(s,p)Le(p,q) ∧ a = p ∨ a = 1

Every purple notation token opens its conservative definition. Expanding the displayed statement recovers the exact first-order Peano-arithmetic formula checked by the unchanged kernel.

Definitions used by this theorem

In the theorem statement

14 occurrences

In local proof propositions

none

0 occurrences

Exact expanded native-PA statement
forall n s q r C p v a. (forall bpr_prime_candidate_bnbcnvlr_exclusion. ((exists bpr_gap_bnbcnvlr_exclusion_lower. bpr_gap_bnbcnvlr_exclusion_lower + S (n) = bpr_prime_candidate_bnbcnvlr_exclusion) /\ (exists bpr_le_gap_bnbcnvlr_exclusion_upper. bpr_le_gap_bnbcnvlr_exclusion_upper + (bpr_prime_candidate_bnbcnvlr_exclusion) = (n + n))) -> ~((~(bpr_prime_candidate_bnbcnvlr_exclusion = 1) /\ forall bpr_left_bnbcnvlr_exclusion_prime bpr_right_bnbcnvlr_exclusion_prime. bpr_prime_candidate_bnbcnvlr_exclusion = bpr_left_bnbcnvlr_exclusion_prime * bpr_right_bnbcnvlr_exclusion_prime -> bpr_left_bnbcnvlr_exclusion_prime = 1 \/ bpr_right_bnbcnvlr_exclusion_prime = 1))) -> ((~(p = 1) /\ forall frm_prime_left_bnbcnvlr_prime frm_prime_right_bnbcnvlr_prime. p = frm_prime_left_bnbcnvlr_prime * frm_prime_right_bnbcnvlr_prime -> frm_prime_left_bnbcnvlr_prime = 1 \/ frm_prime_right_bnbcnvlr_prime = 1)) -> (exists bcf_lt_gap_bnbcnvlr_positive. bcf_lt_gap_bnbcnvlr_positive + S (2) = n) -> (((exists bcs_sqrt_lower_gap_bnbcnvfr_floor. bcs_sqrt_lower_gap_bnbcnvfr_floor + (s) * (s) = (n + n)) /\ exists bcs_sqrt_upper_gap_bnbcnvfr_floor. bcs_sqrt_upper_gap_bnbcnvfr_floor + S (n + n) = S (s) * S (s))) -> (((n + n) = (3) * (q) + (r) /\ (exists bcf_lt_gap_bnbcnvlr_division_bound. bcf_lt_gap_bnbcnvlr_division_bound + S (r) = 3))) -> (((exists bcf_lt_gap_bnbcnvlr_central_out_of_range. bcf_lt_gap_bnbcnvlr_central_out_of_range + S (n + n) = n) /\ C = 0) \/ ((exists bcf_le_gap_bnbcnvlr_central_in_range. bcf_le_gap_bnbcnvlr_central_in_range + (n) = n + n) /\ (exists bcf_row_code_code_bnbcnvlr_central bcf_row_code_scale_bnbcnvlr_central bcf_row_scale_code_bnbcnvlr_central bcf_row_scale_scale_bnbcnvlr_central bcf_row_code_bnbcnvlr_central bcf_row_scale_bnbcnvlr_central. ((forall bcf_row_index_bnbcnvlr_central_table. (exists bcf_lt_gap_bnbcnvlr_central_table_row_bound. bcf_lt_gap_bnbcnvlr_central_table_row_bound + S (bcf_row_index_bnbcnvlr_central_table) = S (n + n)) -> exists bcf_row_code_bnbcnvlr_central_table bcf_row_scale_bnbcnvlr_central_table. ((((exists bcf_height_bnbcnvlr_central_table_decoded_row_code. bcf_height_bnbcnvlr_central_table_decoded_row_code + S (bcf_row_code_bnbcnvlr_central_table) = S ((S (bcf_row_index_bnbcnvlr_central_table)) * bcf_row_code_scale_bnbcnvlr_central)) /\ exists bcf_quotient_bnbcnvlr_central_table_decoded_row_code. bcf_row_code_code_bnbcnvlr_central = bcf_quotient_bnbcnvlr_central_table_decoded_row_code * S ((S (bcf_row_index_bnbcnvlr_central_table)) * bcf_row_code_scale_bnbcnvlr_central) + (bcf_row_code_bnbcnvlr_central_table))) /\ ((((exists bcf_height_bnbcnvlr_central_table_decoded_row_scale. bcf_height_bnbcnvlr_central_table_decoded_row_scale + S (bcf_row_scale_bnbcnvlr_central_table) = S ((S (bcf_row_index_bnbcnvlr_central_table)) * bcf_row_scale_scale_bnbcnvlr_central)) /\ exists bcf_quotient_bnbcnvlr_central_table_decoded_row_scale. bcf_row_scale_code_bnbcnvlr_central = bcf_quotient_bnbcnvlr_central_table_decoded_row_scale * S ((S (bcf_row_index_bnbcnvlr_central_table)) * bcf_row_scale_scale_bnbcnvlr_central) + (bcf_row_scale_bnbcnvlr_central_table))) /\ ((bcf_row_index_bnbcnvlr_central_table = 0 /\ (forall bcf_index_bnbcnvlr_central_table_zero_row. (exists bcf_lt_gap_bnbcnvlr_central_table_zero_row_bound. bcf_lt_gap_bnbcnvlr_central_table_zero_row_bound + S (bcf_index_bnbcnvlr_central_table_zero_row) = S (n + n)) -> exists bcf_value_bnbcnvlr_central_table_zero_row. ((((exists bcf_height_bnbcnvlr_central_table_zero_row_entry. bcf_height_bnbcnvlr_central_table_zero_row_entry + S (bcf_value_bnbcnvlr_central_table_zero_row) = S ((S (bcf_index_bnbcnvlr_central_table_zero_row)) * bcf_row_scale_bnbcnvlr_central_table)) /\ exists bcf_quotient_bnbcnvlr_central_table_zero_row_entry. bcf_row_code_bnbcnvlr_central_table = bcf_quotient_bnbcnvlr_central_table_zero_row_entry * S ((S (bcf_index_bnbcnvlr_central_table_zero_row)) * bcf_row_scale_bnbcnvlr_central_table) + (bcf_value_bnbcnvlr_central_table_zero_row))) /\ ((bcf_index_bnbcnvlr_central_table_zero_row = 0 /\ bcf_value_bnbcnvlr_central_table_zero_row = 1) \/ exists bcf_predecessor_bnbcnvlr_central_table_zero_row. bcf_index_bnbcnvlr_central_table_zero_row = S bcf_predecessor_bnbcnvlr_central_table_zero_row /\ bcf_value_bnbcnvlr_central_table_zero_row = 0)))) \/ exists bcf_predecessor_bnbcnvlr_central_table bcf_previous_code_bnbcnvlr_central_table bcf_previous_scale_bnbcnvlr_central_table. bcf_row_index_bnbcnvlr_central_table = S bcf_predecessor_bnbcnvlr_central_table /\ ((((exists bcf_height_bnbcnvlr_central_table_decoded_previous_code. bcf_height_bnbcnvlr_central_table_decoded_previous_code + S (bcf_previous_code_bnbcnvlr_central_table) = S ((S (bcf_predecessor_bnbcnvlr_central_table)) * bcf_row_code_scale_bnbcnvlr_central)) /\ exists bcf_quotient_bnbcnvlr_central_table_decoded_previous_code. bcf_row_code_code_bnbcnvlr_central = bcf_quotient_bnbcnvlr_central_table_decoded_previous_code * S ((S (bcf_predecessor_bnbcnvlr_central_table)) * bcf_row_code_scale_bnbcnvlr_central) + (bcf_previous_code_bnbcnvlr_central_table))) /\ ((((exists bcf_height_bnbcnvlr_central_table_decoded_previous_scale. bcf_height_bnbcnvlr_central_table_decoded_previous_scale + S (bcf_previous_scale_bnbcnvlr_central_table) = S ((S (bcf_predecessor_bnbcnvlr_central_table)) * bcf_row_scale_scale_bnbcnvlr_central)) /\ exists bcf_quotient_bnbcnvlr_central_table_decoded_previous_scale. bcf_row_scale_code_bnbcnvlr_central = bcf_quotient_bnbcnvlr_central_table_decoded_previous_scale * S ((S (bcf_predecessor_bnbcnvlr_central_table)) * bcf_row_scale_scale_bnbcnvlr_central) + (bcf_previous_scale_bnbcnvlr_central_table))) /\ (forall bcf_index_bnbcnvlr_central_table_row_step. (exists bcf_lt_gap_bnbcnvlr_central_table_row_step_bound. bcf_lt_gap_bnbcnvlr_central_table_row_step_bound + S (bcf_index_bnbcnvlr_central_table_row_step) = S (n + n)) -> exists bcf_value_bnbcnvlr_central_table_row_step. ((((exists bcf_height_bnbcnvlr_central_table_row_step_entry. bcf_height_bnbcnvlr_central_table_row_step_entry + S (bcf_value_bnbcnvlr_central_table_row_step) = S ((S (bcf_index_bnbcnvlr_central_table_row_step)) * bcf_row_scale_bnbcnvlr_central_table)) /\ exists bcf_quotient_bnbcnvlr_central_table_row_step_entry. bcf_row_code_bnbcnvlr_central_table = bcf_quotient_bnbcnvlr_central_table_row_step_entry * S ((S (bcf_index_bnbcnvlr_central_table_row_step)) * bcf_row_scale_bnbcnvlr_central_table) + (bcf_value_bnbcnvlr_central_table_row_step))) /\ ((bcf_index_bnbcnvlr_central_table_row_step = 0 /\ bcf_value_bnbcnvlr_central_table_row_step = 1) \/ exists bcf_predecessor_bnbcnvlr_central_table_row_step bcf_left_bnbcnvlr_central_table_row_step bcf_right_bnbcnvlr_central_table_row_step. bcf_index_bnbcnvlr_central_table_row_step = S bcf_predecessor_bnbcnvlr_central_table_row_step /\ ((((exists bcf_height_bnbcnvlr_central_table_row_step_previous_left. bcf_height_bnbcnvlr_central_table_row_step_previous_left + S (bcf_left_bnbcnvlr_central_table_row_step) = S ((S (bcf_predecessor_bnbcnvlr_central_table_row_step)) * bcf_previous_scale_bnbcnvlr_central_table)) /\ exists bcf_quotient_bnbcnvlr_central_table_row_step_previous_left. bcf_previous_code_bnbcnvlr_central_table = bcf_quotient_bnbcnvlr_central_table_row_step_previous_left * S ((S (bcf_predecessor_bnbcnvlr_central_table_row_step)) * bcf_previous_scale_bnbcnvlr_central_table) + (bcf_left_bnbcnvlr_central_table_row_step))) /\ ((((exists bcf_height_bnbcnvlr_central_table_row_step_previous_right. bcf_height_bnbcnvlr_central_table_row_step_previous_right + S (bcf_right_bnbcnvlr_central_table_row_step) = S ((S (S (bcf_predecessor_bnbcnvlr_central_table_row_step))) * bcf_previous_scale_bnbcnvlr_central_table)) /\ exists bcf_quotient_bnbcnvlr_central_table_row_step_previous_right. bcf_previous_code_bnbcnvlr_central_table = bcf_quotient_bnbcnvlr_central_table_row_step_previous_right * S ((S (S (bcf_predecessor_bnbcnvlr_central_table_row_step))) * bcf_previous_scale_bnbcnvlr_central_table) + (bcf_right_bnbcnvlr_central_table_row_step))) /\ bcf_value_bnbcnvlr_central_table_row_step = bcf_left_bnbcnvlr_central_table_row_step + bcf_right_bnbcnvlr_central_table_row_step))))))))))) /\ ((((exists bcf_height_bnbcnvlr_central_decoded_row_code. bcf_height_bnbcnvlr_central_decoded_row_code + S (bcf_row_code_bnbcnvlr_central) = S ((S (n + n)) * bcf_row_code_scale_bnbcnvlr_central)) /\ exists bcf_quotient_bnbcnvlr_central_decoded_row_code. bcf_row_code_code_bnbcnvlr_central = bcf_quotient_bnbcnvlr_central_decoded_row_code * S ((S (n + n)) * bcf_row_code_scale_bnbcnvlr_central) + (bcf_row_code_bnbcnvlr_central))) /\ ((((exists bcf_height_bnbcnvlr_central_decoded_row_scale. bcf_height_bnbcnvlr_central_decoded_row_scale + S (bcf_row_scale_bnbcnvlr_central) = S ((S (n + n)) * bcf_row_scale_scale_bnbcnvlr_central)) /\ exists bcf_quotient_bnbcnvlr_central_decoded_row_scale. bcf_row_scale_code_bnbcnvlr_central = bcf_quotient_bnbcnvlr_central_decoded_row_scale * S ((S (n + n)) * bcf_row_scale_scale_bnbcnvlr_central) + (bcf_row_scale_bnbcnvlr_central))) /\ (((exists bcf_height_bnbcnvlr_central_decoded_value. bcf_height_bnbcnvlr_central_decoded_value + S (C) = S ((S (n)) * bcf_row_scale_bnbcnvlr_central)) /\ exists bcf_quotient_bnbcnvlr_central_decoded_value. bcf_row_code_bnbcnvlr_central = bcf_quotient_bnbcnvlr_central_decoded_value * S ((S (n)) * bcf_row_scale_bnbcnvlr_central) + (C))))))))) -> (((exists bpv_gap_bnbcnvlr_valuation_exponent_bound. bpv_gap_bnbcnvlr_valuation_exponent_bound + v = C) /\ (exists bpv_result_bnbcnvlr_valuation_selected. ((exists ff_b_bnbcnvlr_valuation_selected_power ff_c_bnbcnvlr_valuation_selected_power. ((forall ff_i_bnbcnvlr_valuation_selected_power_repeat. (exists ff_lt_bnbcnvlr_valuation_selected_power_repeat_bound. ff_lt_bnbcnvlr_valuation_selected_power_repeat_bound + S ff_i_bnbcnvlr_valuation_selected_power_repeat = v) -> (((exists ff_h_bnbcnvlr_valuation_selected_power_repeat_decoded. ff_h_bnbcnvlr_valuation_selected_power_repeat_decoded + S (p) = S ((S (ff_i_bnbcnvlr_valuation_selected_power_repeat)) * ff_c_bnbcnvlr_valuation_selected_power)) /\ exists ff_q_bnbcnvlr_valuation_selected_power_repeat_decoded. ff_b_bnbcnvlr_valuation_selected_power = ff_q_bnbcnvlr_valuation_selected_power_repeat_decoded * S ((S (ff_i_bnbcnvlr_valuation_selected_power_repeat)) * ff_c_bnbcnvlr_valuation_selected_power) + (p)))) /\ (exists ff_u_bnbcnvlr_valuation_selected_power_product ff_v_bnbcnvlr_valuation_selected_power_product. ((((exists ff_h_bnbcnvlr_valuation_selected_power_product_start. ff_h_bnbcnvlr_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_bnbcnvlr_valuation_selected_power_product)) /\ exists ff_q_bnbcnvlr_valuation_selected_power_product_start. ff_u_bnbcnvlr_valuation_selected_power_product = ff_q_bnbcnvlr_valuation_selected_power_product_start * S ((S (0)) * ff_v_bnbcnvlr_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_bnbcnvlr_valuation_selected_power_product_terminal. ff_h_bnbcnvlr_valuation_selected_power_product_terminal + S (bpv_result_bnbcnvlr_valuation_selected) = S ((S (v)) * ff_v_bnbcnvlr_valuation_selected_power_product)) /\ exists ff_q_bnbcnvlr_valuation_selected_power_product_terminal. ff_u_bnbcnvlr_valuation_selected_power_product = ff_q_bnbcnvlr_valuation_selected_power_product_terminal * S ((S (v)) * ff_v_bnbcnvlr_valuation_selected_power_product) + (bpv_result_bnbcnvlr_valuation_selected))) /\ forall ff_i_bnbcnvlr_valuation_selected_power_product. (exists ff_lt_bnbcnvlr_valuation_selected_power_product_bound. ff_lt_bnbcnvlr_valuation_selected_power_product_bound + S ff_i_bnbcnvlr_valuation_selected_power_product = v) -> exists ff_p_bnbcnvlr_valuation_selected_power_product ff_r_bnbcnvlr_valuation_selected_power_product ff_s_bnbcnvlr_valuation_selected_power_product. ((((exists ff_h_bnbcnvlr_valuation_selected_power_product_factor. ff_h_bnbcnvlr_valuation_selected_power_product_factor + S (ff_p_bnbcnvlr_valuation_selected_power_product) = S ((S (ff_i_bnbcnvlr_valuation_selected_power_product)) * ff_c_bnbcnvlr_valuation_selected_power)) /\ exists ff_q_bnbcnvlr_valuation_selected_power_product_factor. ff_b_bnbcnvlr_valuation_selected_power = ff_q_bnbcnvlr_valuation_selected_power_product_factor * S ((S (ff_i_bnbcnvlr_valuation_selected_power_product)) * ff_c_bnbcnvlr_valuation_selected_power) + (ff_p_bnbcnvlr_valuation_selected_power_product))) /\ ((((exists ff_h_bnbcnvlr_valuation_selected_power_product_partial. ff_h_bnbcnvlr_valuation_selected_power_product_partial + S (ff_r_bnbcnvlr_valuation_selected_power_product) = S ((S (ff_i_bnbcnvlr_valuation_selected_power_product)) * ff_v_bnbcnvlr_valuation_selected_power_product)) /\ exists ff_q_bnbcnvlr_valuation_selected_power_product_partial. ff_u_bnbcnvlr_valuation_selected_power_product = ff_q_bnbcnvlr_valuation_selected_power_product_partial * S ((S (ff_i_bnbcnvlr_valuation_selected_power_product)) * ff_v_bnbcnvlr_valuation_selected_power_product) + (ff_r_bnbcnvlr_valuation_selected_power_product))) /\ ((((exists ff_h_bnbcnvlr_valuation_selected_power_product_successor. ff_h_bnbcnvlr_valuation_selected_power_product_successor + S (ff_s_bnbcnvlr_valuation_selected_power_product) = S ((S (S ff_i_bnbcnvlr_valuation_selected_power_product)) * ff_v_bnbcnvlr_valuation_selected_power_product)) /\ exists ff_q_bnbcnvlr_valuation_selected_power_product_successor. ff_u_bnbcnvlr_valuation_selected_power_product = ff_q_bnbcnvlr_valuation_selected_power_product_successor * S ((S (S ff_i_bnbcnvlr_valuation_selected_power_product)) * ff_v_bnbcnvlr_valuation_selected_power_product) + (ff_s_bnbcnvlr_valuation_selected_power_product))) /\ ff_s_bnbcnvlr_valuation_selected_power_product = ff_r_bnbcnvlr_valuation_selected_power_product * ff_p_bnbcnvlr_valuation_selected_power_product)))))))) /\ (exists bpv_factor_bnbcnvlr_valuation_selected_divides. C = bpv_result_bnbcnvlr_valuation_selected * bpv_factor_bnbcnvlr_valuation_selected_divides)))) /\ forall bpv_candidate_bnbcnvlr_valuation. (exists bpv_gap_bnbcnvlr_valuation_candidate_bound. bpv_gap_bnbcnvlr_valuation_candidate_bound + bpv_candidate_bnbcnvlr_valuation = C) -> (exists bpv_result_bnbcnvlr_valuation_candidate. ((exists ff_b_bnbcnvlr_valuation_candidate_power ff_c_bnbcnvlr_valuation_candidate_power. ((forall ff_i_bnbcnvlr_valuation_candidate_power_repeat. (exists ff_lt_bnbcnvlr_valuation_candidate_power_repeat_bound. ff_lt_bnbcnvlr_valuation_candidate_power_repeat_bound + S ff_i_bnbcnvlr_valuation_candidate_power_repeat = bpv_candidate_bnbcnvlr_valuation) -> (((exists ff_h_bnbcnvlr_valuation_candidate_power_repeat_decoded. ff_h_bnbcnvlr_valuation_candidate_power_repeat_decoded + S (p) = S ((S (ff_i_bnbcnvlr_valuation_candidate_power_repeat)) * ff_c_bnbcnvlr_valuation_candidate_power)) /\ exists ff_q_bnbcnvlr_valuation_candidate_power_repeat_decoded. ff_b_bnbcnvlr_valuation_candidate_power = ff_q_bnbcnvlr_valuation_candidate_power_repeat_decoded * S ((S (ff_i_bnbcnvlr_valuation_candidate_power_repeat)) * ff_c_bnbcnvlr_valuation_candidate_power) + (p)))) /\ (exists ff_u_bnbcnvlr_valuation_candidate_power_product ff_v_bnbcnvlr_valuation_candidate_power_product. ((((exists ff_h_bnbcnvlr_valuation_candidate_power_product_start. ff_h_bnbcnvlr_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_bnbcnvlr_valuation_candidate_power_product)) /\ exists ff_q_bnbcnvlr_valuation_candidate_power_product_start. ff_u_bnbcnvlr_valuation_candidate_power_product = ff_q_bnbcnvlr_valuation_candidate_power_product_start * S ((S (0)) * ff_v_bnbcnvlr_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_bnbcnvlr_valuation_candidate_power_product_terminal. ff_h_bnbcnvlr_valuation_candidate_power_product_terminal + S (bpv_result_bnbcnvlr_valuation_candidate) = S ((S (bpv_candidate_bnbcnvlr_valuation)) * ff_v_bnbcnvlr_valuation_candidate_power_product)) /\ exists ff_q_bnbcnvlr_valuation_candidate_power_product_terminal. ff_u_bnbcnvlr_valuation_candidate_power_product = ff_q_bnbcnvlr_valuation_candidate_power_product_terminal * S ((S (bpv_candidate_bnbcnvlr_valuation)) * ff_v_bnbcnvlr_valuation_candidate_power_product) + (bpv_result_bnbcnvlr_valuation_candidate))) /\ forall ff_i_bnbcnvlr_valuation_candidate_power_product. (exists ff_lt_bnbcnvlr_valuation_candidate_power_product_bound. ff_lt_bnbcnvlr_valuation_candidate_power_product_bound + S ff_i_bnbcnvlr_valuation_candidate_power_product = bpv_candidate_bnbcnvlr_valuation) -> exists ff_p_bnbcnvlr_valuation_candidate_power_product ff_r_bnbcnvlr_valuation_candidate_power_product ff_s_bnbcnvlr_valuation_candidate_power_product. ((((exists ff_h_bnbcnvlr_valuation_candidate_power_product_factor. ff_h_bnbcnvlr_valuation_candidate_power_product_factor + S (ff_p_bnbcnvlr_valuation_candidate_power_product) = S ((S (ff_i_bnbcnvlr_valuation_candidate_power_product)) * ff_c_bnbcnvlr_valuation_candidate_power)) /\ exists ff_q_bnbcnvlr_valuation_candidate_power_product_factor. ff_b_bnbcnvlr_valuation_candidate_power = ff_q_bnbcnvlr_valuation_candidate_power_product_factor * S ((S (ff_i_bnbcnvlr_valuation_candidate_power_product)) * ff_c_bnbcnvlr_valuation_candidate_power) + (ff_p_bnbcnvlr_valuation_candidate_power_product))) /\ ((((exists ff_h_bnbcnvlr_valuation_candidate_power_product_partial. ff_h_bnbcnvlr_valuation_candidate_power_product_partial + S (ff_r_bnbcnvlr_valuation_candidate_power_product) = S ((S (ff_i_bnbcnvlr_valuation_candidate_power_product)) * ff_v_bnbcnvlr_valuation_candidate_power_product)) /\ exists ff_q_bnbcnvlr_valuation_candidate_power_product_partial. ff_u_bnbcnvlr_valuation_candidate_power_product = ff_q_bnbcnvlr_valuation_candidate_power_product_partial * S ((S (ff_i_bnbcnvlr_valuation_candidate_power_product)) * ff_v_bnbcnvlr_valuation_candidate_power_product) + (ff_r_bnbcnvlr_valuation_candidate_power_product))) /\ ((((exists ff_h_bnbcnvlr_valuation_candidate_power_product_successor. ff_h_bnbcnvlr_valuation_candidate_power_product_successor + S (ff_s_bnbcnvlr_valuation_candidate_power_product) = S ((S (S ff_i_bnbcnvlr_valuation_candidate_power_product)) * ff_v_bnbcnvlr_valuation_candidate_power_product)) /\ exists ff_q_bnbcnvlr_valuation_candidate_power_product_successor. ff_u_bnbcnvlr_valuation_candidate_power_product = ff_q_bnbcnvlr_valuation_candidate_power_product_successor * S ((S (S ff_i_bnbcnvlr_valuation_candidate_power_product)) * ff_v_bnbcnvlr_valuation_candidate_power_product) + (ff_s_bnbcnvlr_valuation_candidate_power_product))) /\ ff_s_bnbcnvlr_valuation_candidate_power_product = ff_r_bnbcnvlr_valuation_candidate_power_product * ff_p_bnbcnvlr_valuation_candidate_power_product)))))))) /\ (exists bpv_factor_bnbcnvlr_valuation_candidate_divides. C = bpv_result_bnbcnvlr_valuation_candidate * bpv_factor_bnbcnvlr_valuation_candidate_divides))) -> (exists bpv_gap_bnbcnvlr_valuation_maximal. bpv_gap_bnbcnvlr_valuation_maximal + bpv_candidate_bnbcnvlr_valuation = v)) -> (exists bpvi_b_bnbcncfr_power bpvi_c_bnbcncfr_power. ((forall bpvi_i_bnbcncfr_power. (exists bpvi_repeat_gap_bnbcncfr_power. bpvi_repeat_gap_bnbcncfr_power + S bpvi_i_bnbcncfr_power = v) -> (((exists bpvi_h_bnbcncfr_power_repeat. bpvi_h_bnbcncfr_power_repeat + S (p) = S ((S (bpvi_i_bnbcncfr_power)) * bpvi_c_bnbcncfr_power)) /\ exists bpvi_q_bnbcncfr_power_repeat. bpvi_b_bnbcncfr_power = bpvi_q_bnbcncfr_power_repeat * S ((S (bpvi_i_bnbcncfr_power)) * bpvi_c_bnbcncfr_power) + (p)))) /\ (exists bpvi_u_bnbcncfr_power bpvi_v_bnbcncfr_power. ((((exists bpvi_h_bnbcncfr_power_start. bpvi_h_bnbcncfr_power_start + S (1) = S ((S (0)) * bpvi_v_bnbcncfr_power)) /\ exists bpvi_q_bnbcncfr_power_start. bpvi_u_bnbcncfr_power = bpvi_q_bnbcncfr_power_start * S ((S (0)) * bpvi_v_bnbcncfr_power) + (1))) /\ ((((exists bpvi_h_bnbcncfr_power_terminal. bpvi_h_bnbcncfr_power_terminal + S (a) = S ((S (v)) * bpvi_v_bnbcncfr_power)) /\ exists bpvi_q_bnbcncfr_power_terminal. bpvi_u_bnbcncfr_power = bpvi_q_bnbcncfr_power_terminal * S ((S (v)) * bpvi_v_bnbcncfr_power) + (a))) /\ forall bpvi_j_bnbcncfr_power. (exists bpvi_product_gap_bnbcncfr_power. bpvi_product_gap_bnbcncfr_power + S bpvi_j_bnbcncfr_power = v) -> exists bpvi_factor_bnbcncfr_power bpvi_partial_bnbcncfr_power bpvi_successor_bnbcncfr_power. ((((exists bpvi_h_bnbcncfr_power_factor. bpvi_h_bnbcncfr_power_factor + S (bpvi_factor_bnbcncfr_power) = S ((S (bpvi_j_bnbcncfr_power)) * bpvi_c_bnbcncfr_power)) /\ exists bpvi_q_bnbcncfr_power_factor. bpvi_b_bnbcncfr_power = bpvi_q_bnbcncfr_power_factor * S ((S (bpvi_j_bnbcncfr_power)) * bpvi_c_bnbcncfr_power) + (bpvi_factor_bnbcncfr_power))) /\ ((((exists bpvi_h_bnbcncfr_power_partial. bpvi_h_bnbcncfr_power_partial + S (bpvi_partial_bnbcncfr_power) = S ((S (bpvi_j_bnbcncfr_power)) * bpvi_v_bnbcncfr_power)) /\ exists bpvi_q_bnbcncfr_power_partial. bpvi_u_bnbcncfr_power = bpvi_q_bnbcncfr_power_partial * S ((S (bpvi_j_bnbcncfr_power)) * bpvi_v_bnbcncfr_power) + (bpvi_partial_bnbcncfr_power))) /\ ((((exists bpvi_h_bnbcncfr_power_successor. bpvi_h_bnbcncfr_power_successor + S (bpvi_successor_bnbcncfr_power) = S ((S (S bpvi_j_bnbcncfr_power)) * bpvi_v_bnbcncfr_power)) /\ exists bpvi_q_bnbcncfr_power_successor. bpvi_u_bnbcncfr_power = bpvi_q_bnbcncfr_power_successor * S ((S (S bpvi_j_bnbcncfr_power)) * bpvi_v_bnbcncfr_power) + (bpvi_successor_bnbcncfr_power))) /\ bpvi_successor_bnbcncfr_power = bpvi_partial_bnbcncfr_power * bpvi_factor_bnbcncfr_power)))))))) -> (((((exists bcf_le_gap_bnbcnvlr_small. bcf_le_gap_bnbcnvlr_small + (p) = s) /\ (exists bcf_le_gap_bnbcncfr_bound. bcf_le_gap_bnbcncfr_bound + (a) = n + n)) \/ (((exists bcf_lt_gap_bnbcnvlr_above_small. bcf_lt_gap_bnbcnvlr_above_small + S (s) = p) /\ (exists bcf_le_gap_bnbcnvlr_middle. bcf_le_gap_bnbcnvlr_middle + (p) = q)) /\ a = p)) \/ a = 1))

Proof neighborhood

Direct theorem prerequisites

Direct theorem dependents

Definition-aware tactic body

Only local propositions introduced by have or suffices are compacted. Every changed line has an exact-AST conservative-expansion receipt; the kernel still receives the immutable original tactic script.

Read the argument

Proof checkpoints

47 script commands · 8 reading checkpoints · 1 local claims

This is a reading aid, not a new proof or a proof-tree certificate. Checkpoint groups are consecutive commands, not inferred branch boundaries. Every step links to the preserved script.

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

Named ingredients (3)
01Fix variables and assumptionsL1–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 p
  7. L7
    intro v
  8. L8
    intro a
  9. L9
    intro hexclusion
  10. L10
    intro hp
02Fix variables and assumptionsL11–16

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

  1. L11
    intro hpositive
  2. L12
    intro hfloor
  3. L13
    intro hdivision
  4. L14
    intro hcentral
  5. L15
    intro hvaluation
  6. L16
    intro hpower
03Establish hzeroL17–20

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

  1. L17
    have hzero : v = 0 \/ ~(v = 0)
  2. L18
    specialize eq_decidable v
  3. L19
    specialize eq_decidable 0
  4. L20
    exact eq_decidable
04Separate the logical casesL21–22

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

  1. L21
    cases hzero
  2. L22
    right
05Use earlier factsL23–28

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

  1. L23
    specialize pow_zero p
  2. L24
    specialize pow_zero v
  3. L25
    specialize pow_zero a
  4. L26
    apply pow_zero
  5. L27
    exact hzero_left
  6. L28
    exact hpower
06Separate the logical casesL29–29

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

  1. L29
    left
07Use earlier factsL30–39

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

  1. L30
    specialize no_bertrand_central_nonzero_contribution_factor_ranges n
  2. L31
    specialize no_bertrand_central_nonzero_contribution_factor_ranges s
  3. L32
    specialize no_bertrand_central_nonzero_contribution_factor_ranges q
  4. L33
    specialize no_bertrand_central_nonzero_contribution_factor_ranges r
  5. L34
    specialize no_bertrand_central_nonzero_contribution_factor_ranges C
  6. L35
    specialize no_bertrand_central_nonzero_contribution_factor_ranges p
  7. L36
    specialize no_bertrand_central_nonzero_contribution_factor_ranges v
  8. L37
    specialize no_bertrand_central_nonzero_contribution_factor_ranges a
  9. L38
    apply no_bertrand_central_nonzero_contribution_factor_ranges
  10. L39
    exact hexclusion
08Use earlier factsL40–47

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

  1. L40
    exact hp
  2. L41
    exact hpositive
  3. L42
    exact hfloor
  4. L43
    exact hdivision
  5. L44
    exact hcentral
  6. L45
    exact hvaluation
  7. L46
    exact hpower
  8. L47
    exact hzero_right

Library-wide reading audit

Original defined command ledger · 47 lines
  1. 0001intro n
  2. 0002intro s
  3. 0003intro q
  4. 0004intro r
  5. 0005intro C
  6. 0006intro p
  7. 0007intro v
  8. 0008intro a
  9. 0009intro hexclusion
  10. 0010intro hp
  11. 0011intro hpositive
  12. 0012intro hfloor
  13. 0013intro hdivision
  14. 0014intro hcentral
  15. 0015intro hvaluation
  16. 0016intro hpower
  17. 0017have hzero : v = 0 \/ ~(v = 0)
  18. 0018specialize eq_decidable v
  19. 0019specialize eq_decidable 0
  20. 0020exact eq_decidable
  21. 0021cases hzero
  22. 0022right
  23. 0023specialize pow_zero p
  24. 0024specialize pow_zero v
  25. 0025specialize pow_zero a
  26. 0026apply pow_zero
  27. 0027exact hzero_left
  28. 0028exact hpower
  29. 0029left
  30. 0030specialize no_bertrand_central_nonzero_contribution_factor_ranges n
  31. 0031specialize no_bertrand_central_nonzero_contribution_factor_ranges s
  32. 0032specialize no_bertrand_central_nonzero_contribution_factor_ranges q
  33. 0033specialize no_bertrand_central_nonzero_contribution_factor_ranges r
  34. 0034specialize no_bertrand_central_nonzero_contribution_factor_ranges C
  35. 0035specialize no_bertrand_central_nonzero_contribution_factor_ranges p
  36. 0036specialize no_bertrand_central_nonzero_contribution_factor_ranges v
  37. 0037specialize no_bertrand_central_nonzero_contribution_factor_ranges a
  38. 0038apply no_bertrand_central_nonzero_contribution_factor_ranges
  39. 0039exact hexclusion
  40. 0040exact hp
  41. 0041exact hpositive
  42. 0042exact hfloor
  43. 0043exact hdivision
  44. 0044exact hcentral
  45. 0045exact hvaluation
  46. 0046exact hpower
  47. 0047exact hzero_right