BT00YI

central_binom_prime_above_floor_sqrt_valuation_le_one

Alpha body-checked ยท checked-use disabled

Above the floor root, a central prime valuation is at most one.

Exact expanded PA statement

forall p n C v s. ((~(p = 1) /\ forall frm_prime_left_bcpafs_vlo_prime frm_prime_right_bcpafs_vlo_prime. p = frm_prime_left_bcpafs_vlo_prime * frm_prime_right_bcpafs_vlo_prime -> frm_prime_left_bcpafs_vlo_prime = 1 \/ frm_prime_right_bcpafs_vlo_prime = 1)) -> (exists bcf_lt_gap_bcpafs_vlo_positive. bcf_lt_gap_bcpafs_vlo_positive + S (2) = n) -> (((exists bcf_lt_gap_bcpafs_vlo_central_out_of_range. bcf_lt_gap_bcpafs_vlo_central_out_of_range + S (n + n) = n) /\ C = 0) \/ ((exists bcf_le_gap_bcpafs_vlo_central_in_range. bcf_le_gap_bcpafs_vlo_central_in_range + (n) = n + n) /\ (exists bcf_row_code_code_bcpafs_vlo_central bcf_row_code_scale_bcpafs_vlo_central bcf_row_scale_code_bcpafs_vlo_central bcf_row_scale_scale_bcpafs_vlo_central bcf_row_code_bcpafs_vlo_central bcf_row_scale_bcpafs_vlo_central. ((forall bcf_row_index_bcpafs_vlo_central_table. (exists bcf_lt_gap_bcpafs_vlo_central_table_row_bound. bcf_lt_gap_bcpafs_vlo_central_table_row_bound + S (bcf_row_index_bcpafs_vlo_central_table) = S (n + n)) -> exists bcf_row_code_bcpafs_vlo_central_table bcf_row_scale_bcpafs_vlo_central_table. ((((exists bcf_height_bcpafs_vlo_central_table_decoded_row_code. bcf_height_bcpafs_vlo_central_table_decoded_row_code + S (bcf_row_code_bcpafs_vlo_central_table) = S ((S (bcf_row_index_bcpafs_vlo_central_table)) * bcf_row_code_scale_bcpafs_vlo_central)) /\ exists bcf_quotient_bcpafs_vlo_central_table_decoded_row_code. bcf_row_code_code_bcpafs_vlo_central = bcf_quotient_bcpafs_vlo_central_table_decoded_row_code * S ((S (bcf_row_index_bcpafs_vlo_central_table)) * bcf_row_code_scale_bcpafs_vlo_central) + (bcf_row_code_bcpafs_vlo_central_table))) /\ ((((exists bcf_height_bcpafs_vlo_central_table_decoded_row_scale. bcf_height_bcpafs_vlo_central_table_decoded_row_scale + S (bcf_row_scale_bcpafs_vlo_central_table) = S ((S (bcf_row_index_bcpafs_vlo_central_table)) * bcf_row_scale_scale_bcpafs_vlo_central)) /\ exists bcf_quotient_bcpafs_vlo_central_table_decoded_row_scale. bcf_row_scale_code_bcpafs_vlo_central = bcf_quotient_bcpafs_vlo_central_table_decoded_row_scale * S ((S (bcf_row_index_bcpafs_vlo_central_table)) * bcf_row_scale_scale_bcpafs_vlo_central) + (bcf_row_scale_bcpafs_vlo_central_table))) /\ ((bcf_row_index_bcpafs_vlo_central_table = 0 /\ (forall bcf_index_bcpafs_vlo_central_table_zero_row. (exists bcf_lt_gap_bcpafs_vlo_central_table_zero_row_bound. bcf_lt_gap_bcpafs_vlo_central_table_zero_row_bound + S (bcf_index_bcpafs_vlo_central_table_zero_row) = S (n + n)) -> exists bcf_value_bcpafs_vlo_central_table_zero_row. ((((exists bcf_height_bcpafs_vlo_central_table_zero_row_entry. bcf_height_bcpafs_vlo_central_table_zero_row_entry + S (bcf_value_bcpafs_vlo_central_table_zero_row) = S ((S (bcf_index_bcpafs_vlo_central_table_zero_row)) * bcf_row_scale_bcpafs_vlo_central_table)) /\ exists bcf_quotient_bcpafs_vlo_central_table_zero_row_entry. bcf_row_code_bcpafs_vlo_central_table = bcf_quotient_bcpafs_vlo_central_table_zero_row_entry * S ((S (bcf_index_bcpafs_vlo_central_table_zero_row)) * bcf_row_scale_bcpafs_vlo_central_table) + (bcf_value_bcpafs_vlo_central_table_zero_row))) /\ ((bcf_index_bcpafs_vlo_central_table_zero_row = 0 /\ bcf_value_bcpafs_vlo_central_table_zero_row = 1) \/ exists bcf_predecessor_bcpafs_vlo_central_table_zero_row. bcf_index_bcpafs_vlo_central_table_zero_row = S bcf_predecessor_bcpafs_vlo_central_table_zero_row /\ bcf_value_bcpafs_vlo_central_table_zero_row = 0)))) \/ exists bcf_predecessor_bcpafs_vlo_central_table bcf_previous_code_bcpafs_vlo_central_table bcf_previous_scale_bcpafs_vlo_central_table. bcf_row_index_bcpafs_vlo_central_table = S bcf_predecessor_bcpafs_vlo_central_table /\ ((((exists bcf_height_bcpafs_vlo_central_table_decoded_previous_code. bcf_height_bcpafs_vlo_central_table_decoded_previous_code + S (bcf_previous_code_bcpafs_vlo_central_table) = S ((S (bcf_predecessor_bcpafs_vlo_central_table)) * bcf_row_code_scale_bcpafs_vlo_central)) /\ exists bcf_quotient_bcpafs_vlo_central_table_decoded_previous_code. bcf_row_code_code_bcpafs_vlo_central = bcf_quotient_bcpafs_vlo_central_table_decoded_previous_code * S ((S (bcf_predecessor_bcpafs_vlo_central_table)) * bcf_row_code_scale_bcpafs_vlo_central) + (bcf_previous_code_bcpafs_vlo_central_table))) /\ ((((exists bcf_height_bcpafs_vlo_central_table_decoded_previous_scale. bcf_height_bcpafs_vlo_central_table_decoded_previous_scale + S (bcf_previous_scale_bcpafs_vlo_central_table) = S ((S (bcf_predecessor_bcpafs_vlo_central_table)) * bcf_row_scale_scale_bcpafs_vlo_central)) /\ exists bcf_quotient_bcpafs_vlo_central_table_decoded_previous_scale. bcf_row_scale_code_bcpafs_vlo_central = bcf_quotient_bcpafs_vlo_central_table_decoded_previous_scale * S ((S (bcf_predecessor_bcpafs_vlo_central_table)) * bcf_row_scale_scale_bcpafs_vlo_central) + (bcf_previous_scale_bcpafs_vlo_central_table))) /\ (forall bcf_index_bcpafs_vlo_central_table_row_step. (exists bcf_lt_gap_bcpafs_vlo_central_table_row_step_bound. bcf_lt_gap_bcpafs_vlo_central_table_row_step_bound + S (bcf_index_bcpafs_vlo_central_table_row_step) = S (n + n)) -> exists bcf_value_bcpafs_vlo_central_table_row_step. ((((exists bcf_height_bcpafs_vlo_central_table_row_step_entry. bcf_height_bcpafs_vlo_central_table_row_step_entry + S (bcf_value_bcpafs_vlo_central_table_row_step) = S ((S (bcf_index_bcpafs_vlo_central_table_row_step)) * bcf_row_scale_bcpafs_vlo_central_table)) /\ exists bcf_quotient_bcpafs_vlo_central_table_row_step_entry. bcf_row_code_bcpafs_vlo_central_table = bcf_quotient_bcpafs_vlo_central_table_row_step_entry * S ((S (bcf_index_bcpafs_vlo_central_table_row_step)) * bcf_row_scale_bcpafs_vlo_central_table) + (bcf_value_bcpafs_vlo_central_table_row_step))) /\ ((bcf_index_bcpafs_vlo_central_table_row_step = 0 /\ bcf_value_bcpafs_vlo_central_table_row_step = 1) \/ exists bcf_predecessor_bcpafs_vlo_central_table_row_step bcf_left_bcpafs_vlo_central_table_row_step bcf_right_bcpafs_vlo_central_table_row_step. bcf_index_bcpafs_vlo_central_table_row_step = S bcf_predecessor_bcpafs_vlo_central_table_row_step /\ ((((exists bcf_height_bcpafs_vlo_central_table_row_step_previous_left. bcf_height_bcpafs_vlo_central_table_row_step_previous_left + S (bcf_left_bcpafs_vlo_central_table_row_step) = S ((S (bcf_predecessor_bcpafs_vlo_central_table_row_step)) * bcf_previous_scale_bcpafs_vlo_central_table)) /\ exists bcf_quotient_bcpafs_vlo_central_table_row_step_previous_left. bcf_previous_code_bcpafs_vlo_central_table = bcf_quotient_bcpafs_vlo_central_table_row_step_previous_left * S ((S (bcf_predecessor_bcpafs_vlo_central_table_row_step)) * bcf_previous_scale_bcpafs_vlo_central_table) + (bcf_left_bcpafs_vlo_central_table_row_step))) /\ ((((exists bcf_height_bcpafs_vlo_central_table_row_step_previous_right. bcf_height_bcpafs_vlo_central_table_row_step_previous_right + S (bcf_right_bcpafs_vlo_central_table_row_step) = S ((S (S (bcf_predecessor_bcpafs_vlo_central_table_row_step))) * bcf_previous_scale_bcpafs_vlo_central_table)) /\ exists bcf_quotient_bcpafs_vlo_central_table_row_step_previous_right. bcf_previous_code_bcpafs_vlo_central_table = bcf_quotient_bcpafs_vlo_central_table_row_step_previous_right * S ((S (S (bcf_predecessor_bcpafs_vlo_central_table_row_step))) * bcf_previous_scale_bcpafs_vlo_central_table) + (bcf_right_bcpafs_vlo_central_table_row_step))) /\ bcf_value_bcpafs_vlo_central_table_row_step = bcf_left_bcpafs_vlo_central_table_row_step + bcf_right_bcpafs_vlo_central_table_row_step))))))))))) /\ ((((exists bcf_height_bcpafs_vlo_central_decoded_row_code. bcf_height_bcpafs_vlo_central_decoded_row_code + S (bcf_row_code_bcpafs_vlo_central) = S ((S (n + n)) * bcf_row_code_scale_bcpafs_vlo_central)) /\ exists bcf_quotient_bcpafs_vlo_central_decoded_row_code. bcf_row_code_code_bcpafs_vlo_central = bcf_quotient_bcpafs_vlo_central_decoded_row_code * S ((S (n + n)) * bcf_row_code_scale_bcpafs_vlo_central) + (bcf_row_code_bcpafs_vlo_central))) /\ ((((exists bcf_height_bcpafs_vlo_central_decoded_row_scale. bcf_height_bcpafs_vlo_central_decoded_row_scale + S (bcf_row_scale_bcpafs_vlo_central) = S ((S (n + n)) * bcf_row_scale_scale_bcpafs_vlo_central)) /\ exists bcf_quotient_bcpafs_vlo_central_decoded_row_scale. bcf_row_scale_code_bcpafs_vlo_central = bcf_quotient_bcpafs_vlo_central_decoded_row_scale * S ((S (n + n)) * bcf_row_scale_scale_bcpafs_vlo_central) + (bcf_row_scale_bcpafs_vlo_central))) /\ (((exists bcf_height_bcpafs_vlo_central_decoded_value. bcf_height_bcpafs_vlo_central_decoded_value + S (C) = S ((S (n)) * bcf_row_scale_bcpafs_vlo_central)) /\ exists bcf_quotient_bcpafs_vlo_central_decoded_value. bcf_row_code_bcpafs_vlo_central = bcf_quotient_bcpafs_vlo_central_decoded_value * S ((S (n)) * bcf_row_scale_bcpafs_vlo_central) + (C))))))))) -> (((exists bpv_gap_bcpafs_vlo_valuation_exponent_bound. bpv_gap_bcpafs_vlo_valuation_exponent_bound + v = C) /\ (exists bpv_result_bcpafs_vlo_valuation_selected. ((exists ff_b_bcpafs_vlo_valuation_selected_power ff_c_bcpafs_vlo_valuation_selected_power. ((forall ff_i_bcpafs_vlo_valuation_selected_power_repeat. (exists ff_lt_bcpafs_vlo_valuation_selected_power_repeat_bound. ff_lt_bcpafs_vlo_valuation_selected_power_repeat_bound + S ff_i_bcpafs_vlo_valuation_selected_power_repeat = v) -> (((exists ff_h_bcpafs_vlo_valuation_selected_power_repeat_decoded. ff_h_bcpafs_vlo_valuation_selected_power_repeat_decoded + S (p) = S ((S (ff_i_bcpafs_vlo_valuation_selected_power_repeat)) * ff_c_bcpafs_vlo_valuation_selected_power)) /\ exists ff_q_bcpafs_vlo_valuation_selected_power_repeat_decoded. ff_b_bcpafs_vlo_valuation_selected_power = ff_q_bcpafs_vlo_valuation_selected_power_repeat_decoded * S ((S (ff_i_bcpafs_vlo_valuation_selected_power_repeat)) * ff_c_bcpafs_vlo_valuation_selected_power) + (p)))) /\ (exists ff_u_bcpafs_vlo_valuation_selected_power_product ff_v_bcpafs_vlo_valuation_selected_power_product. ((((exists ff_h_bcpafs_vlo_valuation_selected_power_product_start. ff_h_bcpafs_vlo_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_bcpafs_vlo_valuation_selected_power_product)) /\ exists ff_q_bcpafs_vlo_valuation_selected_power_product_start. ff_u_bcpafs_vlo_valuation_selected_power_product = ff_q_bcpafs_vlo_valuation_selected_power_product_start * S ((S (0)) * ff_v_bcpafs_vlo_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_bcpafs_vlo_valuation_selected_power_product_terminal. ff_h_bcpafs_vlo_valuation_selected_power_product_terminal + S (bpv_result_bcpafs_vlo_valuation_selected) = S ((S (v)) * ff_v_bcpafs_vlo_valuation_selected_power_product)) /\ exists ff_q_bcpafs_vlo_valuation_selected_power_product_terminal. ff_u_bcpafs_vlo_valuation_selected_power_product = ff_q_bcpafs_vlo_valuation_selected_power_product_terminal * S ((S (v)) * ff_v_bcpafs_vlo_valuation_selected_power_product) + (bpv_result_bcpafs_vlo_valuation_selected))) /\ forall ff_i_bcpafs_vlo_valuation_selected_power_product. (exists ff_lt_bcpafs_vlo_valuation_selected_power_product_bound. ff_lt_bcpafs_vlo_valuation_selected_power_product_bound + S ff_i_bcpafs_vlo_valuation_selected_power_product = v) -> exists ff_p_bcpafs_vlo_valuation_selected_power_product ff_r_bcpafs_vlo_valuation_selected_power_product ff_s_bcpafs_vlo_valuation_selected_power_product. ((((exists ff_h_bcpafs_vlo_valuation_selected_power_product_factor. ff_h_bcpafs_vlo_valuation_selected_power_product_factor + S (ff_p_bcpafs_vlo_valuation_selected_power_product) = S ((S (ff_i_bcpafs_vlo_valuation_selected_power_product)) * ff_c_bcpafs_vlo_valuation_selected_power)) /\ exists ff_q_bcpafs_vlo_valuation_selected_power_product_factor. ff_b_bcpafs_vlo_valuation_selected_power = ff_q_bcpafs_vlo_valuation_selected_power_product_factor * S ((S (ff_i_bcpafs_vlo_valuation_selected_power_product)) * ff_c_bcpafs_vlo_valuation_selected_power) + (ff_p_bcpafs_vlo_valuation_selected_power_product))) /\ ((((exists ff_h_bcpafs_vlo_valuation_selected_power_product_partial. ff_h_bcpafs_vlo_valuation_selected_power_product_partial + S (ff_r_bcpafs_vlo_valuation_selected_power_product) = S ((S (ff_i_bcpafs_vlo_valuation_selected_power_product)) * ff_v_bcpafs_vlo_valuation_selected_power_product)) /\ exists ff_q_bcpafs_vlo_valuation_selected_power_product_partial. ff_u_bcpafs_vlo_valuation_selected_power_product = ff_q_bcpafs_vlo_valuation_selected_power_product_partial * S ((S (ff_i_bcpafs_vlo_valuation_selected_power_product)) * ff_v_bcpafs_vlo_valuation_selected_power_product) + (ff_r_bcpafs_vlo_valuation_selected_power_product))) /\ ((((exists ff_h_bcpafs_vlo_valuation_selected_power_product_successor. ff_h_bcpafs_vlo_valuation_selected_power_product_successor + S (ff_s_bcpafs_vlo_valuation_selected_power_product) = S ((S (S ff_i_bcpafs_vlo_valuation_selected_power_product)) * ff_v_bcpafs_vlo_valuation_selected_power_product)) /\ exists ff_q_bcpafs_vlo_valuation_selected_power_product_successor. ff_u_bcpafs_vlo_valuation_selected_power_product = ff_q_bcpafs_vlo_valuation_selected_power_product_successor * S ((S (S ff_i_bcpafs_vlo_valuation_selected_power_product)) * ff_v_bcpafs_vlo_valuation_selected_power_product) + (ff_s_bcpafs_vlo_valuation_selected_power_product))) /\ ff_s_bcpafs_vlo_valuation_selected_power_product = ff_r_bcpafs_vlo_valuation_selected_power_product * ff_p_bcpafs_vlo_valuation_selected_power_product)))))))) /\ (exists bpv_factor_bcpafs_vlo_valuation_selected_divides. C = bpv_result_bcpafs_vlo_valuation_selected * bpv_factor_bcpafs_vlo_valuation_selected_divides)))) /\ forall bpv_candidate_bcpafs_vlo_valuation. (exists bpv_gap_bcpafs_vlo_valuation_candidate_bound. bpv_gap_bcpafs_vlo_valuation_candidate_bound + bpv_candidate_bcpafs_vlo_valuation = C) -> (exists bpv_result_bcpafs_vlo_valuation_candidate. ((exists ff_b_bcpafs_vlo_valuation_candidate_power ff_c_bcpafs_vlo_valuation_candidate_power. ((forall ff_i_bcpafs_vlo_valuation_candidate_power_repeat. (exists ff_lt_bcpafs_vlo_valuation_candidate_power_repeat_bound. ff_lt_bcpafs_vlo_valuation_candidate_power_repeat_bound + S ff_i_bcpafs_vlo_valuation_candidate_power_repeat = bpv_candidate_bcpafs_vlo_valuation) -> (((exists ff_h_bcpafs_vlo_valuation_candidate_power_repeat_decoded. ff_h_bcpafs_vlo_valuation_candidate_power_repeat_decoded + S (p) = S ((S (ff_i_bcpafs_vlo_valuation_candidate_power_repeat)) * ff_c_bcpafs_vlo_valuation_candidate_power)) /\ exists ff_q_bcpafs_vlo_valuation_candidate_power_repeat_decoded. ff_b_bcpafs_vlo_valuation_candidate_power = ff_q_bcpafs_vlo_valuation_candidate_power_repeat_decoded * S ((S (ff_i_bcpafs_vlo_valuation_candidate_power_repeat)) * ff_c_bcpafs_vlo_valuation_candidate_power) + (p)))) /\ (exists ff_u_bcpafs_vlo_valuation_candidate_power_product ff_v_bcpafs_vlo_valuation_candidate_power_product. ((((exists ff_h_bcpafs_vlo_valuation_candidate_power_product_start. ff_h_bcpafs_vlo_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_bcpafs_vlo_valuation_candidate_power_product)) /\ exists ff_q_bcpafs_vlo_valuation_candidate_power_product_start. ff_u_bcpafs_vlo_valuation_candidate_power_product = ff_q_bcpafs_vlo_valuation_candidate_power_product_start * S ((S (0)) * ff_v_bcpafs_vlo_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_bcpafs_vlo_valuation_candidate_power_product_terminal. ff_h_bcpafs_vlo_valuation_candidate_power_product_terminal + S (bpv_result_bcpafs_vlo_valuation_candidate) = S ((S (bpv_candidate_bcpafs_vlo_valuation)) * ff_v_bcpafs_vlo_valuation_candidate_power_product)) /\ exists ff_q_bcpafs_vlo_valuation_candidate_power_product_terminal. ff_u_bcpafs_vlo_valuation_candidate_power_product = ff_q_bcpafs_vlo_valuation_candidate_power_product_terminal * S ((S (bpv_candidate_bcpafs_vlo_valuation)) * ff_v_bcpafs_vlo_valuation_candidate_power_product) + (bpv_result_bcpafs_vlo_valuation_candidate))) /\ forall ff_i_bcpafs_vlo_valuation_candidate_power_product. (exists ff_lt_bcpafs_vlo_valuation_candidate_power_product_bound. ff_lt_bcpafs_vlo_valuation_candidate_power_product_bound + S ff_i_bcpafs_vlo_valuation_candidate_power_product = bpv_candidate_bcpafs_vlo_valuation) -> exists ff_p_bcpafs_vlo_valuation_candidate_power_product ff_r_bcpafs_vlo_valuation_candidate_power_product ff_s_bcpafs_vlo_valuation_candidate_power_product. ((((exists ff_h_bcpafs_vlo_valuation_candidate_power_product_factor. ff_h_bcpafs_vlo_valuation_candidate_power_product_factor + S (ff_p_bcpafs_vlo_valuation_candidate_power_product) = S ((S (ff_i_bcpafs_vlo_valuation_candidate_power_product)) * ff_c_bcpafs_vlo_valuation_candidate_power)) /\ exists ff_q_bcpafs_vlo_valuation_candidate_power_product_factor. ff_b_bcpafs_vlo_valuation_candidate_power = ff_q_bcpafs_vlo_valuation_candidate_power_product_factor * S ((S (ff_i_bcpafs_vlo_valuation_candidate_power_product)) * ff_c_bcpafs_vlo_valuation_candidate_power) + (ff_p_bcpafs_vlo_valuation_candidate_power_product))) /\ ((((exists ff_h_bcpafs_vlo_valuation_candidate_power_product_partial. ff_h_bcpafs_vlo_valuation_candidate_power_product_partial + S (ff_r_bcpafs_vlo_valuation_candidate_power_product) = S ((S (ff_i_bcpafs_vlo_valuation_candidate_power_product)) * ff_v_bcpafs_vlo_valuation_candidate_power_product)) /\ exists ff_q_bcpafs_vlo_valuation_candidate_power_product_partial. ff_u_bcpafs_vlo_valuation_candidate_power_product = ff_q_bcpafs_vlo_valuation_candidate_power_product_partial * S ((S (ff_i_bcpafs_vlo_valuation_candidate_power_product)) * ff_v_bcpafs_vlo_valuation_candidate_power_product) + (ff_r_bcpafs_vlo_valuation_candidate_power_product))) /\ ((((exists ff_h_bcpafs_vlo_valuation_candidate_power_product_successor. ff_h_bcpafs_vlo_valuation_candidate_power_product_successor + S (ff_s_bcpafs_vlo_valuation_candidate_power_product) = S ((S (S ff_i_bcpafs_vlo_valuation_candidate_power_product)) * ff_v_bcpafs_vlo_valuation_candidate_power_product)) /\ exists ff_q_bcpafs_vlo_valuation_candidate_power_product_successor. ff_u_bcpafs_vlo_valuation_candidate_power_product = ff_q_bcpafs_vlo_valuation_candidate_power_product_successor * S ((S (S ff_i_bcpafs_vlo_valuation_candidate_power_product)) * ff_v_bcpafs_vlo_valuation_candidate_power_product) + (ff_s_bcpafs_vlo_valuation_candidate_power_product))) /\ ff_s_bcpafs_vlo_valuation_candidate_power_product = ff_r_bcpafs_vlo_valuation_candidate_power_product * ff_p_bcpafs_vlo_valuation_candidate_power_product)))))))) /\ (exists bpv_factor_bcpafs_vlo_valuation_candidate_divides. C = bpv_result_bcpafs_vlo_valuation_candidate * bpv_factor_bcpafs_vlo_valuation_candidate_divides))) -> (exists bpv_gap_bcpafs_vlo_valuation_maximal. bpv_gap_bcpafs_vlo_valuation_maximal + bpv_candidate_bcpafs_vlo_valuation = v)) -> (((exists bcs_sqrt_lower_gap_bcpafs_vlo_floor. bcs_sqrt_lower_gap_bcpafs_vlo_floor + (s) * (s) = (n + n)) /\ exists bcs_sqrt_upper_gap_bcpafs_vlo_floor. bcs_sqrt_upper_gap_bcpafs_vlo_floor + S (n + n) = S (s) * S (s))) -> (exists bcf_lt_gap_bcpafs_vlo_above. bcf_lt_gap_bcpafs_vlo_above + S (s) = p) -> (exists bcf_le_gap_bcpafs_vlo_result. bcf_le_gap_bcpafs_vlo_result + (v) = 1)

Structural proof guide

Above the floor root, a central prime valuation is at most one.

Direct prerequisites: lt_to_le, le_trans, pow_exists, floor_sqrt_above_root_power_two_strict, central_binom_prime_square_tail_valuation_le_one. The authored body proceeds by case analysis (1), intermediate claims (5), closed numeral normalization (1).

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 hfloor
  11. 0011intro habove
  12. 0012have htwo_le : exists bcf_le_gap_bcpafs_vlo_two_le. bcf_le_gap_bcpafs_vlo_two_le + (2) = n
  13. 0013specialize lt_to_le 2
  14. 0014specialize lt_to_le n
  15. 0015apply lt_to_le
  16. 0016exact hpositive
  17. 0017have hone_two : exists bcf_le_gap_bcpafs_vlo_one_two. bcf_le_gap_bcpafs_vlo_one_two + (1) = 2
  18. 0018exists 1
  19. 0019norm_num
  20. 0020have hone_le : exists bcf_le_gap_bcpafs_vlo_one_le. bcf_le_gap_bcpafs_vlo_one_le + (1) = n
  21. 0021specialize le_trans 1
  22. 0022specialize le_trans 2
  23. 0023specialize le_trans n
  24. 0024apply le_trans
  25. 0025exact hone_two
  26. 0026exact htwo_le
  27. 0027have hpower_exists : exists t. (exists bpvi_b_bcpafs_vlo_power bpvi_c_bcpafs_vlo_power. ((forall bpvi_i_bcpafs_vlo_power. (exists bpvi_repeat_gap_bcpafs_vlo_power. bpvi_repeat_gap_bcpafs_vlo_power + S bpvi_i_bcpafs_vlo_power = 2) -> (((exists bpvi_h_bcpafs_vlo_power_repeat. bpvi_h_bcpafs_vlo_power_repeat + S (p) = S ((S (bpvi_i_bcpafs_vlo_power)) * bpvi_c_bcpafs_vlo_power)) /\ exists bpvi_q_bcpafs_vlo_power_repeat. bpvi_b_bcpafs_vlo_power = bpvi_q_bcpafs_vlo_power_repeat * S ((S (bpvi_i_bcpafs_vlo_power)) * bpvi_c_bcpafs_vlo_power) + (p)))) /\ (exists bpvi_u_bcpafs_vlo_power bpvi_v_bcpafs_vlo_power. ((((exists bpvi_h_bcpafs_vlo_power_start. bpvi_h_bcpafs_vlo_power_start + S (1) = S ((S (0)) * bpvi_v_bcpafs_vlo_power)) /\ exists bpvi_q_bcpafs_vlo_power_start. bpvi_u_bcpafs_vlo_power = bpvi_q_bcpafs_vlo_power_start * S ((S (0)) * bpvi_v_bcpafs_vlo_power) + (1))) /\ ((((exists bpvi_h_bcpafs_vlo_power_terminal. bpvi_h_bcpafs_vlo_power_terminal + S (t) = S ((S (2)) * bpvi_v_bcpafs_vlo_power)) /\ exists bpvi_q_bcpafs_vlo_power_terminal. bpvi_u_bcpafs_vlo_power = bpvi_q_bcpafs_vlo_power_terminal * S ((S (2)) * bpvi_v_bcpafs_vlo_power) + (t))) /\ forall bpvi_j_bcpafs_vlo_power. (exists bpvi_product_gap_bcpafs_vlo_power. bpvi_product_gap_bcpafs_vlo_power + S bpvi_j_bcpafs_vlo_power = 2) -> exists bpvi_factor_bcpafs_vlo_power bpvi_partial_bcpafs_vlo_power bpvi_successor_bcpafs_vlo_power. ((((exists bpvi_h_bcpafs_vlo_power_factor. bpvi_h_bcpafs_vlo_power_factor + S (bpvi_factor_bcpafs_vlo_power) = S ((S (bpvi_j_bcpafs_vlo_power)) * bpvi_c_bcpafs_vlo_power)) /\ exists bpvi_q_bcpafs_vlo_power_factor. bpvi_b_bcpafs_vlo_power = bpvi_q_bcpafs_vlo_power_factor * S ((S (bpvi_j_bcpafs_vlo_power)) * bpvi_c_bcpafs_vlo_power) + (bpvi_factor_bcpafs_vlo_power))) /\ ((((exists bpvi_h_bcpafs_vlo_power_partial. bpvi_h_bcpafs_vlo_power_partial + S (bpvi_partial_bcpafs_vlo_power) = S ((S (bpvi_j_bcpafs_vlo_power)) * bpvi_v_bcpafs_vlo_power)) /\ exists bpvi_q_bcpafs_vlo_power_partial. bpvi_u_bcpafs_vlo_power = bpvi_q_bcpafs_vlo_power_partial * S ((S (bpvi_j_bcpafs_vlo_power)) * bpvi_v_bcpafs_vlo_power) + (bpvi_partial_bcpafs_vlo_power))) /\ ((((exists bpvi_h_bcpafs_vlo_power_successor. bpvi_h_bcpafs_vlo_power_successor + S (bpvi_successor_bcpafs_vlo_power) = S ((S (S bpvi_j_bcpafs_vlo_power)) * bpvi_v_bcpafs_vlo_power)) /\ exists bpvi_q_bcpafs_vlo_power_successor. bpvi_u_bcpafs_vlo_power = bpvi_q_bcpafs_vlo_power_successor * S ((S (S bpvi_j_bcpafs_vlo_power)) * bpvi_v_bcpafs_vlo_power) + (bpvi_successor_bcpafs_vlo_power))) /\ bpvi_successor_bcpafs_vlo_power = bpvi_partial_bcpafs_vlo_power * bpvi_factor_bcpafs_vlo_power))))))))
  28. 0028specialize pow_exists p
  29. 0029specialize pow_exists 2
  30. 0030exact pow_exists
  31. 0031cases hpower_exists
  32. 0032have hsquare : exists bcf_lt_gap_bcpafs_vlo_square. bcf_lt_gap_bcpafs_vlo_square + S (n + n) = x
  33. 0033specialize floor_sqrt_above_root_power_two_strict (n + n)
  34. 0034specialize floor_sqrt_above_root_power_two_strict s
  35. 0035specialize floor_sqrt_above_root_power_two_strict p
  36. 0036specialize floor_sqrt_above_root_power_two_strict x
  37. 0037apply floor_sqrt_above_root_power_two_strict
  38. 0038exact hfloor
  39. 0039exact habove
  40. 0040exact hpower_exists_witness
  41. 0041specialize central_binom_prime_square_tail_valuation_le_one p
  42. 0042specialize central_binom_prime_square_tail_valuation_le_one n
  43. 0043specialize central_binom_prime_square_tail_valuation_le_one C
  44. 0044specialize central_binom_prime_square_tail_valuation_le_one v
  45. 0045specialize central_binom_prime_square_tail_valuation_le_one x
  46. 0046apply central_binom_prime_square_tail_valuation_le_one
  47. 0047exact hp
  48. 0048exact hone_le
  49. 0049exact hcentral
  50. 0050exact hvaluation
  51. 0051exact hpower_exists_witness
  52. 0052exact hsquare