TS003Q

prime_power_valuation_square_factor_preserves_evenness

Alpha v34 independently verified · alpha_closed; checked-use authorized; not Stable

A square-factor valuation step preserves constructive evenness of a nonzero quotient's prime valuation.

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.

Exact expanded first-order arithmetic statement

forall p z n e f g k. ((~(p = 1) /\ forall frm_prime_left_ftsv_prime frm_prime_right_ftsv_prime. p = frm_prime_left_ftsv_prime * frm_prime_right_ftsv_prime -> frm_prime_left_ftsv_prime = 1 \/ frm_prime_right_ftsv_prime = 1)) -> ~(z = 0) -> ~(n = 0) -> (((exists bpv_gap_ftsv_shift_factor_exponent_bound. bpv_gap_ftsv_shift_factor_exponent_bound + e = z) /\ (exists bpv_result_ftsv_shift_factor_selected. ((exists ff_b_ftsv_shift_factor_selected_power ff_c_ftsv_shift_factor_selected_power. ((forall ff_i_ftsv_shift_factor_selected_power_repeat. (exists ff_lt_ftsv_shift_factor_selected_power_repeat_bound. ff_lt_ftsv_shift_factor_selected_power_repeat_bound + S ff_i_ftsv_shift_factor_selected_power_repeat = e) -> (((exists ff_h_ftsv_shift_factor_selected_power_repeat_decoded. ff_h_ftsv_shift_factor_selected_power_repeat_decoded + S (p) = S ((S (ff_i_ftsv_shift_factor_selected_power_repeat)) * ff_c_ftsv_shift_factor_selected_power)) /\ exists ff_q_ftsv_shift_factor_selected_power_repeat_decoded. ff_b_ftsv_shift_factor_selected_power = ff_q_ftsv_shift_factor_selected_power_repeat_decoded * S ((S (ff_i_ftsv_shift_factor_selected_power_repeat)) * ff_c_ftsv_shift_factor_selected_power) + (p)))) /\ (exists ff_u_ftsv_shift_factor_selected_power_product ff_v_ftsv_shift_factor_selected_power_product. ((((exists ff_h_ftsv_shift_factor_selected_power_product_start. ff_h_ftsv_shift_factor_selected_power_product_start + S (1) = S ((S (0)) * ff_v_ftsv_shift_factor_selected_power_product)) /\ exists ff_q_ftsv_shift_factor_selected_power_product_start. ff_u_ftsv_shift_factor_selected_power_product = ff_q_ftsv_shift_factor_selected_power_product_start * S ((S (0)) * ff_v_ftsv_shift_factor_selected_power_product) + (1))) /\ ((((exists ff_h_ftsv_shift_factor_selected_power_product_terminal. ff_h_ftsv_shift_factor_selected_power_product_terminal + S (bpv_result_ftsv_shift_factor_selected) = S ((S (e)) * ff_v_ftsv_shift_factor_selected_power_product)) /\ exists ff_q_ftsv_shift_factor_selected_power_product_terminal. ff_u_ftsv_shift_factor_selected_power_product = ff_q_ftsv_shift_factor_selected_power_product_terminal * S ((S (e)) * ff_v_ftsv_shift_factor_selected_power_product) + (bpv_result_ftsv_shift_factor_selected))) /\ forall ff_i_ftsv_shift_factor_selected_power_product. (exists ff_lt_ftsv_shift_factor_selected_power_product_bound. ff_lt_ftsv_shift_factor_selected_power_product_bound + S ff_i_ftsv_shift_factor_selected_power_product = e) -> exists ff_p_ftsv_shift_factor_selected_power_product ff_r_ftsv_shift_factor_selected_power_product ff_s_ftsv_shift_factor_selected_power_product. ((((exists ff_h_ftsv_shift_factor_selected_power_product_factor. ff_h_ftsv_shift_factor_selected_power_product_factor + S (ff_p_ftsv_shift_factor_selected_power_product) = S ((S (ff_i_ftsv_shift_factor_selected_power_product)) * ff_c_ftsv_shift_factor_selected_power)) /\ exists ff_q_ftsv_shift_factor_selected_power_product_factor. ff_b_ftsv_shift_factor_selected_power = ff_q_ftsv_shift_factor_selected_power_product_factor * S ((S (ff_i_ftsv_shift_factor_selected_power_product)) * ff_c_ftsv_shift_factor_selected_power) + (ff_p_ftsv_shift_factor_selected_power_product))) /\ ((((exists ff_h_ftsv_shift_factor_selected_power_product_partial. ff_h_ftsv_shift_factor_selected_power_product_partial + S (ff_r_ftsv_shift_factor_selected_power_product) = S ((S (ff_i_ftsv_shift_factor_selected_power_product)) * ff_v_ftsv_shift_factor_selected_power_product)) /\ exists ff_q_ftsv_shift_factor_selected_power_product_partial. ff_u_ftsv_shift_factor_selected_power_product = ff_q_ftsv_shift_factor_selected_power_product_partial * S ((S (ff_i_ftsv_shift_factor_selected_power_product)) * ff_v_ftsv_shift_factor_selected_power_product) + (ff_r_ftsv_shift_factor_selected_power_product))) /\ ((((exists ff_h_ftsv_shift_factor_selected_power_product_successor. ff_h_ftsv_shift_factor_selected_power_product_successor + S (ff_s_ftsv_shift_factor_selected_power_product) = S ((S (S ff_i_ftsv_shift_factor_selected_power_product)) * ff_v_ftsv_shift_factor_selected_power_product)) /\ exists ff_q_ftsv_shift_factor_selected_power_product_successor. ff_u_ftsv_shift_factor_selected_power_product = ff_q_ftsv_shift_factor_selected_power_product_successor * S ((S (S ff_i_ftsv_shift_factor_selected_power_product)) * ff_v_ftsv_shift_factor_selected_power_product) + (ff_s_ftsv_shift_factor_selected_power_product))) /\ ff_s_ftsv_shift_factor_selected_power_product = ff_r_ftsv_shift_factor_selected_power_product * ff_p_ftsv_shift_factor_selected_power_product)))))))) /\ (exists bpv_factor_ftsv_shift_factor_selected_divides. z = bpv_result_ftsv_shift_factor_selected * bpv_factor_ftsv_shift_factor_selected_divides)))) /\ forall bpv_candidate_ftsv_shift_factor. (exists bpv_gap_ftsv_shift_factor_candidate_bound. bpv_gap_ftsv_shift_factor_candidate_bound + bpv_candidate_ftsv_shift_factor = z) -> (exists bpv_result_ftsv_shift_factor_candidate. ((exists ff_b_ftsv_shift_factor_candidate_power ff_c_ftsv_shift_factor_candidate_power. ((forall ff_i_ftsv_shift_factor_candidate_power_repeat. (exists ff_lt_ftsv_shift_factor_candidate_power_repeat_bound. ff_lt_ftsv_shift_factor_candidate_power_repeat_bound + S ff_i_ftsv_shift_factor_candidate_power_repeat = bpv_candidate_ftsv_shift_factor) -> (((exists ff_h_ftsv_shift_factor_candidate_power_repeat_decoded. ff_h_ftsv_shift_factor_candidate_power_repeat_decoded + S (p) = S ((S (ff_i_ftsv_shift_factor_candidate_power_repeat)) * ff_c_ftsv_shift_factor_candidate_power)) /\ exists ff_q_ftsv_shift_factor_candidate_power_repeat_decoded. ff_b_ftsv_shift_factor_candidate_power = ff_q_ftsv_shift_factor_candidate_power_repeat_decoded * S ((S (ff_i_ftsv_shift_factor_candidate_power_repeat)) * ff_c_ftsv_shift_factor_candidate_power) + (p)))) /\ (exists ff_u_ftsv_shift_factor_candidate_power_product ff_v_ftsv_shift_factor_candidate_power_product. ((((exists ff_h_ftsv_shift_factor_candidate_power_product_start. ff_h_ftsv_shift_factor_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_ftsv_shift_factor_candidate_power_product)) /\ exists ff_q_ftsv_shift_factor_candidate_power_product_start. ff_u_ftsv_shift_factor_candidate_power_product = ff_q_ftsv_shift_factor_candidate_power_product_start * S ((S (0)) * ff_v_ftsv_shift_factor_candidate_power_product) + (1))) /\ ((((exists ff_h_ftsv_shift_factor_candidate_power_product_terminal. ff_h_ftsv_shift_factor_candidate_power_product_terminal + S (bpv_result_ftsv_shift_factor_candidate) = S ((S (bpv_candidate_ftsv_shift_factor)) * ff_v_ftsv_shift_factor_candidate_power_product)) /\ exists ff_q_ftsv_shift_factor_candidate_power_product_terminal. ff_u_ftsv_shift_factor_candidate_power_product = ff_q_ftsv_shift_factor_candidate_power_product_terminal * S ((S (bpv_candidate_ftsv_shift_factor)) * ff_v_ftsv_shift_factor_candidate_power_product) + (bpv_result_ftsv_shift_factor_candidate))) /\ forall ff_i_ftsv_shift_factor_candidate_power_product. (exists ff_lt_ftsv_shift_factor_candidate_power_product_bound. ff_lt_ftsv_shift_factor_candidate_power_product_bound + S ff_i_ftsv_shift_factor_candidate_power_product = bpv_candidate_ftsv_shift_factor) -> exists ff_p_ftsv_shift_factor_candidate_power_product ff_r_ftsv_shift_factor_candidate_power_product ff_s_ftsv_shift_factor_candidate_power_product. ((((exists ff_h_ftsv_shift_factor_candidate_power_product_factor. ff_h_ftsv_shift_factor_candidate_power_product_factor + S (ff_p_ftsv_shift_factor_candidate_power_product) = S ((S (ff_i_ftsv_shift_factor_candidate_power_product)) * ff_c_ftsv_shift_factor_candidate_power)) /\ exists ff_q_ftsv_shift_factor_candidate_power_product_factor. ff_b_ftsv_shift_factor_candidate_power = ff_q_ftsv_shift_factor_candidate_power_product_factor * S ((S (ff_i_ftsv_shift_factor_candidate_power_product)) * ff_c_ftsv_shift_factor_candidate_power) + (ff_p_ftsv_shift_factor_candidate_power_product))) /\ ((((exists ff_h_ftsv_shift_factor_candidate_power_product_partial. ff_h_ftsv_shift_factor_candidate_power_product_partial + S (ff_r_ftsv_shift_factor_candidate_power_product) = S ((S (ff_i_ftsv_shift_factor_candidate_power_product)) * ff_v_ftsv_shift_factor_candidate_power_product)) /\ exists ff_q_ftsv_shift_factor_candidate_power_product_partial. ff_u_ftsv_shift_factor_candidate_power_product = ff_q_ftsv_shift_factor_candidate_power_product_partial * S ((S (ff_i_ftsv_shift_factor_candidate_power_product)) * ff_v_ftsv_shift_factor_candidate_power_product) + (ff_r_ftsv_shift_factor_candidate_power_product))) /\ ((((exists ff_h_ftsv_shift_factor_candidate_power_product_successor. ff_h_ftsv_shift_factor_candidate_power_product_successor + S (ff_s_ftsv_shift_factor_candidate_power_product) = S ((S (S ff_i_ftsv_shift_factor_candidate_power_product)) * ff_v_ftsv_shift_factor_candidate_power_product)) /\ exists ff_q_ftsv_shift_factor_candidate_power_product_successor. ff_u_ftsv_shift_factor_candidate_power_product = ff_q_ftsv_shift_factor_candidate_power_product_successor * S ((S (S ff_i_ftsv_shift_factor_candidate_power_product)) * ff_v_ftsv_shift_factor_candidate_power_product) + (ff_s_ftsv_shift_factor_candidate_power_product))) /\ ff_s_ftsv_shift_factor_candidate_power_product = ff_r_ftsv_shift_factor_candidate_power_product * ff_p_ftsv_shift_factor_candidate_power_product)))))))) /\ (exists bpv_factor_ftsv_shift_factor_candidate_divides. z = bpv_result_ftsv_shift_factor_candidate * bpv_factor_ftsv_shift_factor_candidate_divides))) -> (exists bpv_gap_ftsv_shift_factor_maximal. bpv_gap_ftsv_shift_factor_maximal + bpv_candidate_ftsv_shift_factor = e)) -> (((exists bpv_gap_ftsv_shift_value_exponent_bound. bpv_gap_ftsv_shift_value_exponent_bound + f = n) /\ (exists bpv_result_ftsv_shift_value_selected. ((exists ff_b_ftsv_shift_value_selected_power ff_c_ftsv_shift_value_selected_power. ((forall ff_i_ftsv_shift_value_selected_power_repeat. (exists ff_lt_ftsv_shift_value_selected_power_repeat_bound. ff_lt_ftsv_shift_value_selected_power_repeat_bound + S ff_i_ftsv_shift_value_selected_power_repeat = f) -> (((exists ff_h_ftsv_shift_value_selected_power_repeat_decoded. ff_h_ftsv_shift_value_selected_power_repeat_decoded + S (p) = S ((S (ff_i_ftsv_shift_value_selected_power_repeat)) * ff_c_ftsv_shift_value_selected_power)) /\ exists ff_q_ftsv_shift_value_selected_power_repeat_decoded. ff_b_ftsv_shift_value_selected_power = ff_q_ftsv_shift_value_selected_power_repeat_decoded * S ((S (ff_i_ftsv_shift_value_selected_power_repeat)) * ff_c_ftsv_shift_value_selected_power) + (p)))) /\ (exists ff_u_ftsv_shift_value_selected_power_product ff_v_ftsv_shift_value_selected_power_product. ((((exists ff_h_ftsv_shift_value_selected_power_product_start. ff_h_ftsv_shift_value_selected_power_product_start + S (1) = S ((S (0)) * ff_v_ftsv_shift_value_selected_power_product)) /\ exists ff_q_ftsv_shift_value_selected_power_product_start. ff_u_ftsv_shift_value_selected_power_product = ff_q_ftsv_shift_value_selected_power_product_start * S ((S (0)) * ff_v_ftsv_shift_value_selected_power_product) + (1))) /\ ((((exists ff_h_ftsv_shift_value_selected_power_product_terminal. ff_h_ftsv_shift_value_selected_power_product_terminal + S (bpv_result_ftsv_shift_value_selected) = S ((S (f)) * ff_v_ftsv_shift_value_selected_power_product)) /\ exists ff_q_ftsv_shift_value_selected_power_product_terminal. ff_u_ftsv_shift_value_selected_power_product = ff_q_ftsv_shift_value_selected_power_product_terminal * S ((S (f)) * ff_v_ftsv_shift_value_selected_power_product) + (bpv_result_ftsv_shift_value_selected))) /\ forall ff_i_ftsv_shift_value_selected_power_product. (exists ff_lt_ftsv_shift_value_selected_power_product_bound. ff_lt_ftsv_shift_value_selected_power_product_bound + S ff_i_ftsv_shift_value_selected_power_product = f) -> exists ff_p_ftsv_shift_value_selected_power_product ff_r_ftsv_shift_value_selected_power_product ff_s_ftsv_shift_value_selected_power_product. ((((exists ff_h_ftsv_shift_value_selected_power_product_factor. ff_h_ftsv_shift_value_selected_power_product_factor + S (ff_p_ftsv_shift_value_selected_power_product) = S ((S (ff_i_ftsv_shift_value_selected_power_product)) * ff_c_ftsv_shift_value_selected_power)) /\ exists ff_q_ftsv_shift_value_selected_power_product_factor. ff_b_ftsv_shift_value_selected_power = ff_q_ftsv_shift_value_selected_power_product_factor * S ((S (ff_i_ftsv_shift_value_selected_power_product)) * ff_c_ftsv_shift_value_selected_power) + (ff_p_ftsv_shift_value_selected_power_product))) /\ ((((exists ff_h_ftsv_shift_value_selected_power_product_partial. ff_h_ftsv_shift_value_selected_power_product_partial + S (ff_r_ftsv_shift_value_selected_power_product) = S ((S (ff_i_ftsv_shift_value_selected_power_product)) * ff_v_ftsv_shift_value_selected_power_product)) /\ exists ff_q_ftsv_shift_value_selected_power_product_partial. ff_u_ftsv_shift_value_selected_power_product = ff_q_ftsv_shift_value_selected_power_product_partial * S ((S (ff_i_ftsv_shift_value_selected_power_product)) * ff_v_ftsv_shift_value_selected_power_product) + (ff_r_ftsv_shift_value_selected_power_product))) /\ ((((exists ff_h_ftsv_shift_value_selected_power_product_successor. ff_h_ftsv_shift_value_selected_power_product_successor + S (ff_s_ftsv_shift_value_selected_power_product) = S ((S (S ff_i_ftsv_shift_value_selected_power_product)) * ff_v_ftsv_shift_value_selected_power_product)) /\ exists ff_q_ftsv_shift_value_selected_power_product_successor. ff_u_ftsv_shift_value_selected_power_product = ff_q_ftsv_shift_value_selected_power_product_successor * S ((S (S ff_i_ftsv_shift_value_selected_power_product)) * ff_v_ftsv_shift_value_selected_power_product) + (ff_s_ftsv_shift_value_selected_power_product))) /\ ff_s_ftsv_shift_value_selected_power_product = ff_r_ftsv_shift_value_selected_power_product * ff_p_ftsv_shift_value_selected_power_product)))))))) /\ (exists bpv_factor_ftsv_shift_value_selected_divides. n = bpv_result_ftsv_shift_value_selected * bpv_factor_ftsv_shift_value_selected_divides)))) /\ forall bpv_candidate_ftsv_shift_value. (exists bpv_gap_ftsv_shift_value_candidate_bound. bpv_gap_ftsv_shift_value_candidate_bound + bpv_candidate_ftsv_shift_value = n) -> (exists bpv_result_ftsv_shift_value_candidate. ((exists ff_b_ftsv_shift_value_candidate_power ff_c_ftsv_shift_value_candidate_power. ((forall ff_i_ftsv_shift_value_candidate_power_repeat. (exists ff_lt_ftsv_shift_value_candidate_power_repeat_bound. ff_lt_ftsv_shift_value_candidate_power_repeat_bound + S ff_i_ftsv_shift_value_candidate_power_repeat = bpv_candidate_ftsv_shift_value) -> (((exists ff_h_ftsv_shift_value_candidate_power_repeat_decoded. ff_h_ftsv_shift_value_candidate_power_repeat_decoded + S (p) = S ((S (ff_i_ftsv_shift_value_candidate_power_repeat)) * ff_c_ftsv_shift_value_candidate_power)) /\ exists ff_q_ftsv_shift_value_candidate_power_repeat_decoded. ff_b_ftsv_shift_value_candidate_power = ff_q_ftsv_shift_value_candidate_power_repeat_decoded * S ((S (ff_i_ftsv_shift_value_candidate_power_repeat)) * ff_c_ftsv_shift_value_candidate_power) + (p)))) /\ (exists ff_u_ftsv_shift_value_candidate_power_product ff_v_ftsv_shift_value_candidate_power_product. ((((exists ff_h_ftsv_shift_value_candidate_power_product_start. ff_h_ftsv_shift_value_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_ftsv_shift_value_candidate_power_product)) /\ exists ff_q_ftsv_shift_value_candidate_power_product_start. ff_u_ftsv_shift_value_candidate_power_product = ff_q_ftsv_shift_value_candidate_power_product_start * S ((S (0)) * ff_v_ftsv_shift_value_candidate_power_product) + (1))) /\ ((((exists ff_h_ftsv_shift_value_candidate_power_product_terminal. ff_h_ftsv_shift_value_candidate_power_product_terminal + S (bpv_result_ftsv_shift_value_candidate) = S ((S (bpv_candidate_ftsv_shift_value)) * ff_v_ftsv_shift_value_candidate_power_product)) /\ exists ff_q_ftsv_shift_value_candidate_power_product_terminal. ff_u_ftsv_shift_value_candidate_power_product = ff_q_ftsv_shift_value_candidate_power_product_terminal * S ((S (bpv_candidate_ftsv_shift_value)) * ff_v_ftsv_shift_value_candidate_power_product) + (bpv_result_ftsv_shift_value_candidate))) /\ forall ff_i_ftsv_shift_value_candidate_power_product. (exists ff_lt_ftsv_shift_value_candidate_power_product_bound. ff_lt_ftsv_shift_value_candidate_power_product_bound + S ff_i_ftsv_shift_value_candidate_power_product = bpv_candidate_ftsv_shift_value) -> exists ff_p_ftsv_shift_value_candidate_power_product ff_r_ftsv_shift_value_candidate_power_product ff_s_ftsv_shift_value_candidate_power_product. ((((exists ff_h_ftsv_shift_value_candidate_power_product_factor. ff_h_ftsv_shift_value_candidate_power_product_factor + S (ff_p_ftsv_shift_value_candidate_power_product) = S ((S (ff_i_ftsv_shift_value_candidate_power_product)) * ff_c_ftsv_shift_value_candidate_power)) /\ exists ff_q_ftsv_shift_value_candidate_power_product_factor. ff_b_ftsv_shift_value_candidate_power = ff_q_ftsv_shift_value_candidate_power_product_factor * S ((S (ff_i_ftsv_shift_value_candidate_power_product)) * ff_c_ftsv_shift_value_candidate_power) + (ff_p_ftsv_shift_value_candidate_power_product))) /\ ((((exists ff_h_ftsv_shift_value_candidate_power_product_partial. ff_h_ftsv_shift_value_candidate_power_product_partial + S (ff_r_ftsv_shift_value_candidate_power_product) = S ((S (ff_i_ftsv_shift_value_candidate_power_product)) * ff_v_ftsv_shift_value_candidate_power_product)) /\ exists ff_q_ftsv_shift_value_candidate_power_product_partial. ff_u_ftsv_shift_value_candidate_power_product = ff_q_ftsv_shift_value_candidate_power_product_partial * S ((S (ff_i_ftsv_shift_value_candidate_power_product)) * ff_v_ftsv_shift_value_candidate_power_product) + (ff_r_ftsv_shift_value_candidate_power_product))) /\ ((((exists ff_h_ftsv_shift_value_candidate_power_product_successor. ff_h_ftsv_shift_value_candidate_power_product_successor + S (ff_s_ftsv_shift_value_candidate_power_product) = S ((S (S ff_i_ftsv_shift_value_candidate_power_product)) * ff_v_ftsv_shift_value_candidate_power_product)) /\ exists ff_q_ftsv_shift_value_candidate_power_product_successor. ff_u_ftsv_shift_value_candidate_power_product = ff_q_ftsv_shift_value_candidate_power_product_successor * S ((S (S ff_i_ftsv_shift_value_candidate_power_product)) * ff_v_ftsv_shift_value_candidate_power_product) + (ff_s_ftsv_shift_value_candidate_power_product))) /\ ff_s_ftsv_shift_value_candidate_power_product = ff_r_ftsv_shift_value_candidate_power_product * ff_p_ftsv_shift_value_candidate_power_product)))))))) /\ (exists bpv_factor_ftsv_shift_value_candidate_divides. n = bpv_result_ftsv_shift_value_candidate * bpv_factor_ftsv_shift_value_candidate_divides))) -> (exists bpv_gap_ftsv_shift_value_maximal. bpv_gap_ftsv_shift_value_maximal + bpv_candidate_ftsv_shift_value = f)) -> (((exists bpv_gap_ftsv_shift_product_exponent_bound. bpv_gap_ftsv_shift_product_exponent_bound + g = ((z * z) * n)) /\ (exists bpv_result_ftsv_shift_product_selected. ((exists ff_b_ftsv_shift_product_selected_power ff_c_ftsv_shift_product_selected_power. ((forall ff_i_ftsv_shift_product_selected_power_repeat. (exists ff_lt_ftsv_shift_product_selected_power_repeat_bound. ff_lt_ftsv_shift_product_selected_power_repeat_bound + S ff_i_ftsv_shift_product_selected_power_repeat = g) -> (((exists ff_h_ftsv_shift_product_selected_power_repeat_decoded. ff_h_ftsv_shift_product_selected_power_repeat_decoded + S (p) = S ((S (ff_i_ftsv_shift_product_selected_power_repeat)) * ff_c_ftsv_shift_product_selected_power)) /\ exists ff_q_ftsv_shift_product_selected_power_repeat_decoded. ff_b_ftsv_shift_product_selected_power = ff_q_ftsv_shift_product_selected_power_repeat_decoded * S ((S (ff_i_ftsv_shift_product_selected_power_repeat)) * ff_c_ftsv_shift_product_selected_power) + (p)))) /\ (exists ff_u_ftsv_shift_product_selected_power_product ff_v_ftsv_shift_product_selected_power_product. ((((exists ff_h_ftsv_shift_product_selected_power_product_start. ff_h_ftsv_shift_product_selected_power_product_start + S (1) = S ((S (0)) * ff_v_ftsv_shift_product_selected_power_product)) /\ exists ff_q_ftsv_shift_product_selected_power_product_start. ff_u_ftsv_shift_product_selected_power_product = ff_q_ftsv_shift_product_selected_power_product_start * S ((S (0)) * ff_v_ftsv_shift_product_selected_power_product) + (1))) /\ ((((exists ff_h_ftsv_shift_product_selected_power_product_terminal. ff_h_ftsv_shift_product_selected_power_product_terminal + S (bpv_result_ftsv_shift_product_selected) = S ((S (g)) * ff_v_ftsv_shift_product_selected_power_product)) /\ exists ff_q_ftsv_shift_product_selected_power_product_terminal. ff_u_ftsv_shift_product_selected_power_product = ff_q_ftsv_shift_product_selected_power_product_terminal * S ((S (g)) * ff_v_ftsv_shift_product_selected_power_product) + (bpv_result_ftsv_shift_product_selected))) /\ forall ff_i_ftsv_shift_product_selected_power_product. (exists ff_lt_ftsv_shift_product_selected_power_product_bound. ff_lt_ftsv_shift_product_selected_power_product_bound + S ff_i_ftsv_shift_product_selected_power_product = g) -> exists ff_p_ftsv_shift_product_selected_power_product ff_r_ftsv_shift_product_selected_power_product ff_s_ftsv_shift_product_selected_power_product. ((((exists ff_h_ftsv_shift_product_selected_power_product_factor. ff_h_ftsv_shift_product_selected_power_product_factor + S (ff_p_ftsv_shift_product_selected_power_product) = S ((S (ff_i_ftsv_shift_product_selected_power_product)) * ff_c_ftsv_shift_product_selected_power)) /\ exists ff_q_ftsv_shift_product_selected_power_product_factor. ff_b_ftsv_shift_product_selected_power = ff_q_ftsv_shift_product_selected_power_product_factor * S ((S (ff_i_ftsv_shift_product_selected_power_product)) * ff_c_ftsv_shift_product_selected_power) + (ff_p_ftsv_shift_product_selected_power_product))) /\ ((((exists ff_h_ftsv_shift_product_selected_power_product_partial. ff_h_ftsv_shift_product_selected_power_product_partial + S (ff_r_ftsv_shift_product_selected_power_product) = S ((S (ff_i_ftsv_shift_product_selected_power_product)) * ff_v_ftsv_shift_product_selected_power_product)) /\ exists ff_q_ftsv_shift_product_selected_power_product_partial. ff_u_ftsv_shift_product_selected_power_product = ff_q_ftsv_shift_product_selected_power_product_partial * S ((S (ff_i_ftsv_shift_product_selected_power_product)) * ff_v_ftsv_shift_product_selected_power_product) + (ff_r_ftsv_shift_product_selected_power_product))) /\ ((((exists ff_h_ftsv_shift_product_selected_power_product_successor. ff_h_ftsv_shift_product_selected_power_product_successor + S (ff_s_ftsv_shift_product_selected_power_product) = S ((S (S ff_i_ftsv_shift_product_selected_power_product)) * ff_v_ftsv_shift_product_selected_power_product)) /\ exists ff_q_ftsv_shift_product_selected_power_product_successor. ff_u_ftsv_shift_product_selected_power_product = ff_q_ftsv_shift_product_selected_power_product_successor * S ((S (S ff_i_ftsv_shift_product_selected_power_product)) * ff_v_ftsv_shift_product_selected_power_product) + (ff_s_ftsv_shift_product_selected_power_product))) /\ ff_s_ftsv_shift_product_selected_power_product = ff_r_ftsv_shift_product_selected_power_product * ff_p_ftsv_shift_product_selected_power_product)))))))) /\ (exists bpv_factor_ftsv_shift_product_selected_divides. ((z * z) * n) = bpv_result_ftsv_shift_product_selected * bpv_factor_ftsv_shift_product_selected_divides)))) /\ forall bpv_candidate_ftsv_shift_product. (exists bpv_gap_ftsv_shift_product_candidate_bound. bpv_gap_ftsv_shift_product_candidate_bound + bpv_candidate_ftsv_shift_product = ((z * z) * n)) -> (exists bpv_result_ftsv_shift_product_candidate. ((exists ff_b_ftsv_shift_product_candidate_power ff_c_ftsv_shift_product_candidate_power. ((forall ff_i_ftsv_shift_product_candidate_power_repeat. (exists ff_lt_ftsv_shift_product_candidate_power_repeat_bound. ff_lt_ftsv_shift_product_candidate_power_repeat_bound + S ff_i_ftsv_shift_product_candidate_power_repeat = bpv_candidate_ftsv_shift_product) -> (((exists ff_h_ftsv_shift_product_candidate_power_repeat_decoded. ff_h_ftsv_shift_product_candidate_power_repeat_decoded + S (p) = S ((S (ff_i_ftsv_shift_product_candidate_power_repeat)) * ff_c_ftsv_shift_product_candidate_power)) /\ exists ff_q_ftsv_shift_product_candidate_power_repeat_decoded. ff_b_ftsv_shift_product_candidate_power = ff_q_ftsv_shift_product_candidate_power_repeat_decoded * S ((S (ff_i_ftsv_shift_product_candidate_power_repeat)) * ff_c_ftsv_shift_product_candidate_power) + (p)))) /\ (exists ff_u_ftsv_shift_product_candidate_power_product ff_v_ftsv_shift_product_candidate_power_product. ((((exists ff_h_ftsv_shift_product_candidate_power_product_start. ff_h_ftsv_shift_product_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_ftsv_shift_product_candidate_power_product)) /\ exists ff_q_ftsv_shift_product_candidate_power_product_start. ff_u_ftsv_shift_product_candidate_power_product = ff_q_ftsv_shift_product_candidate_power_product_start * S ((S (0)) * ff_v_ftsv_shift_product_candidate_power_product) + (1))) /\ ((((exists ff_h_ftsv_shift_product_candidate_power_product_terminal. ff_h_ftsv_shift_product_candidate_power_product_terminal + S (bpv_result_ftsv_shift_product_candidate) = S ((S (bpv_candidate_ftsv_shift_product)) * ff_v_ftsv_shift_product_candidate_power_product)) /\ exists ff_q_ftsv_shift_product_candidate_power_product_terminal. ff_u_ftsv_shift_product_candidate_power_product = ff_q_ftsv_shift_product_candidate_power_product_terminal * S ((S (bpv_candidate_ftsv_shift_product)) * ff_v_ftsv_shift_product_candidate_power_product) + (bpv_result_ftsv_shift_product_candidate))) /\ forall ff_i_ftsv_shift_product_candidate_power_product. (exists ff_lt_ftsv_shift_product_candidate_power_product_bound. ff_lt_ftsv_shift_product_candidate_power_product_bound + S ff_i_ftsv_shift_product_candidate_power_product = bpv_candidate_ftsv_shift_product) -> exists ff_p_ftsv_shift_product_candidate_power_product ff_r_ftsv_shift_product_candidate_power_product ff_s_ftsv_shift_product_candidate_power_product. ((((exists ff_h_ftsv_shift_product_candidate_power_product_factor. ff_h_ftsv_shift_product_candidate_power_product_factor + S (ff_p_ftsv_shift_product_candidate_power_product) = S ((S (ff_i_ftsv_shift_product_candidate_power_product)) * ff_c_ftsv_shift_product_candidate_power)) /\ exists ff_q_ftsv_shift_product_candidate_power_product_factor. ff_b_ftsv_shift_product_candidate_power = ff_q_ftsv_shift_product_candidate_power_product_factor * S ((S (ff_i_ftsv_shift_product_candidate_power_product)) * ff_c_ftsv_shift_product_candidate_power) + (ff_p_ftsv_shift_product_candidate_power_product))) /\ ((((exists ff_h_ftsv_shift_product_candidate_power_product_partial. ff_h_ftsv_shift_product_candidate_power_product_partial + S (ff_r_ftsv_shift_product_candidate_power_product) = S ((S (ff_i_ftsv_shift_product_candidate_power_product)) * ff_v_ftsv_shift_product_candidate_power_product)) /\ exists ff_q_ftsv_shift_product_candidate_power_product_partial. ff_u_ftsv_shift_product_candidate_power_product = ff_q_ftsv_shift_product_candidate_power_product_partial * S ((S (ff_i_ftsv_shift_product_candidate_power_product)) * ff_v_ftsv_shift_product_candidate_power_product) + (ff_r_ftsv_shift_product_candidate_power_product))) /\ ((((exists ff_h_ftsv_shift_product_candidate_power_product_successor. ff_h_ftsv_shift_product_candidate_power_product_successor + S (ff_s_ftsv_shift_product_candidate_power_product) = S ((S (S ff_i_ftsv_shift_product_candidate_power_product)) * ff_v_ftsv_shift_product_candidate_power_product)) /\ exists ff_q_ftsv_shift_product_candidate_power_product_successor. ff_u_ftsv_shift_product_candidate_power_product = ff_q_ftsv_shift_product_candidate_power_product_successor * S ((S (S ff_i_ftsv_shift_product_candidate_power_product)) * ff_v_ftsv_shift_product_candidate_power_product) + (ff_s_ftsv_shift_product_candidate_power_product))) /\ ff_s_ftsv_shift_product_candidate_power_product = ff_r_ftsv_shift_product_candidate_power_product * ff_p_ftsv_shift_product_candidate_power_product)))))))) /\ (exists bpv_factor_ftsv_shift_product_candidate_divides. ((z * z) * n) = bpv_result_ftsv_shift_product_candidate * bpv_factor_ftsv_shift_product_candidate_divides))) -> (exists bpv_gap_ftsv_shift_product_maximal. bpv_gap_ftsv_shift_product_maximal + bpv_candidate_ftsv_shift_product = g)) -> f = k + k -> exists h. g = h + h

Constructive proof overview

Generated structural guide

A square-factor valuation step preserves constructive evenness of a nonzero quotient's prime valuation.

The unchanged tactic script uses 2 declared prerequisites and contains 33 exact native proof lines.

dependency-curried kernel-checked theorem body; Alpha enrollment and checked-use authority follow separately sealed release evidence; Stable membership remains unchanged

Proof neighborhood

Direct dependencies

TS003P prime_power_valuation_square_factor_shift add_shuffle_middle Alpha theorem; checked-use authorized

Direct dependents

Formal native tactic body

Dependencies are introduced as named hypotheses before line 1. Local theorem links identify exact declared prerequisites. This exact body belongs to a complete independently kernel-checked constructive proof bundle and has Alpha checked-use authority; it does not imply Stable membership.

Read the argument

Proof checkpoints

33 script commands · 8 reading checkpoints · 1 local claims

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

Named ingredients (1)
01Fix variables and assumptionsL1–10

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

  1. L1
    intro p
  2. L2
    intro z
  3. L3
    intro n
  4. L4
    intro e
  5. L5
    intro f
  6. L6
    intro g
  7. L7
    intro k
  8. L8
    intro hprime
  9. L9
    intro hfactor_nonzero
  10. L10
    intro hvalue_nonzero
02Fix variables and assumptionsL11–14

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

  1. L11
    intro hfactor
  2. L12
    intro hvalue
  3. L13
    intro hproduct
  4. L14
    intro heven
03Establish hshiftL15–24

Establish this local claim before using it. It is not an additional assumption. The following proof commands apply prime power valuation square factor shift.

  1. L15
    have hshift : g = (e + e) + f
  2. L16
    specialize prime_power_valuation_square_factor_shift p
  3. L17
    specialize prime_power_valuation_square_factor_shift z
  4. L18
    specialize prime_power_valuation_square_factor_shift n
  5. L19
    specialize prime_power_valuation_square_factor_shift e
  6. L20
    specialize prime_power_valuation_square_factor_shift f
  7. L21
    specialize prime_power_valuation_square_factor_shift g
  8. L22
    apply prime_power_valuation_square_factor_shift
  9. L23
    exact hprime
  10. L24
    exact hfactor_nonzero
04Use earlier factsL25–28

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

  1. L25
    exact hvalue_nonzero
  2. L26
    exact hfactor
  3. L27
    exact hvalue
  4. L28
    exact hproduct
05Calculate and transport equalitiesL29–29

Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.

  1. L29
    rewrite heven at hshift
06Construct an explicit witnessL30–30

Supply the displayed value, then prove that it has the required property.

  1. L30
    exists e + k
07Calculate and transport equalitiesL31–31

Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.

  1. L31
    trans (e + e) + (k + k)
08Use earlier factsL32–33

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

  1. L32
    exact hshift
  2. L33
    apply add_shuffle_middle

Library-wide reading audit

Original exact command ledger · 33 lines
  1. 0001intro p
  2. 0002intro z
  3. 0003intro n
  4. 0004intro e
  5. 0005intro f
  6. 0006intro g
  7. 0007intro k
  8. 0008intro hprime
  9. 0009intro hfactor_nonzero
  10. 0010intro hvalue_nonzero
  11. 0011intro hfactor
  12. 0012intro hvalue
  13. 0013intro hproduct
  14. 0014intro heven
  15. 0015have hshift : g = (e + e) + f
  16. 0016specialize prime_power_valuation_square_factor_shift p
  17. 0017specialize prime_power_valuation_square_factor_shift z
  18. 0018specialize prime_power_valuation_square_factor_shift n
  19. 0019specialize prime_power_valuation_square_factor_shift e
  20. 0020specialize prime_power_valuation_square_factor_shift f
  21. 0021specialize prime_power_valuation_square_factor_shift g
  22. 0022apply prime_power_valuation_square_factor_shift
  23. 0023exact hprime
  24. 0024exact hfactor_nonzero
  25. 0025exact hvalue_nonzero
  26. 0026exact hfactor
  27. 0027exact hvalue
  28. 0028exact hproduct
  29. 0029rewrite heven at hshift
  30. 0030exists e + k
  31. 0031trans (e + e) + (k + k)
  32. 0032exact hshift
  33. 0033apply add_shuffle_middle