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
∀ p. ∀ n. ∀ C. ∀ v. ∀ s. Prime(p) → Lt(2,n) → CentralBinom(n,C) → PowerValuation(p,C,v) → FloorSqrt(n + n,s) → Lt(s,p) → Le(v,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
7 occurrences
In local proof propositions
5 occurrences
Exact expanded native-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)Proof neighborhood
Direct theorem prerequisites
BT0019 lt_to_le BT000F le_trans BT0080 pow_exists BT00YH floor_sqrt_above_root_power_two_strict BT00Y7 central_binom_prime_square_tail_valuation_le_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–11
Work with arbitrary variables or the premises of the current implication.
- L11
intro habove
03Establish htwo_leL12–16
04Establish hone_twoL17–17
Establish this local claim before using it. It is not an additional assumption.
05Construct an explicit witnessL18–18
Supply the displayed value, then prove that it has the required property.
- L18
exists 1
06Calculate and transport equalitiesL19–19
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L19
norm_num
07Establish hone_leL20–26
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply le trans.
08Establish hpower_existsL27–30
Establish this local claim before using it. It is not an additional assumption.
- L27
have hpower_exists : ∃ t. Pow(p,2,t)Definitions: Pow(p,2,t)Original native command in the exact edition - L28
specialize pow_exists p - L29
specialize pow_exists 2 - L30
exact pow_exists
09Separate the logical casesL31–31
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L31
cases hpower_exists
10Establish hsquareL32–41
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply floor sqrt above root power two strict.
- L32
- L33
specialize floor_sqrt_above_root_power_two_strict (n + n) - L34
specialize floor_sqrt_above_root_power_two_strict s - L35
specialize floor_sqrt_above_root_power_two_strict p - L36
specialize floor_sqrt_above_root_power_two_strict x - L37
apply floor_sqrt_above_root_power_two_strict - L38
exact hfloor - L39
exact habove - L40
exact hpower_exists_witness - L41
specialize central_binom_prime_square_tail_valuation_le_one p
11Use earlier factsL42–51
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L42
specialize central_binom_prime_square_tail_valuation_le_one n - L43
specialize central_binom_prime_square_tail_valuation_le_one C - L44
specialize central_binom_prime_square_tail_valuation_le_one v - L45
specialize central_binom_prime_square_tail_valuation_le_one x - L46
apply central_binom_prime_square_tail_valuation_le_one - L47
exact hp - L48
exact hone_le - L49
exact hcentral - L50
exact hvaluation - L51
exact hpower_exists_witness
12Use earlier factsL52–52
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L52
exact hsquare
Original defined command ledger · 52 lines
- 0001
intro p - 0002
intro n - 0003
intro C - 0004
intro v - 0005
intro s - 0006
intro hp - 0007
intro hpositive - 0008
intro hcentral - 0009
intro hvaluation - 0010
intro hfloor - 0011
intro habove - 0012
have htwo_le : Lt(1,n)Exact native replay line
have htwo_le : exists bcf_le_gap_bcpafs_vlo_two_le. bcf_le_gap_bcpafs_vlo_two_le + (2) = n - 0013
specialize lt_to_le 2 - 0014
specialize lt_to_le n - 0015
apply lt_to_le - 0016
exact hpositive - 0017
have hone_two : Lt(0,2)Exact native replay line
have hone_two : exists bcf_le_gap_bcpafs_vlo_one_two. bcf_le_gap_bcpafs_vlo_one_two + (1) = 2 - 0018
exists 1 - 0019
norm_num - 0020
have hone_le : Lt(0,n)Exact native replay line
have hone_le : exists bcf_le_gap_bcpafs_vlo_one_le. bcf_le_gap_bcpafs_vlo_one_le + (1) = n - 0021
specialize le_trans 1 - 0022
specialize le_trans 2 - 0023
specialize le_trans n - 0024
apply le_trans - 0025
exact hone_two - 0026
exact htwo_le - 0027
have hpower_exists : ∃ t. Pow(p,2,t)Exact native replay line
have 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)))))))) - 0028
specialize pow_exists p - 0029
specialize pow_exists 2 - 0030
exact pow_exists - 0031
cases hpower_exists - 0032
have hsquare : Lt(n + n,x)Exact native replay line
have hsquare : exists bcf_lt_gap_bcpafs_vlo_square. bcf_lt_gap_bcpafs_vlo_square + S (n + n) = x - 0033
specialize floor_sqrt_above_root_power_two_strict (n + n) - 0034
specialize floor_sqrt_above_root_power_two_strict s - 0035
specialize floor_sqrt_above_root_power_two_strict p - 0036
specialize floor_sqrt_above_root_power_two_strict x - 0037
apply floor_sqrt_above_root_power_two_strict - 0038
exact hfloor - 0039
exact habove - 0040
exact hpower_exists_witness - 0041
specialize central_binom_prime_square_tail_valuation_le_one p - 0042
specialize central_binom_prime_square_tail_valuation_le_one n - 0043
specialize central_binom_prime_square_tail_valuation_le_one C - 0044
specialize central_binom_prime_square_tail_valuation_le_one v - 0045
specialize central_binom_prime_square_tail_valuation_le_one x - 0046
apply central_binom_prime_square_tail_valuation_le_one - 0047
exact hp - 0048
exact hone_le - 0049
exact hcentral - 0050
exact hvaluation - 0051
exact hpower_exists_witness - 0052
exact hsquare