BT00Y6

central_binom_prime_square_tail_exponent_not_two_le

Alpha body-checked ยท checked-use disabled

A prime square above twice n rules out valuation exponent two.

Exact expanded PA statement

forall p n C v s. ((~(p = 1) /\ forall frm_prime_left_bcpsten_prime frm_prime_right_bcpsten_prime. p = frm_prime_left_bcpsten_prime * frm_prime_right_bcpsten_prime -> frm_prime_left_bcpsten_prime = 1 \/ frm_prime_right_bcpsten_prime = 1)) -> (exists bcf_le_gap_bcpsten_positive. bcf_le_gap_bcpsten_positive + (1) = n) -> (((exists bcf_lt_gap_bcpsten_central_out_of_range. bcf_lt_gap_bcpsten_central_out_of_range + S (n + n) = n) /\ C = 0) \/ ((exists bcf_le_gap_bcpsten_central_in_range. bcf_le_gap_bcpsten_central_in_range + (n) = n + n) /\ (exists bcf_row_code_code_bcpsten_central bcf_row_code_scale_bcpsten_central bcf_row_scale_code_bcpsten_central bcf_row_scale_scale_bcpsten_central bcf_row_code_bcpsten_central bcf_row_scale_bcpsten_central. ((forall bcf_row_index_bcpsten_central_table. (exists bcf_lt_gap_bcpsten_central_table_row_bound. bcf_lt_gap_bcpsten_central_table_row_bound + S (bcf_row_index_bcpsten_central_table) = S (n + n)) -> exists bcf_row_code_bcpsten_central_table bcf_row_scale_bcpsten_central_table. ((((exists bcf_height_bcpsten_central_table_decoded_row_code. bcf_height_bcpsten_central_table_decoded_row_code + S (bcf_row_code_bcpsten_central_table) = S ((S (bcf_row_index_bcpsten_central_table)) * bcf_row_code_scale_bcpsten_central)) /\ exists bcf_quotient_bcpsten_central_table_decoded_row_code. bcf_row_code_code_bcpsten_central = bcf_quotient_bcpsten_central_table_decoded_row_code * S ((S (bcf_row_index_bcpsten_central_table)) * bcf_row_code_scale_bcpsten_central) + (bcf_row_code_bcpsten_central_table))) /\ ((((exists bcf_height_bcpsten_central_table_decoded_row_scale. bcf_height_bcpsten_central_table_decoded_row_scale + S (bcf_row_scale_bcpsten_central_table) = S ((S (bcf_row_index_bcpsten_central_table)) * bcf_row_scale_scale_bcpsten_central)) /\ exists bcf_quotient_bcpsten_central_table_decoded_row_scale. bcf_row_scale_code_bcpsten_central = bcf_quotient_bcpsten_central_table_decoded_row_scale * S ((S (bcf_row_index_bcpsten_central_table)) * bcf_row_scale_scale_bcpsten_central) + (bcf_row_scale_bcpsten_central_table))) /\ ((bcf_row_index_bcpsten_central_table = 0 /\ (forall bcf_index_bcpsten_central_table_zero_row. (exists bcf_lt_gap_bcpsten_central_table_zero_row_bound. bcf_lt_gap_bcpsten_central_table_zero_row_bound + S (bcf_index_bcpsten_central_table_zero_row) = S (n + n)) -> exists bcf_value_bcpsten_central_table_zero_row. ((((exists bcf_height_bcpsten_central_table_zero_row_entry. bcf_height_bcpsten_central_table_zero_row_entry + S (bcf_value_bcpsten_central_table_zero_row) = S ((S (bcf_index_bcpsten_central_table_zero_row)) * bcf_row_scale_bcpsten_central_table)) /\ exists bcf_quotient_bcpsten_central_table_zero_row_entry. bcf_row_code_bcpsten_central_table = bcf_quotient_bcpsten_central_table_zero_row_entry * S ((S (bcf_index_bcpsten_central_table_zero_row)) * bcf_row_scale_bcpsten_central_table) + (bcf_value_bcpsten_central_table_zero_row))) /\ ((bcf_index_bcpsten_central_table_zero_row = 0 /\ bcf_value_bcpsten_central_table_zero_row = 1) \/ exists bcf_predecessor_bcpsten_central_table_zero_row. bcf_index_bcpsten_central_table_zero_row = S bcf_predecessor_bcpsten_central_table_zero_row /\ bcf_value_bcpsten_central_table_zero_row = 0)))) \/ exists bcf_predecessor_bcpsten_central_table bcf_previous_code_bcpsten_central_table bcf_previous_scale_bcpsten_central_table. bcf_row_index_bcpsten_central_table = S bcf_predecessor_bcpsten_central_table /\ ((((exists bcf_height_bcpsten_central_table_decoded_previous_code. bcf_height_bcpsten_central_table_decoded_previous_code + S (bcf_previous_code_bcpsten_central_table) = S ((S (bcf_predecessor_bcpsten_central_table)) * bcf_row_code_scale_bcpsten_central)) /\ exists bcf_quotient_bcpsten_central_table_decoded_previous_code. bcf_row_code_code_bcpsten_central = bcf_quotient_bcpsten_central_table_decoded_previous_code * S ((S (bcf_predecessor_bcpsten_central_table)) * bcf_row_code_scale_bcpsten_central) + (bcf_previous_code_bcpsten_central_table))) /\ ((((exists bcf_height_bcpsten_central_table_decoded_previous_scale. bcf_height_bcpsten_central_table_decoded_previous_scale + S (bcf_previous_scale_bcpsten_central_table) = S ((S (bcf_predecessor_bcpsten_central_table)) * bcf_row_scale_scale_bcpsten_central)) /\ exists bcf_quotient_bcpsten_central_table_decoded_previous_scale. bcf_row_scale_code_bcpsten_central = bcf_quotient_bcpsten_central_table_decoded_previous_scale * S ((S (bcf_predecessor_bcpsten_central_table)) * bcf_row_scale_scale_bcpsten_central) + (bcf_previous_scale_bcpsten_central_table))) /\ (forall bcf_index_bcpsten_central_table_row_step. (exists bcf_lt_gap_bcpsten_central_table_row_step_bound. bcf_lt_gap_bcpsten_central_table_row_step_bound + S (bcf_index_bcpsten_central_table_row_step) = S (n + n)) -> exists bcf_value_bcpsten_central_table_row_step. ((((exists bcf_height_bcpsten_central_table_row_step_entry. bcf_height_bcpsten_central_table_row_step_entry + S (bcf_value_bcpsten_central_table_row_step) = S ((S (bcf_index_bcpsten_central_table_row_step)) * bcf_row_scale_bcpsten_central_table)) /\ exists bcf_quotient_bcpsten_central_table_row_step_entry. bcf_row_code_bcpsten_central_table = bcf_quotient_bcpsten_central_table_row_step_entry * S ((S (bcf_index_bcpsten_central_table_row_step)) * bcf_row_scale_bcpsten_central_table) + (bcf_value_bcpsten_central_table_row_step))) /\ ((bcf_index_bcpsten_central_table_row_step = 0 /\ bcf_value_bcpsten_central_table_row_step = 1) \/ exists bcf_predecessor_bcpsten_central_table_row_step bcf_left_bcpsten_central_table_row_step bcf_right_bcpsten_central_table_row_step. bcf_index_bcpsten_central_table_row_step = S bcf_predecessor_bcpsten_central_table_row_step /\ ((((exists bcf_height_bcpsten_central_table_row_step_previous_left. bcf_height_bcpsten_central_table_row_step_previous_left + S (bcf_left_bcpsten_central_table_row_step) = S ((S (bcf_predecessor_bcpsten_central_table_row_step)) * bcf_previous_scale_bcpsten_central_table)) /\ exists bcf_quotient_bcpsten_central_table_row_step_previous_left. bcf_previous_code_bcpsten_central_table = bcf_quotient_bcpsten_central_table_row_step_previous_left * S ((S (bcf_predecessor_bcpsten_central_table_row_step)) * bcf_previous_scale_bcpsten_central_table) + (bcf_left_bcpsten_central_table_row_step))) /\ ((((exists bcf_height_bcpsten_central_table_row_step_previous_right. bcf_height_bcpsten_central_table_row_step_previous_right + S (bcf_right_bcpsten_central_table_row_step) = S ((S (S (bcf_predecessor_bcpsten_central_table_row_step))) * bcf_previous_scale_bcpsten_central_table)) /\ exists bcf_quotient_bcpsten_central_table_row_step_previous_right. bcf_previous_code_bcpsten_central_table = bcf_quotient_bcpsten_central_table_row_step_previous_right * S ((S (S (bcf_predecessor_bcpsten_central_table_row_step))) * bcf_previous_scale_bcpsten_central_table) + (bcf_right_bcpsten_central_table_row_step))) /\ bcf_value_bcpsten_central_table_row_step = bcf_left_bcpsten_central_table_row_step + bcf_right_bcpsten_central_table_row_step))))))))))) /\ ((((exists bcf_height_bcpsten_central_decoded_row_code. bcf_height_bcpsten_central_decoded_row_code + S (bcf_row_code_bcpsten_central) = S ((S (n + n)) * bcf_row_code_scale_bcpsten_central)) /\ exists bcf_quotient_bcpsten_central_decoded_row_code. bcf_row_code_code_bcpsten_central = bcf_quotient_bcpsten_central_decoded_row_code * S ((S (n + n)) * bcf_row_code_scale_bcpsten_central) + (bcf_row_code_bcpsten_central))) /\ ((((exists bcf_height_bcpsten_central_decoded_row_scale. bcf_height_bcpsten_central_decoded_row_scale + S (bcf_row_scale_bcpsten_central) = S ((S (n + n)) * bcf_row_scale_scale_bcpsten_central)) /\ exists bcf_quotient_bcpsten_central_decoded_row_scale. bcf_row_scale_code_bcpsten_central = bcf_quotient_bcpsten_central_decoded_row_scale * S ((S (n + n)) * bcf_row_scale_scale_bcpsten_central) + (bcf_row_scale_bcpsten_central))) /\ (((exists bcf_height_bcpsten_central_decoded_value. bcf_height_bcpsten_central_decoded_value + S (C) = S ((S (n)) * bcf_row_scale_bcpsten_central)) /\ exists bcf_quotient_bcpsten_central_decoded_value. bcf_row_code_bcpsten_central = bcf_quotient_bcpsten_central_decoded_value * S ((S (n)) * bcf_row_scale_bcpsten_central) + (C))))))))) -> (((exists bpv_gap_bcpsten_valuation_exponent_bound. bpv_gap_bcpsten_valuation_exponent_bound + v = C) /\ (exists bpv_result_bcpsten_valuation_selected. ((exists ff_b_bcpsten_valuation_selected_power ff_c_bcpsten_valuation_selected_power. ((forall ff_i_bcpsten_valuation_selected_power_repeat. (exists ff_lt_bcpsten_valuation_selected_power_repeat_bound. ff_lt_bcpsten_valuation_selected_power_repeat_bound + S ff_i_bcpsten_valuation_selected_power_repeat = v) -> (((exists ff_h_bcpsten_valuation_selected_power_repeat_decoded. ff_h_bcpsten_valuation_selected_power_repeat_decoded + S (p) = S ((S (ff_i_bcpsten_valuation_selected_power_repeat)) * ff_c_bcpsten_valuation_selected_power)) /\ exists ff_q_bcpsten_valuation_selected_power_repeat_decoded. ff_b_bcpsten_valuation_selected_power = ff_q_bcpsten_valuation_selected_power_repeat_decoded * S ((S (ff_i_bcpsten_valuation_selected_power_repeat)) * ff_c_bcpsten_valuation_selected_power) + (p)))) /\ (exists ff_u_bcpsten_valuation_selected_power_product ff_v_bcpsten_valuation_selected_power_product. ((((exists ff_h_bcpsten_valuation_selected_power_product_start. ff_h_bcpsten_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_bcpsten_valuation_selected_power_product)) /\ exists ff_q_bcpsten_valuation_selected_power_product_start. ff_u_bcpsten_valuation_selected_power_product = ff_q_bcpsten_valuation_selected_power_product_start * S ((S (0)) * ff_v_bcpsten_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_bcpsten_valuation_selected_power_product_terminal. ff_h_bcpsten_valuation_selected_power_product_terminal + S (bpv_result_bcpsten_valuation_selected) = S ((S (v)) * ff_v_bcpsten_valuation_selected_power_product)) /\ exists ff_q_bcpsten_valuation_selected_power_product_terminal. ff_u_bcpsten_valuation_selected_power_product = ff_q_bcpsten_valuation_selected_power_product_terminal * S ((S (v)) * ff_v_bcpsten_valuation_selected_power_product) + (bpv_result_bcpsten_valuation_selected))) /\ forall ff_i_bcpsten_valuation_selected_power_product. (exists ff_lt_bcpsten_valuation_selected_power_product_bound. ff_lt_bcpsten_valuation_selected_power_product_bound + S ff_i_bcpsten_valuation_selected_power_product = v) -> exists ff_p_bcpsten_valuation_selected_power_product ff_r_bcpsten_valuation_selected_power_product ff_s_bcpsten_valuation_selected_power_product. ((((exists ff_h_bcpsten_valuation_selected_power_product_factor. ff_h_bcpsten_valuation_selected_power_product_factor + S (ff_p_bcpsten_valuation_selected_power_product) = S ((S (ff_i_bcpsten_valuation_selected_power_product)) * ff_c_bcpsten_valuation_selected_power)) /\ exists ff_q_bcpsten_valuation_selected_power_product_factor. ff_b_bcpsten_valuation_selected_power = ff_q_bcpsten_valuation_selected_power_product_factor * S ((S (ff_i_bcpsten_valuation_selected_power_product)) * ff_c_bcpsten_valuation_selected_power) + (ff_p_bcpsten_valuation_selected_power_product))) /\ ((((exists ff_h_bcpsten_valuation_selected_power_product_partial. ff_h_bcpsten_valuation_selected_power_product_partial + S (ff_r_bcpsten_valuation_selected_power_product) = S ((S (ff_i_bcpsten_valuation_selected_power_product)) * ff_v_bcpsten_valuation_selected_power_product)) /\ exists ff_q_bcpsten_valuation_selected_power_product_partial. ff_u_bcpsten_valuation_selected_power_product = ff_q_bcpsten_valuation_selected_power_product_partial * S ((S (ff_i_bcpsten_valuation_selected_power_product)) * ff_v_bcpsten_valuation_selected_power_product) + (ff_r_bcpsten_valuation_selected_power_product))) /\ ((((exists ff_h_bcpsten_valuation_selected_power_product_successor. ff_h_bcpsten_valuation_selected_power_product_successor + S (ff_s_bcpsten_valuation_selected_power_product) = S ((S (S ff_i_bcpsten_valuation_selected_power_product)) * ff_v_bcpsten_valuation_selected_power_product)) /\ exists ff_q_bcpsten_valuation_selected_power_product_successor. ff_u_bcpsten_valuation_selected_power_product = ff_q_bcpsten_valuation_selected_power_product_successor * S ((S (S ff_i_bcpsten_valuation_selected_power_product)) * ff_v_bcpsten_valuation_selected_power_product) + (ff_s_bcpsten_valuation_selected_power_product))) /\ ff_s_bcpsten_valuation_selected_power_product = ff_r_bcpsten_valuation_selected_power_product * ff_p_bcpsten_valuation_selected_power_product)))))))) /\ (exists bpv_factor_bcpsten_valuation_selected_divides. C = bpv_result_bcpsten_valuation_selected * bpv_factor_bcpsten_valuation_selected_divides)))) /\ forall bpv_candidate_bcpsten_valuation. (exists bpv_gap_bcpsten_valuation_candidate_bound. bpv_gap_bcpsten_valuation_candidate_bound + bpv_candidate_bcpsten_valuation = C) -> (exists bpv_result_bcpsten_valuation_candidate. ((exists ff_b_bcpsten_valuation_candidate_power ff_c_bcpsten_valuation_candidate_power. ((forall ff_i_bcpsten_valuation_candidate_power_repeat. (exists ff_lt_bcpsten_valuation_candidate_power_repeat_bound. ff_lt_bcpsten_valuation_candidate_power_repeat_bound + S ff_i_bcpsten_valuation_candidate_power_repeat = bpv_candidate_bcpsten_valuation) -> (((exists ff_h_bcpsten_valuation_candidate_power_repeat_decoded. ff_h_bcpsten_valuation_candidate_power_repeat_decoded + S (p) = S ((S (ff_i_bcpsten_valuation_candidate_power_repeat)) * ff_c_bcpsten_valuation_candidate_power)) /\ exists ff_q_bcpsten_valuation_candidate_power_repeat_decoded. ff_b_bcpsten_valuation_candidate_power = ff_q_bcpsten_valuation_candidate_power_repeat_decoded * S ((S (ff_i_bcpsten_valuation_candidate_power_repeat)) * ff_c_bcpsten_valuation_candidate_power) + (p)))) /\ (exists ff_u_bcpsten_valuation_candidate_power_product ff_v_bcpsten_valuation_candidate_power_product. ((((exists ff_h_bcpsten_valuation_candidate_power_product_start. ff_h_bcpsten_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_bcpsten_valuation_candidate_power_product)) /\ exists ff_q_bcpsten_valuation_candidate_power_product_start. ff_u_bcpsten_valuation_candidate_power_product = ff_q_bcpsten_valuation_candidate_power_product_start * S ((S (0)) * ff_v_bcpsten_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_bcpsten_valuation_candidate_power_product_terminal. ff_h_bcpsten_valuation_candidate_power_product_terminal + S (bpv_result_bcpsten_valuation_candidate) = S ((S (bpv_candidate_bcpsten_valuation)) * ff_v_bcpsten_valuation_candidate_power_product)) /\ exists ff_q_bcpsten_valuation_candidate_power_product_terminal. ff_u_bcpsten_valuation_candidate_power_product = ff_q_bcpsten_valuation_candidate_power_product_terminal * S ((S (bpv_candidate_bcpsten_valuation)) * ff_v_bcpsten_valuation_candidate_power_product) + (bpv_result_bcpsten_valuation_candidate))) /\ forall ff_i_bcpsten_valuation_candidate_power_product. (exists ff_lt_bcpsten_valuation_candidate_power_product_bound. ff_lt_bcpsten_valuation_candidate_power_product_bound + S ff_i_bcpsten_valuation_candidate_power_product = bpv_candidate_bcpsten_valuation) -> exists ff_p_bcpsten_valuation_candidate_power_product ff_r_bcpsten_valuation_candidate_power_product ff_s_bcpsten_valuation_candidate_power_product. ((((exists ff_h_bcpsten_valuation_candidate_power_product_factor. ff_h_bcpsten_valuation_candidate_power_product_factor + S (ff_p_bcpsten_valuation_candidate_power_product) = S ((S (ff_i_bcpsten_valuation_candidate_power_product)) * ff_c_bcpsten_valuation_candidate_power)) /\ exists ff_q_bcpsten_valuation_candidate_power_product_factor. ff_b_bcpsten_valuation_candidate_power = ff_q_bcpsten_valuation_candidate_power_product_factor * S ((S (ff_i_bcpsten_valuation_candidate_power_product)) * ff_c_bcpsten_valuation_candidate_power) + (ff_p_bcpsten_valuation_candidate_power_product))) /\ ((((exists ff_h_bcpsten_valuation_candidate_power_product_partial. ff_h_bcpsten_valuation_candidate_power_product_partial + S (ff_r_bcpsten_valuation_candidate_power_product) = S ((S (ff_i_bcpsten_valuation_candidate_power_product)) * ff_v_bcpsten_valuation_candidate_power_product)) /\ exists ff_q_bcpsten_valuation_candidate_power_product_partial. ff_u_bcpsten_valuation_candidate_power_product = ff_q_bcpsten_valuation_candidate_power_product_partial * S ((S (ff_i_bcpsten_valuation_candidate_power_product)) * ff_v_bcpsten_valuation_candidate_power_product) + (ff_r_bcpsten_valuation_candidate_power_product))) /\ ((((exists ff_h_bcpsten_valuation_candidate_power_product_successor. ff_h_bcpsten_valuation_candidate_power_product_successor + S (ff_s_bcpsten_valuation_candidate_power_product) = S ((S (S ff_i_bcpsten_valuation_candidate_power_product)) * ff_v_bcpsten_valuation_candidate_power_product)) /\ exists ff_q_bcpsten_valuation_candidate_power_product_successor. ff_u_bcpsten_valuation_candidate_power_product = ff_q_bcpsten_valuation_candidate_power_product_successor * S ((S (S ff_i_bcpsten_valuation_candidate_power_product)) * ff_v_bcpsten_valuation_candidate_power_product) + (ff_s_bcpsten_valuation_candidate_power_product))) /\ ff_s_bcpsten_valuation_candidate_power_product = ff_r_bcpsten_valuation_candidate_power_product * ff_p_bcpsten_valuation_candidate_power_product)))))))) /\ (exists bpv_factor_bcpsten_valuation_candidate_divides. C = bpv_result_bcpsten_valuation_candidate * bpv_factor_bcpsten_valuation_candidate_divides))) -> (exists bpv_gap_bcpsten_valuation_maximal. bpv_gap_bcpsten_valuation_maximal + bpv_candidate_bcpsten_valuation = v)) -> (exists bpvi_b_bcpsten_square bpvi_c_bcpsten_square. ((forall bpvi_i_bcpsten_square. (exists bpvi_repeat_gap_bcpsten_square. bpvi_repeat_gap_bcpsten_square + S bpvi_i_bcpsten_square = 2) -> (((exists bpvi_h_bcpsten_square_repeat. bpvi_h_bcpsten_square_repeat + S (p) = S ((S (bpvi_i_bcpsten_square)) * bpvi_c_bcpsten_square)) /\ exists bpvi_q_bcpsten_square_repeat. bpvi_b_bcpsten_square = bpvi_q_bcpsten_square_repeat * S ((S (bpvi_i_bcpsten_square)) * bpvi_c_bcpsten_square) + (p)))) /\ (exists bpvi_u_bcpsten_square bpvi_v_bcpsten_square. ((((exists bpvi_h_bcpsten_square_start. bpvi_h_bcpsten_square_start + S (1) = S ((S (0)) * bpvi_v_bcpsten_square)) /\ exists bpvi_q_bcpsten_square_start. bpvi_u_bcpsten_square = bpvi_q_bcpsten_square_start * S ((S (0)) * bpvi_v_bcpsten_square) + (1))) /\ ((((exists bpvi_h_bcpsten_square_terminal. bpvi_h_bcpsten_square_terminal + S (s) = S ((S (2)) * bpvi_v_bcpsten_square)) /\ exists bpvi_q_bcpsten_square_terminal. bpvi_u_bcpsten_square = bpvi_q_bcpsten_square_terminal * S ((S (2)) * bpvi_v_bcpsten_square) + (s))) /\ forall bpvi_j_bcpsten_square. (exists bpvi_product_gap_bcpsten_square. bpvi_product_gap_bcpsten_square + S bpvi_j_bcpsten_square = 2) -> exists bpvi_factor_bcpsten_square bpvi_partial_bcpsten_square bpvi_successor_bcpsten_square. ((((exists bpvi_h_bcpsten_square_factor. bpvi_h_bcpsten_square_factor + S (bpvi_factor_bcpsten_square) = S ((S (bpvi_j_bcpsten_square)) * bpvi_c_bcpsten_square)) /\ exists bpvi_q_bcpsten_square_factor. bpvi_b_bcpsten_square = bpvi_q_bcpsten_square_factor * S ((S (bpvi_j_bcpsten_square)) * bpvi_c_bcpsten_square) + (bpvi_factor_bcpsten_square))) /\ ((((exists bpvi_h_bcpsten_square_partial. bpvi_h_bcpsten_square_partial + S (bpvi_partial_bcpsten_square) = S ((S (bpvi_j_bcpsten_square)) * bpvi_v_bcpsten_square)) /\ exists bpvi_q_bcpsten_square_partial. bpvi_u_bcpsten_square = bpvi_q_bcpsten_square_partial * S ((S (bpvi_j_bcpsten_square)) * bpvi_v_bcpsten_square) + (bpvi_partial_bcpsten_square))) /\ ((((exists bpvi_h_bcpsten_square_successor. bpvi_h_bcpsten_square_successor + S (bpvi_successor_bcpsten_square) = S ((S (S bpvi_j_bcpsten_square)) * bpvi_v_bcpsten_square)) /\ exists bpvi_q_bcpsten_square_successor. bpvi_u_bcpsten_square = bpvi_q_bcpsten_square_successor * S ((S (S bpvi_j_bcpsten_square)) * bpvi_v_bcpsten_square) + (bpvi_successor_bcpsten_square))) /\ bpvi_successor_bcpsten_square = bpvi_partial_bcpsten_square * bpvi_factor_bcpsten_square)))))))) -> (exists bcf_lt_gap_bcpsten_strict. bcf_lt_gap_bcpsten_strict + S (n + n) = s) -> ~(exists bcf_le_gap_bcpsten_exponent. bcf_le_gap_bcpsten_exponent + (2) = v)

Structural proof guide

A prime square above twice n rules out valuation exponent two.

Direct prerequisites: pow_exists, prime_nonzero, one_le_of_ne_zero, pow_tail_strict_of_square, central_binom_prime_power_contribution_le_double, lt_not_le. The authored body proceeds by case analysis (1), intermediate claims (5).

Proof neighborhood

Direct dependencies

Direct dependents

Formal native tactic body

Dependencies are hypotheses of this body receipt. The focused endpoint audits separately check the complete empty-context certificates.

  1. 0001intro p
  2. 0002intro n
  3. 0003intro C
  4. 0004intro v
  5. 0005intro s
  6. 0006intro hp
  7. 0007intro hpositive
  8. 0008intro hcentral
  9. 0009intro hvaluation
  10. 0010intro hsquare
  11. 0011intro hstrict
  12. 0012intro hexponent
  13. 0013have hpower_exists : exists D. (exists bpvi_b_bcpsten_contribution_power bpvi_c_bcpsten_contribution_power. ((forall bpvi_i_bcpsten_contribution_power. (exists bpvi_repeat_gap_bcpsten_contribution_power. bpvi_repeat_gap_bcpsten_contribution_power + S bpvi_i_bcpsten_contribution_power = v) -> (((exists bpvi_h_bcpsten_contribution_power_repeat. bpvi_h_bcpsten_contribution_power_repeat + S (p) = S ((S (bpvi_i_bcpsten_contribution_power)) * bpvi_c_bcpsten_contribution_power)) /\ exists bpvi_q_bcpsten_contribution_power_repeat. bpvi_b_bcpsten_contribution_power = bpvi_q_bcpsten_contribution_power_repeat * S ((S (bpvi_i_bcpsten_contribution_power)) * bpvi_c_bcpsten_contribution_power) + (p)))) /\ (exists bpvi_u_bcpsten_contribution_power bpvi_v_bcpsten_contribution_power. ((((exists bpvi_h_bcpsten_contribution_power_start. bpvi_h_bcpsten_contribution_power_start + S (1) = S ((S (0)) * bpvi_v_bcpsten_contribution_power)) /\ exists bpvi_q_bcpsten_contribution_power_start. bpvi_u_bcpsten_contribution_power = bpvi_q_bcpsten_contribution_power_start * S ((S (0)) * bpvi_v_bcpsten_contribution_power) + (1))) /\ ((((exists bpvi_h_bcpsten_contribution_power_terminal. bpvi_h_bcpsten_contribution_power_terminal + S (D) = S ((S (v)) * bpvi_v_bcpsten_contribution_power)) /\ exists bpvi_q_bcpsten_contribution_power_terminal. bpvi_u_bcpsten_contribution_power = bpvi_q_bcpsten_contribution_power_terminal * S ((S (v)) * bpvi_v_bcpsten_contribution_power) + (D))) /\ forall bpvi_j_bcpsten_contribution_power. (exists bpvi_product_gap_bcpsten_contribution_power. bpvi_product_gap_bcpsten_contribution_power + S bpvi_j_bcpsten_contribution_power = v) -> exists bpvi_factor_bcpsten_contribution_power bpvi_partial_bcpsten_contribution_power bpvi_successor_bcpsten_contribution_power. ((((exists bpvi_h_bcpsten_contribution_power_factor. bpvi_h_bcpsten_contribution_power_factor + S (bpvi_factor_bcpsten_contribution_power) = S ((S (bpvi_j_bcpsten_contribution_power)) * bpvi_c_bcpsten_contribution_power)) /\ exists bpvi_q_bcpsten_contribution_power_factor. bpvi_b_bcpsten_contribution_power = bpvi_q_bcpsten_contribution_power_factor * S ((S (bpvi_j_bcpsten_contribution_power)) * bpvi_c_bcpsten_contribution_power) + (bpvi_factor_bcpsten_contribution_power))) /\ ((((exists bpvi_h_bcpsten_contribution_power_partial. bpvi_h_bcpsten_contribution_power_partial + S (bpvi_partial_bcpsten_contribution_power) = S ((S (bpvi_j_bcpsten_contribution_power)) * bpvi_v_bcpsten_contribution_power)) /\ exists bpvi_q_bcpsten_contribution_power_partial. bpvi_u_bcpsten_contribution_power = bpvi_q_bcpsten_contribution_power_partial * S ((S (bpvi_j_bcpsten_contribution_power)) * bpvi_v_bcpsten_contribution_power) + (bpvi_partial_bcpsten_contribution_power))) /\ ((((exists bpvi_h_bcpsten_contribution_power_successor. bpvi_h_bcpsten_contribution_power_successor + S (bpvi_successor_bcpsten_contribution_power) = S ((S (S bpvi_j_bcpsten_contribution_power)) * bpvi_v_bcpsten_contribution_power)) /\ exists bpvi_q_bcpsten_contribution_power_successor. bpvi_u_bcpsten_contribution_power = bpvi_q_bcpsten_contribution_power_successor * S ((S (S bpvi_j_bcpsten_contribution_power)) * bpvi_v_bcpsten_contribution_power) + (bpvi_successor_bcpsten_contribution_power))) /\ bpvi_successor_bcpsten_contribution_power = bpvi_partial_bcpsten_contribution_power * bpvi_factor_bcpsten_contribution_power))))))))
  14. 0014specialize pow_exists p
  15. 0015specialize pow_exists v
  16. 0016exact pow_exists
  17. 0017cases hpower_exists
  18. 0018have hp_nonzero : ~(p = 0)
  19. 0019intro hpzero
  20. 0020specialize prime_nonzero p
  21. 0021apply prime_nonzero
  22. 0022exact hp
  23. 0023exact hpzero
  24. 0024have hp_positive : exists bcf_le_gap_bcpsten_prime_positive. bcf_le_gap_bcpsten_prime_positive + (1) = p
  25. 0025specialize one_le_of_ne_zero p
  26. 0026apply one_le_of_ne_zero
  27. 0027exact hp_nonzero
  28. 0028have htail : exists bcf_lt_gap_bcpsten_contribution_strict. bcf_lt_gap_bcpsten_contribution_strict + S (n + n) = x
  29. 0029specialize pow_tail_strict_of_square p
  30. 0030specialize pow_tail_strict_of_square v
  31. 0031specialize pow_tail_strict_of_square x
  32. 0032specialize pow_tail_strict_of_square s
  33. 0033specialize pow_tail_strict_of_square (n + n)
  34. 0034apply pow_tail_strict_of_square
  35. 0035exact hp_positive
  36. 0036exact hexponent
  37. 0037exact hsquare
  38. 0038exact hpower_exists_witness
  39. 0039exact hstrict
  40. 0040have hbound : exists bcf_le_gap_bcpsten_contribution_bound. bcf_le_gap_bcpsten_contribution_bound + (x) = n + n
  41. 0041specialize central_binom_prime_power_contribution_le_double p
  42. 0042specialize central_binom_prime_power_contribution_le_double n
  43. 0043specialize central_binom_prime_power_contribution_le_double C
  44. 0044specialize central_binom_prime_power_contribution_le_double v
  45. 0045specialize central_binom_prime_power_contribution_le_double x
  46. 0046apply central_binom_prime_power_contribution_le_double
  47. 0047exact hp
  48. 0048exact hpositive
  49. 0049exact hcentral
  50. 0050exact hvaluation
  51. 0051exact hpower_exists_witness
  52. 0052specialize lt_not_le (n + n)
  53. 0053specialize lt_not_le x
  54. 0054apply lt_not_le
  55. 0055exact htail
  56. 0056exact hbound