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) → ¬v = 0 → Le(p,s) ∧ Le(a,n + n) ∨ Lt(s,p) ∧ Le(p,q) ∧ a = pEvery 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 PD0020 Pow PD0042 CentralBinom PD0046 PowerValuation PD0051 FloorSqrt14 occurrences
In local proof propositions
6 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)))))))) -> ~(v = 0) -> (((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))Proof neighborhood
Direct theorem prerequisites
BT00YK no_bertrand_central_nonzero_valuation_factor_ranges BT0019 lt_to_le BT000F le_trans BT00Y5 central_binom_prime_power_contribution_le_double BT0094 pow_oneDirect 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 (5)
01Fix variables and assumptionsL1–10
02Fix variables and assumptionsL11–17
03Establish hrangesL18–27
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply no bertrand central nonzero valuation factor ranges.
- L18
have hranges : Le(p,s) ∨ Lt(s,p) ∧ Le(p,q) ∧ v = 1Definitions: Le(p,s)Lt(s,p)Le(p,q)Original native command in the exact edition - L19
specialize no_bertrand_central_nonzero_valuation_factor_ranges n - L20
specialize no_bertrand_central_nonzero_valuation_factor_ranges s - L21
specialize no_bertrand_central_nonzero_valuation_factor_ranges q - L22
specialize no_bertrand_central_nonzero_valuation_factor_ranges r - L23
specialize no_bertrand_central_nonzero_valuation_factor_ranges C - L24
specialize no_bertrand_central_nonzero_valuation_factor_ranges p - L25
specialize no_bertrand_central_nonzero_valuation_factor_ranges v - L26
apply no_bertrand_central_nonzero_valuation_factor_ranges - L27
exact hexclusion
04Use earlier factsL28–34
05Separate the logical casesL35–37
06Use earlier factsL38–38
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L38
exact hranges_left
07Establish htwo_leL39–43
08Establish hone_twoL44–44
Establish this local claim before using it. It is not an additional assumption.
09Construct an explicit witnessL45–45
Supply the displayed value, then prove that it has the required property.
- L45
exists 1
10Calculate and transport equalitiesL46–46
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L46
norm_num
11Establish hone_leL47–56
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply le trans.
- L47
- L48
specialize le_trans 1 - L49
specialize le_trans 2 - L50
specialize le_trans n - L51
apply le_trans - L52
exact hone_two - L53
exact htwo_le - L54
specialize central_binom_prime_power_contribution_le_double p - L55
specialize central_binom_prime_power_contribution_le_double n - L56
specialize central_binom_prime_power_contribution_le_double C
12Use earlier factsL57–64
Instantiate or apply named facts and discharge the corresponding proof obligations.
13Separate the logical casesL65–67
Original defined command ledger · 74 lines
- 0001
intro n - 0002
intro s - 0003
intro q - 0004
intro r - 0005
intro C - 0006
intro p - 0007
intro v - 0008
intro a - 0009
intro hexclusion - 0010
intro hp - 0011
intro hpositive - 0012
intro hfloor - 0013
intro hdivision - 0014
intro hcentral - 0015
intro hvaluation - 0016
intro hpower - 0017
intro hnonzero - 0018
have hranges : Le(p,s) ∨ Lt(s,p) ∧ Le(p,q) ∧ v = 1Exact native replay line
have hranges : (exists bcf_le_gap_bnbcnvlr_small. bcf_le_gap_bnbcnvlr_small + (p) = s) \/ (((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)) /\ v = 1) - 0019
specialize no_bertrand_central_nonzero_valuation_factor_ranges n - 0020
specialize no_bertrand_central_nonzero_valuation_factor_ranges s - 0021
specialize no_bertrand_central_nonzero_valuation_factor_ranges q - 0022
specialize no_bertrand_central_nonzero_valuation_factor_ranges r - 0023
specialize no_bertrand_central_nonzero_valuation_factor_ranges C - 0024
specialize no_bertrand_central_nonzero_valuation_factor_ranges p - 0025
specialize no_bertrand_central_nonzero_valuation_factor_ranges v - 0026
apply no_bertrand_central_nonzero_valuation_factor_ranges - 0027
exact hexclusion - 0028
exact hp - 0029
exact hpositive - 0030
exact hfloor - 0031
exact hdivision - 0032
exact hcentral - 0033
exact hvaluation - 0034
exact hnonzero - 0035
cases hranges - 0036
left - 0037
split - 0038
exact hranges_left - 0039
have htwo_le : Lt(1,n)Exact native replay line
have htwo_le : exists bcf_le_gap_bnbcncfr_two_le. bcf_le_gap_bnbcncfr_two_le + (2) = n - 0040
specialize lt_to_le 2 - 0041
specialize lt_to_le n - 0042
apply lt_to_le - 0043
exact hpositive - 0044
have hone_two : Lt(0,2)Exact native replay line
have hone_two : exists bcf_le_gap_bnbcncfr_one_two. bcf_le_gap_bnbcncfr_one_two + (1) = 2 - 0045
exists 1 - 0046
norm_num - 0047
have hone_le : Lt(0,n)Exact native replay line
have hone_le : exists bcf_le_gap_bnbcncfr_one_le. bcf_le_gap_bnbcncfr_one_le + (1) = n - 0048
specialize le_trans 1 - 0049
specialize le_trans 2 - 0050
specialize le_trans n - 0051
apply le_trans - 0052
exact hone_two - 0053
exact htwo_le - 0054
specialize central_binom_prime_power_contribution_le_double p - 0055
specialize central_binom_prime_power_contribution_le_double n - 0056
specialize central_binom_prime_power_contribution_le_double C - 0057
specialize central_binom_prime_power_contribution_le_double v - 0058
specialize central_binom_prime_power_contribution_le_double a - 0059
apply central_binom_prime_power_contribution_le_double - 0060
exact hp - 0061
exact hone_le - 0062
exact hcentral - 0063
exact hvaluation - 0064
exact hpower - 0065
cases hranges_right - 0066
right - 0067
split - 0068
exact hranges_right_left - 0069
specialize pow_one p - 0070
specialize pow_one v - 0071
specialize pow_one a - 0072
apply pow_one - 0073
exact hranges_right_right - 0074
exact hpower