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
∀ n. ∀ m. ∀ z. ¬n = 0 → (∀ x. Prime(x) → Dvd(x,n) → Le(x,m)) → (∃ x. ∃ y. (∀ k. Lt(k,m) → ∃ i. BetaAt(x,y,k,i) ∧ (Prime(S k) ∧ (∃ j. PowerValuation(S k,n,j) ∧ Pow(S k,j,i)) ∨ ¬Prime(S k) ∧ i = 1)) ∧ Product(x,y,m,z)) → Dvd(n,z)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
PD0001 Le PD0002 Lt PD0003 Dvd PD0004 Prime PD0013 BetaAt PD0014 Product PD0020 Pow PD0046 PowerValuation11 occurrences
In local proof propositions
1 occurrences
Exact expanded native-PA statement
forall n m z. ~(n = 0) -> (forall bpr_support_prime_bpcrd_support. ((~(bpr_support_prime_bpcrd_support = 1) /\ forall bpr_left_bpcrd_support_prime bpr_right_bpcrd_support_prime. bpr_support_prime_bpcrd_support = bpr_left_bpcrd_support_prime * bpr_right_bpcrd_support_prime -> bpr_left_bpcrd_support_prime = 1 \/ bpr_right_bpcrd_support_prime = 1)) -> (exists bpr_divides_quotient_bpcrd_support_divides. n = (bpr_support_prime_bpcrd_support) * bpr_divides_quotient_bpcrd_support_divides) -> (exists bpr_le_gap_bpcrd_support_bound. bpr_le_gap_bpcrd_support_bound + (bpr_support_prime_bpcrd_support) = (m))) -> (exists bpr_product_code_bpcrd_product bpr_product_scale_bpcrd_product. ((forall bpr_prefix_index_bpcrd_product_prefix. (exists bpr_gap_bpcrd_product_prefix_bound. bpr_gap_bpcrd_product_prefix_bound + S (bpr_prefix_index_bpcrd_product_prefix) = m) -> exists bpr_prefix_value_bpcrd_product_prefix. ((((exists bpr_height_bpcrd_product_prefix_decoded. bpr_height_bpcrd_product_prefix_decoded + S (bpr_prefix_value_bpcrd_product_prefix) = S ((S (bpr_prefix_index_bpcrd_product_prefix)) * bpr_product_scale_bpcrd_product)) /\ exists bpr_quotient_bpcrd_product_prefix_decoded. bpr_product_code_bpcrd_product = bpr_quotient_bpcrd_product_prefix_decoded * S ((S (bpr_prefix_index_bpcrd_product_prefix)) * bpr_product_scale_bpcrd_product) + (bpr_prefix_value_bpcrd_product_prefix))) /\ (((((~(S (bpr_prefix_index_bpcrd_product_prefix) = 1) /\ forall bpr_left_bpcrd_product_prefix_choice_prime bpr_right_bpcrd_product_prefix_choice_prime. S (bpr_prefix_index_bpcrd_product_prefix) = bpr_left_bpcrd_product_prefix_choice_prime * bpr_right_bpcrd_product_prefix_choice_prime -> bpr_left_bpcrd_product_prefix_choice_prime = 1 \/ bpr_right_bpcrd_product_prefix_choice_prime = 1)) /\ exists bpr_choice_exponent_bpcrd_product_prefix_choice. ((((exists bpr_le_gap_bpcrd_product_prefix_choice_valuation_selected_bound. bpr_le_gap_bpcrd_product_prefix_choice_valuation_selected_bound + (bpr_choice_exponent_bpcrd_product_prefix_choice) = (n)) /\ (exists bpr_power_value_bpcrd_product_prefix_choice_valuation_selected. ((exists bpr_power_code_bpcrd_product_prefix_choice_valuation_selected_power bpr_power_scale_bpcrd_product_prefix_choice_valuation_selected_power. ((forall bpr_power_index_bpcrd_product_prefix_choice_valuation_selected_power. (exists bpr_gap_bpcrd_product_prefix_choice_valuation_selected_power_repeat_bound. bpr_gap_bpcrd_product_prefix_choice_valuation_selected_power_repeat_bound + S (bpr_power_index_bpcrd_product_prefix_choice_valuation_selected_power) = bpr_choice_exponent_bpcrd_product_prefix_choice) -> (((exists bpr_height_bpcrd_product_prefix_choice_valuation_selected_power_repeat_entry. bpr_height_bpcrd_product_prefix_choice_valuation_selected_power_repeat_entry + S (S (bpr_prefix_index_bpcrd_product_prefix)) = S ((S (bpr_power_index_bpcrd_product_prefix_choice_valuation_selected_power)) * bpr_power_scale_bpcrd_product_prefix_choice_valuation_selected_power)) /\ exists bpr_quotient_bpcrd_product_prefix_choice_valuation_selected_power_repeat_entry. bpr_power_code_bpcrd_product_prefix_choice_valuation_selected_power = bpr_quotient_bpcrd_product_prefix_choice_valuation_selected_power_repeat_entry * S ((S (bpr_power_index_bpcrd_product_prefix_choice_valuation_selected_power)) * bpr_power_scale_bpcrd_product_prefix_choice_valuation_selected_power) + (S (bpr_prefix_index_bpcrd_product_prefix))))) /\ (exists ff_u_bpcrd_product_prefix_choice_valuation_selected_power_product ff_v_bpcrd_product_prefix_choice_valuation_selected_power_product. ((((exists ff_h_bpcrd_product_prefix_choice_valuation_selected_power_product_start. ff_h_bpcrd_product_prefix_choice_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_bpcrd_product_prefix_choice_valuation_selected_power_product)) /\ exists ff_q_bpcrd_product_prefix_choice_valuation_selected_power_product_start. ff_u_bpcrd_product_prefix_choice_valuation_selected_power_product = ff_q_bpcrd_product_prefix_choice_valuation_selected_power_product_start * S ((S (0)) * ff_v_bpcrd_product_prefix_choice_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_bpcrd_product_prefix_choice_valuation_selected_power_product_terminal. ff_h_bpcrd_product_prefix_choice_valuation_selected_power_product_terminal + S (bpr_power_value_bpcrd_product_prefix_choice_valuation_selected) = S ((S (bpr_choice_exponent_bpcrd_product_prefix_choice)) * ff_v_bpcrd_product_prefix_choice_valuation_selected_power_product)) /\ exists ff_q_bpcrd_product_prefix_choice_valuation_selected_power_product_terminal. ff_u_bpcrd_product_prefix_choice_valuation_selected_power_product = ff_q_bpcrd_product_prefix_choice_valuation_selected_power_product_terminal * S ((S (bpr_choice_exponent_bpcrd_product_prefix_choice)) * ff_v_bpcrd_product_prefix_choice_valuation_selected_power_product) + (bpr_power_value_bpcrd_product_prefix_choice_valuation_selected))) /\ forall ff_i_bpcrd_product_prefix_choice_valuation_selected_power_product. (exists ff_lt_bpcrd_product_prefix_choice_valuation_selected_power_product_bound. ff_lt_bpcrd_product_prefix_choice_valuation_selected_power_product_bound + S ff_i_bpcrd_product_prefix_choice_valuation_selected_power_product = bpr_choice_exponent_bpcrd_product_prefix_choice) -> exists ff_p_bpcrd_product_prefix_choice_valuation_selected_power_product ff_r_bpcrd_product_prefix_choice_valuation_selected_power_product ff_s_bpcrd_product_prefix_choice_valuation_selected_power_product. ((((exists ff_h_bpcrd_product_prefix_choice_valuation_selected_power_product_factor. ff_h_bpcrd_product_prefix_choice_valuation_selected_power_product_factor + S (ff_p_bpcrd_product_prefix_choice_valuation_selected_power_product) = S ((S (ff_i_bpcrd_product_prefix_choice_valuation_selected_power_product)) * bpr_power_scale_bpcrd_product_prefix_choice_valuation_selected_power)) /\ exists ff_q_bpcrd_product_prefix_choice_valuation_selected_power_product_factor. bpr_power_code_bpcrd_product_prefix_choice_valuation_selected_power = ff_q_bpcrd_product_prefix_choice_valuation_selected_power_product_factor * S ((S (ff_i_bpcrd_product_prefix_choice_valuation_selected_power_product)) * bpr_power_scale_bpcrd_product_prefix_choice_valuation_selected_power) + (ff_p_bpcrd_product_prefix_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcrd_product_prefix_choice_valuation_selected_power_product_partial. ff_h_bpcrd_product_prefix_choice_valuation_selected_power_product_partial + S (ff_r_bpcrd_product_prefix_choice_valuation_selected_power_product) = S ((S (ff_i_bpcrd_product_prefix_choice_valuation_selected_power_product)) * ff_v_bpcrd_product_prefix_choice_valuation_selected_power_product)) /\ exists ff_q_bpcrd_product_prefix_choice_valuation_selected_power_product_partial. ff_u_bpcrd_product_prefix_choice_valuation_selected_power_product = ff_q_bpcrd_product_prefix_choice_valuation_selected_power_product_partial * S ((S (ff_i_bpcrd_product_prefix_choice_valuation_selected_power_product)) * ff_v_bpcrd_product_prefix_choice_valuation_selected_power_product) + (ff_r_bpcrd_product_prefix_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcrd_product_prefix_choice_valuation_selected_power_product_successor. ff_h_bpcrd_product_prefix_choice_valuation_selected_power_product_successor + S (ff_s_bpcrd_product_prefix_choice_valuation_selected_power_product) = S ((S (S ff_i_bpcrd_product_prefix_choice_valuation_selected_power_product)) * ff_v_bpcrd_product_prefix_choice_valuation_selected_power_product)) /\ exists ff_q_bpcrd_product_prefix_choice_valuation_selected_power_product_successor. ff_u_bpcrd_product_prefix_choice_valuation_selected_power_product = ff_q_bpcrd_product_prefix_choice_valuation_selected_power_product_successor * S ((S (S ff_i_bpcrd_product_prefix_choice_valuation_selected_power_product)) * ff_v_bpcrd_product_prefix_choice_valuation_selected_power_product) + (ff_s_bpcrd_product_prefix_choice_valuation_selected_power_product))) /\ ff_s_bpcrd_product_prefix_choice_valuation_selected_power_product = ff_r_bpcrd_product_prefix_choice_valuation_selected_power_product * ff_p_bpcrd_product_prefix_choice_valuation_selected_power_product)))))))) /\ (exists bpr_divides_quotient_bpcrd_product_prefix_choice_valuation_selected_divides. n = (bpr_power_value_bpcrd_product_prefix_choice_valuation_selected) * bpr_divides_quotient_bpcrd_product_prefix_choice_valuation_selected_divides)))) /\ forall bpr_valuation_candidate_bpcrd_product_prefix_choice_valuation. (exists bpr_le_gap_bpcrd_product_prefix_choice_valuation_candidate_bound. bpr_le_gap_bpcrd_product_prefix_choice_valuation_candidate_bound + (bpr_valuation_candidate_bpcrd_product_prefix_choice_valuation) = (n)) -> (exists bpr_power_value_bpcrd_product_prefix_choice_valuation_candidate. ((exists bpr_power_code_bpcrd_product_prefix_choice_valuation_candidate_power bpr_power_scale_bpcrd_product_prefix_choice_valuation_candidate_power. ((forall bpr_power_index_bpcrd_product_prefix_choice_valuation_candidate_power. (exists bpr_gap_bpcrd_product_prefix_choice_valuation_candidate_power_repeat_bound. bpr_gap_bpcrd_product_prefix_choice_valuation_candidate_power_repeat_bound + S (bpr_power_index_bpcrd_product_prefix_choice_valuation_candidate_power) = bpr_valuation_candidate_bpcrd_product_prefix_choice_valuation) -> (((exists bpr_height_bpcrd_product_prefix_choice_valuation_candidate_power_repeat_entry. bpr_height_bpcrd_product_prefix_choice_valuation_candidate_power_repeat_entry + S (S (bpr_prefix_index_bpcrd_product_prefix)) = S ((S (bpr_power_index_bpcrd_product_prefix_choice_valuation_candidate_power)) * bpr_power_scale_bpcrd_product_prefix_choice_valuation_candidate_power)) /\ exists bpr_quotient_bpcrd_product_prefix_choice_valuation_candidate_power_repeat_entry. bpr_power_code_bpcrd_product_prefix_choice_valuation_candidate_power = bpr_quotient_bpcrd_product_prefix_choice_valuation_candidate_power_repeat_entry * S ((S (bpr_power_index_bpcrd_product_prefix_choice_valuation_candidate_power)) * bpr_power_scale_bpcrd_product_prefix_choice_valuation_candidate_power) + (S (bpr_prefix_index_bpcrd_product_prefix))))) /\ (exists ff_u_bpcrd_product_prefix_choice_valuation_candidate_power_product ff_v_bpcrd_product_prefix_choice_valuation_candidate_power_product. ((((exists ff_h_bpcrd_product_prefix_choice_valuation_candidate_power_product_start. ff_h_bpcrd_product_prefix_choice_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_bpcrd_product_prefix_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcrd_product_prefix_choice_valuation_candidate_power_product_start. ff_u_bpcrd_product_prefix_choice_valuation_candidate_power_product = ff_q_bpcrd_product_prefix_choice_valuation_candidate_power_product_start * S ((S (0)) * ff_v_bpcrd_product_prefix_choice_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_bpcrd_product_prefix_choice_valuation_candidate_power_product_terminal. ff_h_bpcrd_product_prefix_choice_valuation_candidate_power_product_terminal + S (bpr_power_value_bpcrd_product_prefix_choice_valuation_candidate) = S ((S (bpr_valuation_candidate_bpcrd_product_prefix_choice_valuation)) * ff_v_bpcrd_product_prefix_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcrd_product_prefix_choice_valuation_candidate_power_product_terminal. ff_u_bpcrd_product_prefix_choice_valuation_candidate_power_product = ff_q_bpcrd_product_prefix_choice_valuation_candidate_power_product_terminal * S ((S (bpr_valuation_candidate_bpcrd_product_prefix_choice_valuation)) * ff_v_bpcrd_product_prefix_choice_valuation_candidate_power_product) + (bpr_power_value_bpcrd_product_prefix_choice_valuation_candidate))) /\ forall ff_i_bpcrd_product_prefix_choice_valuation_candidate_power_product. (exists ff_lt_bpcrd_product_prefix_choice_valuation_candidate_power_product_bound. ff_lt_bpcrd_product_prefix_choice_valuation_candidate_power_product_bound + S ff_i_bpcrd_product_prefix_choice_valuation_candidate_power_product = bpr_valuation_candidate_bpcrd_product_prefix_choice_valuation) -> exists ff_p_bpcrd_product_prefix_choice_valuation_candidate_power_product ff_r_bpcrd_product_prefix_choice_valuation_candidate_power_product ff_s_bpcrd_product_prefix_choice_valuation_candidate_power_product. ((((exists ff_h_bpcrd_product_prefix_choice_valuation_candidate_power_product_factor. ff_h_bpcrd_product_prefix_choice_valuation_candidate_power_product_factor + S (ff_p_bpcrd_product_prefix_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcrd_product_prefix_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcrd_product_prefix_choice_valuation_candidate_power)) /\ exists ff_q_bpcrd_product_prefix_choice_valuation_candidate_power_product_factor. bpr_power_code_bpcrd_product_prefix_choice_valuation_candidate_power = ff_q_bpcrd_product_prefix_choice_valuation_candidate_power_product_factor * S ((S (ff_i_bpcrd_product_prefix_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcrd_product_prefix_choice_valuation_candidate_power) + (ff_p_bpcrd_product_prefix_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcrd_product_prefix_choice_valuation_candidate_power_product_partial. ff_h_bpcrd_product_prefix_choice_valuation_candidate_power_product_partial + S (ff_r_bpcrd_product_prefix_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcrd_product_prefix_choice_valuation_candidate_power_product)) * ff_v_bpcrd_product_prefix_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcrd_product_prefix_choice_valuation_candidate_power_product_partial. ff_u_bpcrd_product_prefix_choice_valuation_candidate_power_product = ff_q_bpcrd_product_prefix_choice_valuation_candidate_power_product_partial * S ((S (ff_i_bpcrd_product_prefix_choice_valuation_candidate_power_product)) * ff_v_bpcrd_product_prefix_choice_valuation_candidate_power_product) + (ff_r_bpcrd_product_prefix_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcrd_product_prefix_choice_valuation_candidate_power_product_successor. ff_h_bpcrd_product_prefix_choice_valuation_candidate_power_product_successor + S (ff_s_bpcrd_product_prefix_choice_valuation_candidate_power_product) = S ((S (S ff_i_bpcrd_product_prefix_choice_valuation_candidate_power_product)) * ff_v_bpcrd_product_prefix_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcrd_product_prefix_choice_valuation_candidate_power_product_successor. ff_u_bpcrd_product_prefix_choice_valuation_candidate_power_product = ff_q_bpcrd_product_prefix_choice_valuation_candidate_power_product_successor * S ((S (S ff_i_bpcrd_product_prefix_choice_valuation_candidate_power_product)) * ff_v_bpcrd_product_prefix_choice_valuation_candidate_power_product) + (ff_s_bpcrd_product_prefix_choice_valuation_candidate_power_product))) /\ ff_s_bpcrd_product_prefix_choice_valuation_candidate_power_product = ff_r_bpcrd_product_prefix_choice_valuation_candidate_power_product * ff_p_bpcrd_product_prefix_choice_valuation_candidate_power_product)))))))) /\ (exists bpr_divides_quotient_bpcrd_product_prefix_choice_valuation_candidate_divides. n = (bpr_power_value_bpcrd_product_prefix_choice_valuation_candidate) * bpr_divides_quotient_bpcrd_product_prefix_choice_valuation_candidate_divides))) -> (exists bpr_le_gap_bpcrd_product_prefix_choice_valuation_candidate_below. bpr_le_gap_bpcrd_product_prefix_choice_valuation_candidate_below + (bpr_valuation_candidate_bpcrd_product_prefix_choice_valuation) = (bpr_choice_exponent_bpcrd_product_prefix_choice))) /\ (exists bpr_power_code_bpcrd_product_prefix_choice_power bpr_power_scale_bpcrd_product_prefix_choice_power. ((forall bpr_power_index_bpcrd_product_prefix_choice_power. (exists bpr_gap_bpcrd_product_prefix_choice_power_repeat_bound. bpr_gap_bpcrd_product_prefix_choice_power_repeat_bound + S (bpr_power_index_bpcrd_product_prefix_choice_power) = bpr_choice_exponent_bpcrd_product_prefix_choice) -> (((exists bpr_height_bpcrd_product_prefix_choice_power_repeat_entry. bpr_height_bpcrd_product_prefix_choice_power_repeat_entry + S (S (bpr_prefix_index_bpcrd_product_prefix)) = S ((S (bpr_power_index_bpcrd_product_prefix_choice_power)) * bpr_power_scale_bpcrd_product_prefix_choice_power)) /\ exists bpr_quotient_bpcrd_product_prefix_choice_power_repeat_entry. bpr_power_code_bpcrd_product_prefix_choice_power = bpr_quotient_bpcrd_product_prefix_choice_power_repeat_entry * S ((S (bpr_power_index_bpcrd_product_prefix_choice_power)) * bpr_power_scale_bpcrd_product_prefix_choice_power) + (S (bpr_prefix_index_bpcrd_product_prefix))))) /\ (exists ff_u_bpcrd_product_prefix_choice_power_product ff_v_bpcrd_product_prefix_choice_power_product. ((((exists ff_h_bpcrd_product_prefix_choice_power_product_start. ff_h_bpcrd_product_prefix_choice_power_product_start + S (1) = S ((S (0)) * ff_v_bpcrd_product_prefix_choice_power_product)) /\ exists ff_q_bpcrd_product_prefix_choice_power_product_start. ff_u_bpcrd_product_prefix_choice_power_product = ff_q_bpcrd_product_prefix_choice_power_product_start * S ((S (0)) * ff_v_bpcrd_product_prefix_choice_power_product) + (1))) /\ ((((exists ff_h_bpcrd_product_prefix_choice_power_product_terminal. ff_h_bpcrd_product_prefix_choice_power_product_terminal + S (bpr_prefix_value_bpcrd_product_prefix) = S ((S (bpr_choice_exponent_bpcrd_product_prefix_choice)) * ff_v_bpcrd_product_prefix_choice_power_product)) /\ exists ff_q_bpcrd_product_prefix_choice_power_product_terminal. ff_u_bpcrd_product_prefix_choice_power_product = ff_q_bpcrd_product_prefix_choice_power_product_terminal * S ((S (bpr_choice_exponent_bpcrd_product_prefix_choice)) * ff_v_bpcrd_product_prefix_choice_power_product) + (bpr_prefix_value_bpcrd_product_prefix))) /\ forall ff_i_bpcrd_product_prefix_choice_power_product. (exists ff_lt_bpcrd_product_prefix_choice_power_product_bound. ff_lt_bpcrd_product_prefix_choice_power_product_bound + S ff_i_bpcrd_product_prefix_choice_power_product = bpr_choice_exponent_bpcrd_product_prefix_choice) -> exists ff_p_bpcrd_product_prefix_choice_power_product ff_r_bpcrd_product_prefix_choice_power_product ff_s_bpcrd_product_prefix_choice_power_product. ((((exists ff_h_bpcrd_product_prefix_choice_power_product_factor. ff_h_bpcrd_product_prefix_choice_power_product_factor + S (ff_p_bpcrd_product_prefix_choice_power_product) = S ((S (ff_i_bpcrd_product_prefix_choice_power_product)) * bpr_power_scale_bpcrd_product_prefix_choice_power)) /\ exists ff_q_bpcrd_product_prefix_choice_power_product_factor. bpr_power_code_bpcrd_product_prefix_choice_power = ff_q_bpcrd_product_prefix_choice_power_product_factor * S ((S (ff_i_bpcrd_product_prefix_choice_power_product)) * bpr_power_scale_bpcrd_product_prefix_choice_power) + (ff_p_bpcrd_product_prefix_choice_power_product))) /\ ((((exists ff_h_bpcrd_product_prefix_choice_power_product_partial. ff_h_bpcrd_product_prefix_choice_power_product_partial + S (ff_r_bpcrd_product_prefix_choice_power_product) = S ((S (ff_i_bpcrd_product_prefix_choice_power_product)) * ff_v_bpcrd_product_prefix_choice_power_product)) /\ exists ff_q_bpcrd_product_prefix_choice_power_product_partial. ff_u_bpcrd_product_prefix_choice_power_product = ff_q_bpcrd_product_prefix_choice_power_product_partial * S ((S (ff_i_bpcrd_product_prefix_choice_power_product)) * ff_v_bpcrd_product_prefix_choice_power_product) + (ff_r_bpcrd_product_prefix_choice_power_product))) /\ ((((exists ff_h_bpcrd_product_prefix_choice_power_product_successor. ff_h_bpcrd_product_prefix_choice_power_product_successor + S (ff_s_bpcrd_product_prefix_choice_power_product) = S ((S (S ff_i_bpcrd_product_prefix_choice_power_product)) * ff_v_bpcrd_product_prefix_choice_power_product)) /\ exists ff_q_bpcrd_product_prefix_choice_power_product_successor. ff_u_bpcrd_product_prefix_choice_power_product = ff_q_bpcrd_product_prefix_choice_power_product_successor * S ((S (S ff_i_bpcrd_product_prefix_choice_power_product)) * ff_v_bpcrd_product_prefix_choice_power_product) + (ff_s_bpcrd_product_prefix_choice_power_product))) /\ ff_s_bpcrd_product_prefix_choice_power_product = ff_r_bpcrd_product_prefix_choice_power_product * ff_p_bpcrd_product_prefix_choice_power_product)))))))))) \/ (~((~(S (bpr_prefix_index_bpcrd_product_prefix) = 1) /\ forall bpr_left_bpcrd_product_prefix_choice_prime bpr_right_bpcrd_product_prefix_choice_prime. S (bpr_prefix_index_bpcrd_product_prefix) = bpr_left_bpcrd_product_prefix_choice_prime * bpr_right_bpcrd_product_prefix_choice_prime -> bpr_left_bpcrd_product_prefix_choice_prime = 1 \/ bpr_right_bpcrd_product_prefix_choice_prime = 1)) /\ bpr_prefix_value_bpcrd_product_prefix = 1))))) /\ (exists ff_u_bpcrd_product_product ff_v_bpcrd_product_product. ((((exists ff_h_bpcrd_product_product_start. ff_h_bpcrd_product_product_start + S (1) = S ((S (0)) * ff_v_bpcrd_product_product)) /\ exists ff_q_bpcrd_product_product_start. ff_u_bpcrd_product_product = ff_q_bpcrd_product_product_start * S ((S (0)) * ff_v_bpcrd_product_product) + (1))) /\ ((((exists ff_h_bpcrd_product_product_terminal. ff_h_bpcrd_product_product_terminal + S (z) = S ((S (m)) * ff_v_bpcrd_product_product)) /\ exists ff_q_bpcrd_product_product_terminal. ff_u_bpcrd_product_product = ff_q_bpcrd_product_product_terminal * S ((S (m)) * ff_v_bpcrd_product_product) + (z))) /\ forall ff_i_bpcrd_product_product. (exists ff_lt_bpcrd_product_product_bound. ff_lt_bpcrd_product_product_bound + S ff_i_bpcrd_product_product = m) -> exists ff_p_bpcrd_product_product ff_r_bpcrd_product_product ff_s_bpcrd_product_product. ((((exists ff_h_bpcrd_product_product_factor. ff_h_bpcrd_product_product_factor + S (ff_p_bpcrd_product_product) = S ((S (ff_i_bpcrd_product_product)) * bpr_product_scale_bpcrd_product)) /\ exists ff_q_bpcrd_product_product_factor. bpr_product_code_bpcrd_product = ff_q_bpcrd_product_product_factor * S ((S (ff_i_bpcrd_product_product)) * bpr_product_scale_bpcrd_product) + (ff_p_bpcrd_product_product))) /\ ((((exists ff_h_bpcrd_product_product_partial. ff_h_bpcrd_product_product_partial + S (ff_r_bpcrd_product_product) = S ((S (ff_i_bpcrd_product_product)) * ff_v_bpcrd_product_product)) /\ exists ff_q_bpcrd_product_product_partial. ff_u_bpcrd_product_product = ff_q_bpcrd_product_product_partial * S ((S (ff_i_bpcrd_product_product)) * ff_v_bpcrd_product_product) + (ff_r_bpcrd_product_product))) /\ ((((exists ff_h_bpcrd_product_product_successor. ff_h_bpcrd_product_product_successor + S (ff_s_bpcrd_product_product) = S ((S (S ff_i_bpcrd_product_product)) * ff_v_bpcrd_product_product)) /\ exists ff_q_bpcrd_product_product_successor. ff_u_bpcrd_product_product = ff_q_bpcrd_product_product_successor * S ((S (S ff_i_bpcrd_product_product)) * ff_v_bpcrd_product_product) + (ff_s_bpcrd_product_product))) /\ ff_s_bpcrd_product_product = ff_r_bpcrd_product_product * ff_p_bpcrd_product_product)))))))) -> (exists bpr_divides_quotient_bpcrd_result. z = (n) * bpr_divides_quotient_bpcrd_result)Proof neighborhood
Direct theorem prerequisites
Direct 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 (3)
01Fix variables and assumptionsL1–6
02Establish hforwardL7–9
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply prime contribution product divides.
03Separate the logical casesL10–10
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L10
cases hforward
04Establish hunitL11–20
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply prime contribution cofactor eq one.
- L11
have hunit : x = 1 - L12
specialize prime_contribution_cofactor_eq_one n - L13
specialize prime_contribution_cofactor_eq_one m - L14
specialize prime_contribution_cofactor_eq_one z - L15
specialize prime_contribution_cofactor_eq_one x - L16
apply prime_contribution_cofactor_eq_one - L17
exact hn - L18
exact hsupport - L19
exact hproduct - L20
exact hforward_witness
05Establish heqL21–25
06Construct an explicit witnessL26–26
Supply the displayed value, then prove that it has the required property.
- L26
exists 1
07Calculate and transport equalitiesL27–28
08Use earlier factsL29–29
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L29
exact heq
09Calculate and transport equalitiesL30–30
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L30
symm
10Use earlier factsL31–31
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L31
apply mul_one
Original defined command ledger · 31 lines
- 0001
intro n - 0002
intro m - 0003
intro z - 0004
intro hn - 0005
intro hsupport - 0006
intro hproduct - 0007
have hforward : Dvd(z,n)Exact native replay line
have hforward : exists bpr_divides_quotient_bpcrd_forward. n = (z) * bpr_divides_quotient_bpcrd_forward - 0008
apply prime_contribution_product_divides - 0009
exact hproduct - 0010
cases hforward - 0011
have hunit : x = 1 - 0012
specialize prime_contribution_cofactor_eq_one n - 0013
specialize prime_contribution_cofactor_eq_one m - 0014
specialize prime_contribution_cofactor_eq_one z - 0015
specialize prime_contribution_cofactor_eq_one x - 0016
apply prime_contribution_cofactor_eq_one - 0017
exact hn - 0018
exact hsupport - 0019
exact hproduct - 0020
exact hforward_witness - 0021
have heq : n = z - 0022
trans z * x - 0023
exact hforward_witness - 0024
rewrite hunit - 0025
apply mul_one - 0026
exists 1 - 0027
trans n - 0028
symm - 0029
exact heq - 0030
symm - 0031
apply mul_one