BT0103

prime_contribution_cofactor_eq_one

Alpha body-checked ยท checked-use disabled

A supported contribution cofactor is the multiplicative unit.

Exact expanded PA statement

forall n m z q. ~(n = 0) -> (forall bpr_support_prime_bpcceo_support. ((~(bpr_support_prime_bpcceo_support = 1) /\ forall bpr_left_bpcceo_support_prime bpr_right_bpcceo_support_prime. bpr_support_prime_bpcceo_support = bpr_left_bpcceo_support_prime * bpr_right_bpcceo_support_prime -> bpr_left_bpcceo_support_prime = 1 \/ bpr_right_bpcceo_support_prime = 1)) -> (exists bpr_divides_quotient_bpcceo_support_divides. n = (bpr_support_prime_bpcceo_support) * bpr_divides_quotient_bpcceo_support_divides) -> (exists bpr_le_gap_bpcceo_support_bound. bpr_le_gap_bpcceo_support_bound + (bpr_support_prime_bpcceo_support) = (m))) -> (exists bpr_product_code_bpcceo_product bpr_product_scale_bpcceo_product. ((forall bpr_prefix_index_bpcceo_product_prefix. (exists bpr_gap_bpcceo_product_prefix_bound. bpr_gap_bpcceo_product_prefix_bound + S (bpr_prefix_index_bpcceo_product_prefix) = m) -> exists bpr_prefix_value_bpcceo_product_prefix. ((((exists bpr_height_bpcceo_product_prefix_decoded. bpr_height_bpcceo_product_prefix_decoded + S (bpr_prefix_value_bpcceo_product_prefix) = S ((S (bpr_prefix_index_bpcceo_product_prefix)) * bpr_product_scale_bpcceo_product)) /\ exists bpr_quotient_bpcceo_product_prefix_decoded. bpr_product_code_bpcceo_product = bpr_quotient_bpcceo_product_prefix_decoded * S ((S (bpr_prefix_index_bpcceo_product_prefix)) * bpr_product_scale_bpcceo_product) + (bpr_prefix_value_bpcceo_product_prefix))) /\ (((((~(S (bpr_prefix_index_bpcceo_product_prefix) = 1) /\ forall bpr_left_bpcceo_product_prefix_choice_prime bpr_right_bpcceo_product_prefix_choice_prime. S (bpr_prefix_index_bpcceo_product_prefix) = bpr_left_bpcceo_product_prefix_choice_prime * bpr_right_bpcceo_product_prefix_choice_prime -> bpr_left_bpcceo_product_prefix_choice_prime = 1 \/ bpr_right_bpcceo_product_prefix_choice_prime = 1)) /\ exists bpr_choice_exponent_bpcceo_product_prefix_choice. ((((exists bpr_le_gap_bpcceo_product_prefix_choice_valuation_selected_bound. bpr_le_gap_bpcceo_product_prefix_choice_valuation_selected_bound + (bpr_choice_exponent_bpcceo_product_prefix_choice) = (n)) /\ (exists bpr_power_value_bpcceo_product_prefix_choice_valuation_selected. ((exists bpr_power_code_bpcceo_product_prefix_choice_valuation_selected_power bpr_power_scale_bpcceo_product_prefix_choice_valuation_selected_power. ((forall bpr_power_index_bpcceo_product_prefix_choice_valuation_selected_power. (exists bpr_gap_bpcceo_product_prefix_choice_valuation_selected_power_repeat_bound. bpr_gap_bpcceo_product_prefix_choice_valuation_selected_power_repeat_bound + S (bpr_power_index_bpcceo_product_prefix_choice_valuation_selected_power) = bpr_choice_exponent_bpcceo_product_prefix_choice) -> (((exists bpr_height_bpcceo_product_prefix_choice_valuation_selected_power_repeat_entry. bpr_height_bpcceo_product_prefix_choice_valuation_selected_power_repeat_entry + S (S (bpr_prefix_index_bpcceo_product_prefix)) = S ((S (bpr_power_index_bpcceo_product_prefix_choice_valuation_selected_power)) * bpr_power_scale_bpcceo_product_prefix_choice_valuation_selected_power)) /\ exists bpr_quotient_bpcceo_product_prefix_choice_valuation_selected_power_repeat_entry. bpr_power_code_bpcceo_product_prefix_choice_valuation_selected_power = bpr_quotient_bpcceo_product_prefix_choice_valuation_selected_power_repeat_entry * S ((S (bpr_power_index_bpcceo_product_prefix_choice_valuation_selected_power)) * bpr_power_scale_bpcceo_product_prefix_choice_valuation_selected_power) + (S (bpr_prefix_index_bpcceo_product_prefix))))) /\ (exists ff_u_bpcceo_product_prefix_choice_valuation_selected_power_product ff_v_bpcceo_product_prefix_choice_valuation_selected_power_product. ((((exists ff_h_bpcceo_product_prefix_choice_valuation_selected_power_product_start. ff_h_bpcceo_product_prefix_choice_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_bpcceo_product_prefix_choice_valuation_selected_power_product)) /\ exists ff_q_bpcceo_product_prefix_choice_valuation_selected_power_product_start. ff_u_bpcceo_product_prefix_choice_valuation_selected_power_product = ff_q_bpcceo_product_prefix_choice_valuation_selected_power_product_start * S ((S (0)) * ff_v_bpcceo_product_prefix_choice_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_bpcceo_product_prefix_choice_valuation_selected_power_product_terminal. ff_h_bpcceo_product_prefix_choice_valuation_selected_power_product_terminal + S (bpr_power_value_bpcceo_product_prefix_choice_valuation_selected) = S ((S (bpr_choice_exponent_bpcceo_product_prefix_choice)) * ff_v_bpcceo_product_prefix_choice_valuation_selected_power_product)) /\ exists ff_q_bpcceo_product_prefix_choice_valuation_selected_power_product_terminal. ff_u_bpcceo_product_prefix_choice_valuation_selected_power_product = ff_q_bpcceo_product_prefix_choice_valuation_selected_power_product_terminal * S ((S (bpr_choice_exponent_bpcceo_product_prefix_choice)) * ff_v_bpcceo_product_prefix_choice_valuation_selected_power_product) + (bpr_power_value_bpcceo_product_prefix_choice_valuation_selected))) /\ forall ff_i_bpcceo_product_prefix_choice_valuation_selected_power_product. (exists ff_lt_bpcceo_product_prefix_choice_valuation_selected_power_product_bound. ff_lt_bpcceo_product_prefix_choice_valuation_selected_power_product_bound + S ff_i_bpcceo_product_prefix_choice_valuation_selected_power_product = bpr_choice_exponent_bpcceo_product_prefix_choice) -> exists ff_p_bpcceo_product_prefix_choice_valuation_selected_power_product ff_r_bpcceo_product_prefix_choice_valuation_selected_power_product ff_s_bpcceo_product_prefix_choice_valuation_selected_power_product. ((((exists ff_h_bpcceo_product_prefix_choice_valuation_selected_power_product_factor. ff_h_bpcceo_product_prefix_choice_valuation_selected_power_product_factor + S (ff_p_bpcceo_product_prefix_choice_valuation_selected_power_product) = S ((S (ff_i_bpcceo_product_prefix_choice_valuation_selected_power_product)) * bpr_power_scale_bpcceo_product_prefix_choice_valuation_selected_power)) /\ exists ff_q_bpcceo_product_prefix_choice_valuation_selected_power_product_factor. bpr_power_code_bpcceo_product_prefix_choice_valuation_selected_power = ff_q_bpcceo_product_prefix_choice_valuation_selected_power_product_factor * S ((S (ff_i_bpcceo_product_prefix_choice_valuation_selected_power_product)) * bpr_power_scale_bpcceo_product_prefix_choice_valuation_selected_power) + (ff_p_bpcceo_product_prefix_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcceo_product_prefix_choice_valuation_selected_power_product_partial. ff_h_bpcceo_product_prefix_choice_valuation_selected_power_product_partial + S (ff_r_bpcceo_product_prefix_choice_valuation_selected_power_product) = S ((S (ff_i_bpcceo_product_prefix_choice_valuation_selected_power_product)) * ff_v_bpcceo_product_prefix_choice_valuation_selected_power_product)) /\ exists ff_q_bpcceo_product_prefix_choice_valuation_selected_power_product_partial. ff_u_bpcceo_product_prefix_choice_valuation_selected_power_product = ff_q_bpcceo_product_prefix_choice_valuation_selected_power_product_partial * S ((S (ff_i_bpcceo_product_prefix_choice_valuation_selected_power_product)) * ff_v_bpcceo_product_prefix_choice_valuation_selected_power_product) + (ff_r_bpcceo_product_prefix_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcceo_product_prefix_choice_valuation_selected_power_product_successor. ff_h_bpcceo_product_prefix_choice_valuation_selected_power_product_successor + S (ff_s_bpcceo_product_prefix_choice_valuation_selected_power_product) = S ((S (S ff_i_bpcceo_product_prefix_choice_valuation_selected_power_product)) * ff_v_bpcceo_product_prefix_choice_valuation_selected_power_product)) /\ exists ff_q_bpcceo_product_prefix_choice_valuation_selected_power_product_successor. ff_u_bpcceo_product_prefix_choice_valuation_selected_power_product = ff_q_bpcceo_product_prefix_choice_valuation_selected_power_product_successor * S ((S (S ff_i_bpcceo_product_prefix_choice_valuation_selected_power_product)) * ff_v_bpcceo_product_prefix_choice_valuation_selected_power_product) + (ff_s_bpcceo_product_prefix_choice_valuation_selected_power_product))) /\ ff_s_bpcceo_product_prefix_choice_valuation_selected_power_product = ff_r_bpcceo_product_prefix_choice_valuation_selected_power_product * ff_p_bpcceo_product_prefix_choice_valuation_selected_power_product)))))))) /\ (exists bpr_divides_quotient_bpcceo_product_prefix_choice_valuation_selected_divides. n = (bpr_power_value_bpcceo_product_prefix_choice_valuation_selected) * bpr_divides_quotient_bpcceo_product_prefix_choice_valuation_selected_divides)))) /\ forall bpr_valuation_candidate_bpcceo_product_prefix_choice_valuation. (exists bpr_le_gap_bpcceo_product_prefix_choice_valuation_candidate_bound. bpr_le_gap_bpcceo_product_prefix_choice_valuation_candidate_bound + (bpr_valuation_candidate_bpcceo_product_prefix_choice_valuation) = (n)) -> (exists bpr_power_value_bpcceo_product_prefix_choice_valuation_candidate. ((exists bpr_power_code_bpcceo_product_prefix_choice_valuation_candidate_power bpr_power_scale_bpcceo_product_prefix_choice_valuation_candidate_power. ((forall bpr_power_index_bpcceo_product_prefix_choice_valuation_candidate_power. (exists bpr_gap_bpcceo_product_prefix_choice_valuation_candidate_power_repeat_bound. bpr_gap_bpcceo_product_prefix_choice_valuation_candidate_power_repeat_bound + S (bpr_power_index_bpcceo_product_prefix_choice_valuation_candidate_power) = bpr_valuation_candidate_bpcceo_product_prefix_choice_valuation) -> (((exists bpr_height_bpcceo_product_prefix_choice_valuation_candidate_power_repeat_entry. bpr_height_bpcceo_product_prefix_choice_valuation_candidate_power_repeat_entry + S (S (bpr_prefix_index_bpcceo_product_prefix)) = S ((S (bpr_power_index_bpcceo_product_prefix_choice_valuation_candidate_power)) * bpr_power_scale_bpcceo_product_prefix_choice_valuation_candidate_power)) /\ exists bpr_quotient_bpcceo_product_prefix_choice_valuation_candidate_power_repeat_entry. bpr_power_code_bpcceo_product_prefix_choice_valuation_candidate_power = bpr_quotient_bpcceo_product_prefix_choice_valuation_candidate_power_repeat_entry * S ((S (bpr_power_index_bpcceo_product_prefix_choice_valuation_candidate_power)) * bpr_power_scale_bpcceo_product_prefix_choice_valuation_candidate_power) + (S (bpr_prefix_index_bpcceo_product_prefix))))) /\ (exists ff_u_bpcceo_product_prefix_choice_valuation_candidate_power_product ff_v_bpcceo_product_prefix_choice_valuation_candidate_power_product. ((((exists ff_h_bpcceo_product_prefix_choice_valuation_candidate_power_product_start. ff_h_bpcceo_product_prefix_choice_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_bpcceo_product_prefix_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcceo_product_prefix_choice_valuation_candidate_power_product_start. ff_u_bpcceo_product_prefix_choice_valuation_candidate_power_product = ff_q_bpcceo_product_prefix_choice_valuation_candidate_power_product_start * S ((S (0)) * ff_v_bpcceo_product_prefix_choice_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_bpcceo_product_prefix_choice_valuation_candidate_power_product_terminal. ff_h_bpcceo_product_prefix_choice_valuation_candidate_power_product_terminal + S (bpr_power_value_bpcceo_product_prefix_choice_valuation_candidate) = S ((S (bpr_valuation_candidate_bpcceo_product_prefix_choice_valuation)) * ff_v_bpcceo_product_prefix_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcceo_product_prefix_choice_valuation_candidate_power_product_terminal. ff_u_bpcceo_product_prefix_choice_valuation_candidate_power_product = ff_q_bpcceo_product_prefix_choice_valuation_candidate_power_product_terminal * S ((S (bpr_valuation_candidate_bpcceo_product_prefix_choice_valuation)) * ff_v_bpcceo_product_prefix_choice_valuation_candidate_power_product) + (bpr_power_value_bpcceo_product_prefix_choice_valuation_candidate))) /\ forall ff_i_bpcceo_product_prefix_choice_valuation_candidate_power_product. (exists ff_lt_bpcceo_product_prefix_choice_valuation_candidate_power_product_bound. ff_lt_bpcceo_product_prefix_choice_valuation_candidate_power_product_bound + S ff_i_bpcceo_product_prefix_choice_valuation_candidate_power_product = bpr_valuation_candidate_bpcceo_product_prefix_choice_valuation) -> exists ff_p_bpcceo_product_prefix_choice_valuation_candidate_power_product ff_r_bpcceo_product_prefix_choice_valuation_candidate_power_product ff_s_bpcceo_product_prefix_choice_valuation_candidate_power_product. ((((exists ff_h_bpcceo_product_prefix_choice_valuation_candidate_power_product_factor. ff_h_bpcceo_product_prefix_choice_valuation_candidate_power_product_factor + S (ff_p_bpcceo_product_prefix_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcceo_product_prefix_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcceo_product_prefix_choice_valuation_candidate_power)) /\ exists ff_q_bpcceo_product_prefix_choice_valuation_candidate_power_product_factor. bpr_power_code_bpcceo_product_prefix_choice_valuation_candidate_power = ff_q_bpcceo_product_prefix_choice_valuation_candidate_power_product_factor * S ((S (ff_i_bpcceo_product_prefix_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcceo_product_prefix_choice_valuation_candidate_power) + (ff_p_bpcceo_product_prefix_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcceo_product_prefix_choice_valuation_candidate_power_product_partial. ff_h_bpcceo_product_prefix_choice_valuation_candidate_power_product_partial + S (ff_r_bpcceo_product_prefix_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcceo_product_prefix_choice_valuation_candidate_power_product)) * ff_v_bpcceo_product_prefix_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcceo_product_prefix_choice_valuation_candidate_power_product_partial. ff_u_bpcceo_product_prefix_choice_valuation_candidate_power_product = ff_q_bpcceo_product_prefix_choice_valuation_candidate_power_product_partial * S ((S (ff_i_bpcceo_product_prefix_choice_valuation_candidate_power_product)) * ff_v_bpcceo_product_prefix_choice_valuation_candidate_power_product) + (ff_r_bpcceo_product_prefix_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcceo_product_prefix_choice_valuation_candidate_power_product_successor. ff_h_bpcceo_product_prefix_choice_valuation_candidate_power_product_successor + S (ff_s_bpcceo_product_prefix_choice_valuation_candidate_power_product) = S ((S (S ff_i_bpcceo_product_prefix_choice_valuation_candidate_power_product)) * ff_v_bpcceo_product_prefix_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcceo_product_prefix_choice_valuation_candidate_power_product_successor. ff_u_bpcceo_product_prefix_choice_valuation_candidate_power_product = ff_q_bpcceo_product_prefix_choice_valuation_candidate_power_product_successor * S ((S (S ff_i_bpcceo_product_prefix_choice_valuation_candidate_power_product)) * ff_v_bpcceo_product_prefix_choice_valuation_candidate_power_product) + (ff_s_bpcceo_product_prefix_choice_valuation_candidate_power_product))) /\ ff_s_bpcceo_product_prefix_choice_valuation_candidate_power_product = ff_r_bpcceo_product_prefix_choice_valuation_candidate_power_product * ff_p_bpcceo_product_prefix_choice_valuation_candidate_power_product)))))))) /\ (exists bpr_divides_quotient_bpcceo_product_prefix_choice_valuation_candidate_divides. n = (bpr_power_value_bpcceo_product_prefix_choice_valuation_candidate) * bpr_divides_quotient_bpcceo_product_prefix_choice_valuation_candidate_divides))) -> (exists bpr_le_gap_bpcceo_product_prefix_choice_valuation_candidate_below. bpr_le_gap_bpcceo_product_prefix_choice_valuation_candidate_below + (bpr_valuation_candidate_bpcceo_product_prefix_choice_valuation) = (bpr_choice_exponent_bpcceo_product_prefix_choice))) /\ (exists bpr_power_code_bpcceo_product_prefix_choice_power bpr_power_scale_bpcceo_product_prefix_choice_power. ((forall bpr_power_index_bpcceo_product_prefix_choice_power. (exists bpr_gap_bpcceo_product_prefix_choice_power_repeat_bound. bpr_gap_bpcceo_product_prefix_choice_power_repeat_bound + S (bpr_power_index_bpcceo_product_prefix_choice_power) = bpr_choice_exponent_bpcceo_product_prefix_choice) -> (((exists bpr_height_bpcceo_product_prefix_choice_power_repeat_entry. bpr_height_bpcceo_product_prefix_choice_power_repeat_entry + S (S (bpr_prefix_index_bpcceo_product_prefix)) = S ((S (bpr_power_index_bpcceo_product_prefix_choice_power)) * bpr_power_scale_bpcceo_product_prefix_choice_power)) /\ exists bpr_quotient_bpcceo_product_prefix_choice_power_repeat_entry. bpr_power_code_bpcceo_product_prefix_choice_power = bpr_quotient_bpcceo_product_prefix_choice_power_repeat_entry * S ((S (bpr_power_index_bpcceo_product_prefix_choice_power)) * bpr_power_scale_bpcceo_product_prefix_choice_power) + (S (bpr_prefix_index_bpcceo_product_prefix))))) /\ (exists ff_u_bpcceo_product_prefix_choice_power_product ff_v_bpcceo_product_prefix_choice_power_product. ((((exists ff_h_bpcceo_product_prefix_choice_power_product_start. ff_h_bpcceo_product_prefix_choice_power_product_start + S (1) = S ((S (0)) * ff_v_bpcceo_product_prefix_choice_power_product)) /\ exists ff_q_bpcceo_product_prefix_choice_power_product_start. ff_u_bpcceo_product_prefix_choice_power_product = ff_q_bpcceo_product_prefix_choice_power_product_start * S ((S (0)) * ff_v_bpcceo_product_prefix_choice_power_product) + (1))) /\ ((((exists ff_h_bpcceo_product_prefix_choice_power_product_terminal. ff_h_bpcceo_product_prefix_choice_power_product_terminal + S (bpr_prefix_value_bpcceo_product_prefix) = S ((S (bpr_choice_exponent_bpcceo_product_prefix_choice)) * ff_v_bpcceo_product_prefix_choice_power_product)) /\ exists ff_q_bpcceo_product_prefix_choice_power_product_terminal. ff_u_bpcceo_product_prefix_choice_power_product = ff_q_bpcceo_product_prefix_choice_power_product_terminal * S ((S (bpr_choice_exponent_bpcceo_product_prefix_choice)) * ff_v_bpcceo_product_prefix_choice_power_product) + (bpr_prefix_value_bpcceo_product_prefix))) /\ forall ff_i_bpcceo_product_prefix_choice_power_product. (exists ff_lt_bpcceo_product_prefix_choice_power_product_bound. ff_lt_bpcceo_product_prefix_choice_power_product_bound + S ff_i_bpcceo_product_prefix_choice_power_product = bpr_choice_exponent_bpcceo_product_prefix_choice) -> exists ff_p_bpcceo_product_prefix_choice_power_product ff_r_bpcceo_product_prefix_choice_power_product ff_s_bpcceo_product_prefix_choice_power_product. ((((exists ff_h_bpcceo_product_prefix_choice_power_product_factor. ff_h_bpcceo_product_prefix_choice_power_product_factor + S (ff_p_bpcceo_product_prefix_choice_power_product) = S ((S (ff_i_bpcceo_product_prefix_choice_power_product)) * bpr_power_scale_bpcceo_product_prefix_choice_power)) /\ exists ff_q_bpcceo_product_prefix_choice_power_product_factor. bpr_power_code_bpcceo_product_prefix_choice_power = ff_q_bpcceo_product_prefix_choice_power_product_factor * S ((S (ff_i_bpcceo_product_prefix_choice_power_product)) * bpr_power_scale_bpcceo_product_prefix_choice_power) + (ff_p_bpcceo_product_prefix_choice_power_product))) /\ ((((exists ff_h_bpcceo_product_prefix_choice_power_product_partial. ff_h_bpcceo_product_prefix_choice_power_product_partial + S (ff_r_bpcceo_product_prefix_choice_power_product) = S ((S (ff_i_bpcceo_product_prefix_choice_power_product)) * ff_v_bpcceo_product_prefix_choice_power_product)) /\ exists ff_q_bpcceo_product_prefix_choice_power_product_partial. ff_u_bpcceo_product_prefix_choice_power_product = ff_q_bpcceo_product_prefix_choice_power_product_partial * S ((S (ff_i_bpcceo_product_prefix_choice_power_product)) * ff_v_bpcceo_product_prefix_choice_power_product) + (ff_r_bpcceo_product_prefix_choice_power_product))) /\ ((((exists ff_h_bpcceo_product_prefix_choice_power_product_successor. ff_h_bpcceo_product_prefix_choice_power_product_successor + S (ff_s_bpcceo_product_prefix_choice_power_product) = S ((S (S ff_i_bpcceo_product_prefix_choice_power_product)) * ff_v_bpcceo_product_prefix_choice_power_product)) /\ exists ff_q_bpcceo_product_prefix_choice_power_product_successor. ff_u_bpcceo_product_prefix_choice_power_product = ff_q_bpcceo_product_prefix_choice_power_product_successor * S ((S (S ff_i_bpcceo_product_prefix_choice_power_product)) * ff_v_bpcceo_product_prefix_choice_power_product) + (ff_s_bpcceo_product_prefix_choice_power_product))) /\ ff_s_bpcceo_product_prefix_choice_power_product = ff_r_bpcceo_product_prefix_choice_power_product * ff_p_bpcceo_product_prefix_choice_power_product)))))))))) \/ (~((~(S (bpr_prefix_index_bpcceo_product_prefix) = 1) /\ forall bpr_left_bpcceo_product_prefix_choice_prime bpr_right_bpcceo_product_prefix_choice_prime. S (bpr_prefix_index_bpcceo_product_prefix) = bpr_left_bpcceo_product_prefix_choice_prime * bpr_right_bpcceo_product_prefix_choice_prime -> bpr_left_bpcceo_product_prefix_choice_prime = 1 \/ bpr_right_bpcceo_product_prefix_choice_prime = 1)) /\ bpr_prefix_value_bpcceo_product_prefix = 1))))) /\ (exists ff_u_bpcceo_product_product ff_v_bpcceo_product_product. ((((exists ff_h_bpcceo_product_product_start. ff_h_bpcceo_product_product_start + S (1) = S ((S (0)) * ff_v_bpcceo_product_product)) /\ exists ff_q_bpcceo_product_product_start. ff_u_bpcceo_product_product = ff_q_bpcceo_product_product_start * S ((S (0)) * ff_v_bpcceo_product_product) + (1))) /\ ((((exists ff_h_bpcceo_product_product_terminal. ff_h_bpcceo_product_product_terminal + S (z) = S ((S (m)) * ff_v_bpcceo_product_product)) /\ exists ff_q_bpcceo_product_product_terminal. ff_u_bpcceo_product_product = ff_q_bpcceo_product_product_terminal * S ((S (m)) * ff_v_bpcceo_product_product) + (z))) /\ forall ff_i_bpcceo_product_product. (exists ff_lt_bpcceo_product_product_bound. ff_lt_bpcceo_product_product_bound + S ff_i_bpcceo_product_product = m) -> exists ff_p_bpcceo_product_product ff_r_bpcceo_product_product ff_s_bpcceo_product_product. ((((exists ff_h_bpcceo_product_product_factor. ff_h_bpcceo_product_product_factor + S (ff_p_bpcceo_product_product) = S ((S (ff_i_bpcceo_product_product)) * bpr_product_scale_bpcceo_product)) /\ exists ff_q_bpcceo_product_product_factor. bpr_product_code_bpcceo_product = ff_q_bpcceo_product_product_factor * S ((S (ff_i_bpcceo_product_product)) * bpr_product_scale_bpcceo_product) + (ff_p_bpcceo_product_product))) /\ ((((exists ff_h_bpcceo_product_product_partial. ff_h_bpcceo_product_product_partial + S (ff_r_bpcceo_product_product) = S ((S (ff_i_bpcceo_product_product)) * ff_v_bpcceo_product_product)) /\ exists ff_q_bpcceo_product_product_partial. ff_u_bpcceo_product_product = ff_q_bpcceo_product_product_partial * S ((S (ff_i_bpcceo_product_product)) * ff_v_bpcceo_product_product) + (ff_r_bpcceo_product_product))) /\ ((((exists ff_h_bpcceo_product_product_successor. ff_h_bpcceo_product_product_successor + S (ff_s_bpcceo_product_product) = S ((S (S ff_i_bpcceo_product_product)) * ff_v_bpcceo_product_product)) /\ exists ff_q_bpcceo_product_product_successor. ff_u_bpcceo_product_product = ff_q_bpcceo_product_product_successor * S ((S (S ff_i_bpcceo_product_product)) * ff_v_bpcceo_product_product) + (ff_s_bpcceo_product_product))) /\ ff_s_bpcceo_product_product = ff_r_bpcceo_product_product * ff_p_bpcceo_product_product)))))))) -> n = z * q -> q = 1

Structural proof guide

A supported contribution cofactor is the multiplicative unit.

Direct prerequisites: eq_decidable, prime_divisor_exists, prime_contribution_cofactor_prime_contradiction. The authored body proceeds by case analysis (3), intermediate claims (3), equality transport (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 n
  2. 0002intro m
  3. 0003intro z
  4. 0004intro q
  5. 0005intro hn
  6. 0006intro hsupport
  7. 0007intro hproduct
  8. 0008intro hfactor
  9. 0009have hcases : q = 1 \/ ~(q = 1)
  10. 0010specialize eq_decidable q
  11. 0011specialize eq_decidable 1
  12. 0012exact eq_decidable
  13. 0013cases hcases
  14. 0014exact hcases_left
  15. 0015have hq0 : ~(q = 0)
  16. 0016intro hqzero
  17. 0017apply hn
  18. 0018trans z * q
  19. 0019exact hfactor
  20. 0020rewrite hqzero
  21. 0021apply PA5
  22. 0022have hprime : exists p. ((~(p = 1) /\ forall bpr_left_bpcceo_prime bpr_right_bpcceo_prime. p = bpr_left_bpcceo_prime * bpr_right_bpcceo_prime -> bpr_left_bpcceo_prime = 1 \/ bpr_right_bpcceo_prime = 1)) /\ (exists bpr_divides_quotient_bpcceo_divides. q = (p) * bpr_divides_quotient_bpcceo_divides)
  23. 0023specialize prime_divisor_exists q
  24. 0024apply prime_divisor_exists
  25. 0025exact hq0
  26. 0026exact hcases_right
  27. 0027cases hprime
  28. 0028cases hprime_witness
  29. 0029exfalso
  30. 0030specialize prime_contribution_cofactor_prime_contradiction n
  31. 0031specialize prime_contribution_cofactor_prime_contradiction m
  32. 0032specialize prime_contribution_cofactor_prime_contradiction z
  33. 0033specialize prime_contribution_cofactor_prime_contradiction q
  34. 0034specialize prime_contribution_cofactor_prime_contradiction x
  35. 0035apply prime_contribution_cofactor_prime_contradiction
  36. 0036exact hn
  37. 0037exact hsupport
  38. 0038exact hproduct
  39. 0039exact hfactor
  40. 0040exact hprime_witness_left
  41. 0041exact hprime_witness_right