BT00QS · Bertrand theorem

power_valuation_mul_upper

Alpha v34 checked-use theorem · independently kernel and Lean verified; not Stable

The valuation of a nonzero product is at most the sum of factor valuations.

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. ∀ a. ∀ b. ∀ e. ∀ f. ∀ g. Prime(p) → ¬a = 0 → ¬b = 0 → PowerValuation(p,a,e)PowerValuation(p,b,f)PowerValuation(p,a · b,g)Le(g,e + f)

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

5 occurrences

In local proof propositions

4 occurrences

Exact expanded native-PA statement
forall p a b e f g. ((~(p = 1) /\ forall frm_prime_left_bpd_prime frm_prime_right_bpd_prime. p = frm_prime_left_bpd_prime * frm_prime_right_bpd_prime -> frm_prime_left_bpd_prime = 1 \/ frm_prime_right_bpd_prime = 1)) -> ~(a = 0) -> ~(b = 0) -> (((exists bpv_gap_bpd_valuation_a_exponent_bound. bpv_gap_bpd_valuation_a_exponent_bound + e = a) /\ (exists bpv_result_bpd_valuation_a_selected. ((exists ff_b_bpd_valuation_a_selected_power ff_c_bpd_valuation_a_selected_power. ((forall ff_i_bpd_valuation_a_selected_power_repeat. (exists ff_lt_bpd_valuation_a_selected_power_repeat_bound. ff_lt_bpd_valuation_a_selected_power_repeat_bound + S ff_i_bpd_valuation_a_selected_power_repeat = e) -> (((exists ff_h_bpd_valuation_a_selected_power_repeat_decoded. ff_h_bpd_valuation_a_selected_power_repeat_decoded + S (p) = S ((S (ff_i_bpd_valuation_a_selected_power_repeat)) * ff_c_bpd_valuation_a_selected_power)) /\ exists ff_q_bpd_valuation_a_selected_power_repeat_decoded. ff_b_bpd_valuation_a_selected_power = ff_q_bpd_valuation_a_selected_power_repeat_decoded * S ((S (ff_i_bpd_valuation_a_selected_power_repeat)) * ff_c_bpd_valuation_a_selected_power) + (p)))) /\ (exists ff_u_bpd_valuation_a_selected_power_product ff_v_bpd_valuation_a_selected_power_product. ((((exists ff_h_bpd_valuation_a_selected_power_product_start. ff_h_bpd_valuation_a_selected_power_product_start + S (1) = S ((S (0)) * ff_v_bpd_valuation_a_selected_power_product)) /\ exists ff_q_bpd_valuation_a_selected_power_product_start. ff_u_bpd_valuation_a_selected_power_product = ff_q_bpd_valuation_a_selected_power_product_start * S ((S (0)) * ff_v_bpd_valuation_a_selected_power_product) + (1))) /\ ((((exists ff_h_bpd_valuation_a_selected_power_product_terminal. ff_h_bpd_valuation_a_selected_power_product_terminal + S (bpv_result_bpd_valuation_a_selected) = S ((S (e)) * ff_v_bpd_valuation_a_selected_power_product)) /\ exists ff_q_bpd_valuation_a_selected_power_product_terminal. ff_u_bpd_valuation_a_selected_power_product = ff_q_bpd_valuation_a_selected_power_product_terminal * S ((S (e)) * ff_v_bpd_valuation_a_selected_power_product) + (bpv_result_bpd_valuation_a_selected))) /\ forall ff_i_bpd_valuation_a_selected_power_product. (exists ff_lt_bpd_valuation_a_selected_power_product_bound. ff_lt_bpd_valuation_a_selected_power_product_bound + S ff_i_bpd_valuation_a_selected_power_product = e) -> exists ff_p_bpd_valuation_a_selected_power_product ff_r_bpd_valuation_a_selected_power_product ff_s_bpd_valuation_a_selected_power_product. ((((exists ff_h_bpd_valuation_a_selected_power_product_factor. ff_h_bpd_valuation_a_selected_power_product_factor + S (ff_p_bpd_valuation_a_selected_power_product) = S ((S (ff_i_bpd_valuation_a_selected_power_product)) * ff_c_bpd_valuation_a_selected_power)) /\ exists ff_q_bpd_valuation_a_selected_power_product_factor. ff_b_bpd_valuation_a_selected_power = ff_q_bpd_valuation_a_selected_power_product_factor * S ((S (ff_i_bpd_valuation_a_selected_power_product)) * ff_c_bpd_valuation_a_selected_power) + (ff_p_bpd_valuation_a_selected_power_product))) /\ ((((exists ff_h_bpd_valuation_a_selected_power_product_partial. ff_h_bpd_valuation_a_selected_power_product_partial + S (ff_r_bpd_valuation_a_selected_power_product) = S ((S (ff_i_bpd_valuation_a_selected_power_product)) * ff_v_bpd_valuation_a_selected_power_product)) /\ exists ff_q_bpd_valuation_a_selected_power_product_partial. ff_u_bpd_valuation_a_selected_power_product = ff_q_bpd_valuation_a_selected_power_product_partial * S ((S (ff_i_bpd_valuation_a_selected_power_product)) * ff_v_bpd_valuation_a_selected_power_product) + (ff_r_bpd_valuation_a_selected_power_product))) /\ ((((exists ff_h_bpd_valuation_a_selected_power_product_successor. ff_h_bpd_valuation_a_selected_power_product_successor + S (ff_s_bpd_valuation_a_selected_power_product) = S ((S (S ff_i_bpd_valuation_a_selected_power_product)) * ff_v_bpd_valuation_a_selected_power_product)) /\ exists ff_q_bpd_valuation_a_selected_power_product_successor. ff_u_bpd_valuation_a_selected_power_product = ff_q_bpd_valuation_a_selected_power_product_successor * S ((S (S ff_i_bpd_valuation_a_selected_power_product)) * ff_v_bpd_valuation_a_selected_power_product) + (ff_s_bpd_valuation_a_selected_power_product))) /\ ff_s_bpd_valuation_a_selected_power_product = ff_r_bpd_valuation_a_selected_power_product * ff_p_bpd_valuation_a_selected_power_product)))))))) /\ (exists bpv_factor_bpd_valuation_a_selected_divides. a = bpv_result_bpd_valuation_a_selected * bpv_factor_bpd_valuation_a_selected_divides)))) /\ forall bpv_candidate_bpd_valuation_a. (exists bpv_gap_bpd_valuation_a_candidate_bound. bpv_gap_bpd_valuation_a_candidate_bound + bpv_candidate_bpd_valuation_a = a) -> (exists bpv_result_bpd_valuation_a_candidate. ((exists ff_b_bpd_valuation_a_candidate_power ff_c_bpd_valuation_a_candidate_power. ((forall ff_i_bpd_valuation_a_candidate_power_repeat. (exists ff_lt_bpd_valuation_a_candidate_power_repeat_bound. ff_lt_bpd_valuation_a_candidate_power_repeat_bound + S ff_i_bpd_valuation_a_candidate_power_repeat = bpv_candidate_bpd_valuation_a) -> (((exists ff_h_bpd_valuation_a_candidate_power_repeat_decoded. ff_h_bpd_valuation_a_candidate_power_repeat_decoded + S (p) = S ((S (ff_i_bpd_valuation_a_candidate_power_repeat)) * ff_c_bpd_valuation_a_candidate_power)) /\ exists ff_q_bpd_valuation_a_candidate_power_repeat_decoded. ff_b_bpd_valuation_a_candidate_power = ff_q_bpd_valuation_a_candidate_power_repeat_decoded * S ((S (ff_i_bpd_valuation_a_candidate_power_repeat)) * ff_c_bpd_valuation_a_candidate_power) + (p)))) /\ (exists ff_u_bpd_valuation_a_candidate_power_product ff_v_bpd_valuation_a_candidate_power_product. ((((exists ff_h_bpd_valuation_a_candidate_power_product_start. ff_h_bpd_valuation_a_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_bpd_valuation_a_candidate_power_product)) /\ exists ff_q_bpd_valuation_a_candidate_power_product_start. ff_u_bpd_valuation_a_candidate_power_product = ff_q_bpd_valuation_a_candidate_power_product_start * S ((S (0)) * ff_v_bpd_valuation_a_candidate_power_product) + (1))) /\ ((((exists ff_h_bpd_valuation_a_candidate_power_product_terminal. ff_h_bpd_valuation_a_candidate_power_product_terminal + S (bpv_result_bpd_valuation_a_candidate) = S ((S (bpv_candidate_bpd_valuation_a)) * ff_v_bpd_valuation_a_candidate_power_product)) /\ exists ff_q_bpd_valuation_a_candidate_power_product_terminal. ff_u_bpd_valuation_a_candidate_power_product = ff_q_bpd_valuation_a_candidate_power_product_terminal * S ((S (bpv_candidate_bpd_valuation_a)) * ff_v_bpd_valuation_a_candidate_power_product) + (bpv_result_bpd_valuation_a_candidate))) /\ forall ff_i_bpd_valuation_a_candidate_power_product. (exists ff_lt_bpd_valuation_a_candidate_power_product_bound. ff_lt_bpd_valuation_a_candidate_power_product_bound + S ff_i_bpd_valuation_a_candidate_power_product = bpv_candidate_bpd_valuation_a) -> exists ff_p_bpd_valuation_a_candidate_power_product ff_r_bpd_valuation_a_candidate_power_product ff_s_bpd_valuation_a_candidate_power_product. ((((exists ff_h_bpd_valuation_a_candidate_power_product_factor. ff_h_bpd_valuation_a_candidate_power_product_factor + S (ff_p_bpd_valuation_a_candidate_power_product) = S ((S (ff_i_bpd_valuation_a_candidate_power_product)) * ff_c_bpd_valuation_a_candidate_power)) /\ exists ff_q_bpd_valuation_a_candidate_power_product_factor. ff_b_bpd_valuation_a_candidate_power = ff_q_bpd_valuation_a_candidate_power_product_factor * S ((S (ff_i_bpd_valuation_a_candidate_power_product)) * ff_c_bpd_valuation_a_candidate_power) + (ff_p_bpd_valuation_a_candidate_power_product))) /\ ((((exists ff_h_bpd_valuation_a_candidate_power_product_partial. ff_h_bpd_valuation_a_candidate_power_product_partial + S (ff_r_bpd_valuation_a_candidate_power_product) = S ((S (ff_i_bpd_valuation_a_candidate_power_product)) * ff_v_bpd_valuation_a_candidate_power_product)) /\ exists ff_q_bpd_valuation_a_candidate_power_product_partial. ff_u_bpd_valuation_a_candidate_power_product = ff_q_bpd_valuation_a_candidate_power_product_partial * S ((S (ff_i_bpd_valuation_a_candidate_power_product)) * ff_v_bpd_valuation_a_candidate_power_product) + (ff_r_bpd_valuation_a_candidate_power_product))) /\ ((((exists ff_h_bpd_valuation_a_candidate_power_product_successor. ff_h_bpd_valuation_a_candidate_power_product_successor + S (ff_s_bpd_valuation_a_candidate_power_product) = S ((S (S ff_i_bpd_valuation_a_candidate_power_product)) * ff_v_bpd_valuation_a_candidate_power_product)) /\ exists ff_q_bpd_valuation_a_candidate_power_product_successor. ff_u_bpd_valuation_a_candidate_power_product = ff_q_bpd_valuation_a_candidate_power_product_successor * S ((S (S ff_i_bpd_valuation_a_candidate_power_product)) * ff_v_bpd_valuation_a_candidate_power_product) + (ff_s_bpd_valuation_a_candidate_power_product))) /\ ff_s_bpd_valuation_a_candidate_power_product = ff_r_bpd_valuation_a_candidate_power_product * ff_p_bpd_valuation_a_candidate_power_product)))))))) /\ (exists bpv_factor_bpd_valuation_a_candidate_divides. a = bpv_result_bpd_valuation_a_candidate * bpv_factor_bpd_valuation_a_candidate_divides))) -> (exists bpv_gap_bpd_valuation_a_maximal. bpv_gap_bpd_valuation_a_maximal + bpv_candidate_bpd_valuation_a = e)) -> (((exists bpv_gap_bpd_valuation_b_exponent_bound. bpv_gap_bpd_valuation_b_exponent_bound + f = b) /\ (exists bpv_result_bpd_valuation_b_selected. ((exists ff_b_bpd_valuation_b_selected_power ff_c_bpd_valuation_b_selected_power. ((forall ff_i_bpd_valuation_b_selected_power_repeat. (exists ff_lt_bpd_valuation_b_selected_power_repeat_bound. ff_lt_bpd_valuation_b_selected_power_repeat_bound + S ff_i_bpd_valuation_b_selected_power_repeat = f) -> (((exists ff_h_bpd_valuation_b_selected_power_repeat_decoded. ff_h_bpd_valuation_b_selected_power_repeat_decoded + S (p) = S ((S (ff_i_bpd_valuation_b_selected_power_repeat)) * ff_c_bpd_valuation_b_selected_power)) /\ exists ff_q_bpd_valuation_b_selected_power_repeat_decoded. ff_b_bpd_valuation_b_selected_power = ff_q_bpd_valuation_b_selected_power_repeat_decoded * S ((S (ff_i_bpd_valuation_b_selected_power_repeat)) * ff_c_bpd_valuation_b_selected_power) + (p)))) /\ (exists ff_u_bpd_valuation_b_selected_power_product ff_v_bpd_valuation_b_selected_power_product. ((((exists ff_h_bpd_valuation_b_selected_power_product_start. ff_h_bpd_valuation_b_selected_power_product_start + S (1) = S ((S (0)) * ff_v_bpd_valuation_b_selected_power_product)) /\ exists ff_q_bpd_valuation_b_selected_power_product_start. ff_u_bpd_valuation_b_selected_power_product = ff_q_bpd_valuation_b_selected_power_product_start * S ((S (0)) * ff_v_bpd_valuation_b_selected_power_product) + (1))) /\ ((((exists ff_h_bpd_valuation_b_selected_power_product_terminal. ff_h_bpd_valuation_b_selected_power_product_terminal + S (bpv_result_bpd_valuation_b_selected) = S ((S (f)) * ff_v_bpd_valuation_b_selected_power_product)) /\ exists ff_q_bpd_valuation_b_selected_power_product_terminal. ff_u_bpd_valuation_b_selected_power_product = ff_q_bpd_valuation_b_selected_power_product_terminal * S ((S (f)) * ff_v_bpd_valuation_b_selected_power_product) + (bpv_result_bpd_valuation_b_selected))) /\ forall ff_i_bpd_valuation_b_selected_power_product. (exists ff_lt_bpd_valuation_b_selected_power_product_bound. ff_lt_bpd_valuation_b_selected_power_product_bound + S ff_i_bpd_valuation_b_selected_power_product = f) -> exists ff_p_bpd_valuation_b_selected_power_product ff_r_bpd_valuation_b_selected_power_product ff_s_bpd_valuation_b_selected_power_product. ((((exists ff_h_bpd_valuation_b_selected_power_product_factor. ff_h_bpd_valuation_b_selected_power_product_factor + S (ff_p_bpd_valuation_b_selected_power_product) = S ((S (ff_i_bpd_valuation_b_selected_power_product)) * ff_c_bpd_valuation_b_selected_power)) /\ exists ff_q_bpd_valuation_b_selected_power_product_factor. ff_b_bpd_valuation_b_selected_power = ff_q_bpd_valuation_b_selected_power_product_factor * S ((S (ff_i_bpd_valuation_b_selected_power_product)) * ff_c_bpd_valuation_b_selected_power) + (ff_p_bpd_valuation_b_selected_power_product))) /\ ((((exists ff_h_bpd_valuation_b_selected_power_product_partial. ff_h_bpd_valuation_b_selected_power_product_partial + S (ff_r_bpd_valuation_b_selected_power_product) = S ((S (ff_i_bpd_valuation_b_selected_power_product)) * ff_v_bpd_valuation_b_selected_power_product)) /\ exists ff_q_bpd_valuation_b_selected_power_product_partial. ff_u_bpd_valuation_b_selected_power_product = ff_q_bpd_valuation_b_selected_power_product_partial * S ((S (ff_i_bpd_valuation_b_selected_power_product)) * ff_v_bpd_valuation_b_selected_power_product) + (ff_r_bpd_valuation_b_selected_power_product))) /\ ((((exists ff_h_bpd_valuation_b_selected_power_product_successor. ff_h_bpd_valuation_b_selected_power_product_successor + S (ff_s_bpd_valuation_b_selected_power_product) = S ((S (S ff_i_bpd_valuation_b_selected_power_product)) * ff_v_bpd_valuation_b_selected_power_product)) /\ exists ff_q_bpd_valuation_b_selected_power_product_successor. ff_u_bpd_valuation_b_selected_power_product = ff_q_bpd_valuation_b_selected_power_product_successor * S ((S (S ff_i_bpd_valuation_b_selected_power_product)) * ff_v_bpd_valuation_b_selected_power_product) + (ff_s_bpd_valuation_b_selected_power_product))) /\ ff_s_bpd_valuation_b_selected_power_product = ff_r_bpd_valuation_b_selected_power_product * ff_p_bpd_valuation_b_selected_power_product)))))))) /\ (exists bpv_factor_bpd_valuation_b_selected_divides. b = bpv_result_bpd_valuation_b_selected * bpv_factor_bpd_valuation_b_selected_divides)))) /\ forall bpv_candidate_bpd_valuation_b. (exists bpv_gap_bpd_valuation_b_candidate_bound. bpv_gap_bpd_valuation_b_candidate_bound + bpv_candidate_bpd_valuation_b = b) -> (exists bpv_result_bpd_valuation_b_candidate. ((exists ff_b_bpd_valuation_b_candidate_power ff_c_bpd_valuation_b_candidate_power. ((forall ff_i_bpd_valuation_b_candidate_power_repeat. (exists ff_lt_bpd_valuation_b_candidate_power_repeat_bound. ff_lt_bpd_valuation_b_candidate_power_repeat_bound + S ff_i_bpd_valuation_b_candidate_power_repeat = bpv_candidate_bpd_valuation_b) -> (((exists ff_h_bpd_valuation_b_candidate_power_repeat_decoded. ff_h_bpd_valuation_b_candidate_power_repeat_decoded + S (p) = S ((S (ff_i_bpd_valuation_b_candidate_power_repeat)) * ff_c_bpd_valuation_b_candidate_power)) /\ exists ff_q_bpd_valuation_b_candidate_power_repeat_decoded. ff_b_bpd_valuation_b_candidate_power = ff_q_bpd_valuation_b_candidate_power_repeat_decoded * S ((S (ff_i_bpd_valuation_b_candidate_power_repeat)) * ff_c_bpd_valuation_b_candidate_power) + (p)))) /\ (exists ff_u_bpd_valuation_b_candidate_power_product ff_v_bpd_valuation_b_candidate_power_product. ((((exists ff_h_bpd_valuation_b_candidate_power_product_start. ff_h_bpd_valuation_b_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_bpd_valuation_b_candidate_power_product)) /\ exists ff_q_bpd_valuation_b_candidate_power_product_start. ff_u_bpd_valuation_b_candidate_power_product = ff_q_bpd_valuation_b_candidate_power_product_start * S ((S (0)) * ff_v_bpd_valuation_b_candidate_power_product) + (1))) /\ ((((exists ff_h_bpd_valuation_b_candidate_power_product_terminal. ff_h_bpd_valuation_b_candidate_power_product_terminal + S (bpv_result_bpd_valuation_b_candidate) = S ((S (bpv_candidate_bpd_valuation_b)) * ff_v_bpd_valuation_b_candidate_power_product)) /\ exists ff_q_bpd_valuation_b_candidate_power_product_terminal. ff_u_bpd_valuation_b_candidate_power_product = ff_q_bpd_valuation_b_candidate_power_product_terminal * S ((S (bpv_candidate_bpd_valuation_b)) * ff_v_bpd_valuation_b_candidate_power_product) + (bpv_result_bpd_valuation_b_candidate))) /\ forall ff_i_bpd_valuation_b_candidate_power_product. (exists ff_lt_bpd_valuation_b_candidate_power_product_bound. ff_lt_bpd_valuation_b_candidate_power_product_bound + S ff_i_bpd_valuation_b_candidate_power_product = bpv_candidate_bpd_valuation_b) -> exists ff_p_bpd_valuation_b_candidate_power_product ff_r_bpd_valuation_b_candidate_power_product ff_s_bpd_valuation_b_candidate_power_product. ((((exists ff_h_bpd_valuation_b_candidate_power_product_factor. ff_h_bpd_valuation_b_candidate_power_product_factor + S (ff_p_bpd_valuation_b_candidate_power_product) = S ((S (ff_i_bpd_valuation_b_candidate_power_product)) * ff_c_bpd_valuation_b_candidate_power)) /\ exists ff_q_bpd_valuation_b_candidate_power_product_factor. ff_b_bpd_valuation_b_candidate_power = ff_q_bpd_valuation_b_candidate_power_product_factor * S ((S (ff_i_bpd_valuation_b_candidate_power_product)) * ff_c_bpd_valuation_b_candidate_power) + (ff_p_bpd_valuation_b_candidate_power_product))) /\ ((((exists ff_h_bpd_valuation_b_candidate_power_product_partial. ff_h_bpd_valuation_b_candidate_power_product_partial + S (ff_r_bpd_valuation_b_candidate_power_product) = S ((S (ff_i_bpd_valuation_b_candidate_power_product)) * ff_v_bpd_valuation_b_candidate_power_product)) /\ exists ff_q_bpd_valuation_b_candidate_power_product_partial. ff_u_bpd_valuation_b_candidate_power_product = ff_q_bpd_valuation_b_candidate_power_product_partial * S ((S (ff_i_bpd_valuation_b_candidate_power_product)) * ff_v_bpd_valuation_b_candidate_power_product) + (ff_r_bpd_valuation_b_candidate_power_product))) /\ ((((exists ff_h_bpd_valuation_b_candidate_power_product_successor. ff_h_bpd_valuation_b_candidate_power_product_successor + S (ff_s_bpd_valuation_b_candidate_power_product) = S ((S (S ff_i_bpd_valuation_b_candidate_power_product)) * ff_v_bpd_valuation_b_candidate_power_product)) /\ exists ff_q_bpd_valuation_b_candidate_power_product_successor. ff_u_bpd_valuation_b_candidate_power_product = ff_q_bpd_valuation_b_candidate_power_product_successor * S ((S (S ff_i_bpd_valuation_b_candidate_power_product)) * ff_v_bpd_valuation_b_candidate_power_product) + (ff_s_bpd_valuation_b_candidate_power_product))) /\ ff_s_bpd_valuation_b_candidate_power_product = ff_r_bpd_valuation_b_candidate_power_product * ff_p_bpd_valuation_b_candidate_power_product)))))))) /\ (exists bpv_factor_bpd_valuation_b_candidate_divides. b = bpv_result_bpd_valuation_b_candidate * bpv_factor_bpd_valuation_b_candidate_divides))) -> (exists bpv_gap_bpd_valuation_b_maximal. bpv_gap_bpd_valuation_b_maximal + bpv_candidate_bpd_valuation_b = f)) -> (((exists bpd_gap_bpd_valuation_product_selected_bound. bpd_gap_bpd_valuation_product_selected_bound + (g) = (a * b)) /\ (exists bpvi_result_bpd_valuation_product_selected. ((exists bpvi_b_bpd_valuation_product_selected_power bpvi_c_bpd_valuation_product_selected_power. ((forall bpvi_i_bpd_valuation_product_selected_power. (exists bpvi_repeat_gap_bpd_valuation_product_selected_power. bpvi_repeat_gap_bpd_valuation_product_selected_power + S bpvi_i_bpd_valuation_product_selected_power = g) -> (((exists bpvi_h_bpd_valuation_product_selected_power_repeat. bpvi_h_bpd_valuation_product_selected_power_repeat + S (p) = S ((S (bpvi_i_bpd_valuation_product_selected_power)) * bpvi_c_bpd_valuation_product_selected_power)) /\ exists bpvi_q_bpd_valuation_product_selected_power_repeat. bpvi_b_bpd_valuation_product_selected_power = bpvi_q_bpd_valuation_product_selected_power_repeat * S ((S (bpvi_i_bpd_valuation_product_selected_power)) * bpvi_c_bpd_valuation_product_selected_power) + (p)))) /\ (exists bpvi_u_bpd_valuation_product_selected_power bpvi_v_bpd_valuation_product_selected_power. ((((exists bpvi_h_bpd_valuation_product_selected_power_start. bpvi_h_bpd_valuation_product_selected_power_start + S (1) = S ((S (0)) * bpvi_v_bpd_valuation_product_selected_power)) /\ exists bpvi_q_bpd_valuation_product_selected_power_start. bpvi_u_bpd_valuation_product_selected_power = bpvi_q_bpd_valuation_product_selected_power_start * S ((S (0)) * bpvi_v_bpd_valuation_product_selected_power) + (1))) /\ ((((exists bpvi_h_bpd_valuation_product_selected_power_terminal. bpvi_h_bpd_valuation_product_selected_power_terminal + S (bpvi_result_bpd_valuation_product_selected) = S ((S (g)) * bpvi_v_bpd_valuation_product_selected_power)) /\ exists bpvi_q_bpd_valuation_product_selected_power_terminal. bpvi_u_bpd_valuation_product_selected_power = bpvi_q_bpd_valuation_product_selected_power_terminal * S ((S (g)) * bpvi_v_bpd_valuation_product_selected_power) + (bpvi_result_bpd_valuation_product_selected))) /\ forall bpvi_j_bpd_valuation_product_selected_power. (exists bpvi_product_gap_bpd_valuation_product_selected_power. bpvi_product_gap_bpd_valuation_product_selected_power + S bpvi_j_bpd_valuation_product_selected_power = g) -> exists bpvi_factor_bpd_valuation_product_selected_power bpvi_partial_bpd_valuation_product_selected_power bpvi_successor_bpd_valuation_product_selected_power. ((((exists bpvi_h_bpd_valuation_product_selected_power_factor. bpvi_h_bpd_valuation_product_selected_power_factor + S (bpvi_factor_bpd_valuation_product_selected_power) = S ((S (bpvi_j_bpd_valuation_product_selected_power)) * bpvi_c_bpd_valuation_product_selected_power)) /\ exists bpvi_q_bpd_valuation_product_selected_power_factor. bpvi_b_bpd_valuation_product_selected_power = bpvi_q_bpd_valuation_product_selected_power_factor * S ((S (bpvi_j_bpd_valuation_product_selected_power)) * bpvi_c_bpd_valuation_product_selected_power) + (bpvi_factor_bpd_valuation_product_selected_power))) /\ ((((exists bpvi_h_bpd_valuation_product_selected_power_partial. bpvi_h_bpd_valuation_product_selected_power_partial + S (bpvi_partial_bpd_valuation_product_selected_power) = S ((S (bpvi_j_bpd_valuation_product_selected_power)) * bpvi_v_bpd_valuation_product_selected_power)) /\ exists bpvi_q_bpd_valuation_product_selected_power_partial. bpvi_u_bpd_valuation_product_selected_power = bpvi_q_bpd_valuation_product_selected_power_partial * S ((S (bpvi_j_bpd_valuation_product_selected_power)) * bpvi_v_bpd_valuation_product_selected_power) + (bpvi_partial_bpd_valuation_product_selected_power))) /\ ((((exists bpvi_h_bpd_valuation_product_selected_power_successor. bpvi_h_bpd_valuation_product_selected_power_successor + S (bpvi_successor_bpd_valuation_product_selected_power) = S ((S (S bpvi_j_bpd_valuation_product_selected_power)) * bpvi_v_bpd_valuation_product_selected_power)) /\ exists bpvi_q_bpd_valuation_product_selected_power_successor. bpvi_u_bpd_valuation_product_selected_power = bpvi_q_bpd_valuation_product_selected_power_successor * S ((S (S bpvi_j_bpd_valuation_product_selected_power)) * bpvi_v_bpd_valuation_product_selected_power) + (bpvi_successor_bpd_valuation_product_selected_power))) /\ bpvi_successor_bpd_valuation_product_selected_power = bpvi_partial_bpd_valuation_product_selected_power * bpvi_factor_bpd_valuation_product_selected_power)))))))) /\ exists bpvi_divisor_factor_bpd_valuation_product_selected. a * b = bpvi_result_bpd_valuation_product_selected * bpvi_divisor_factor_bpd_valuation_product_selected))) /\ forall bpd_candidate_bpd_valuation_product. (exists bpd_gap_bpd_valuation_product_candidate_bound. bpd_gap_bpd_valuation_product_candidate_bound + (bpd_candidate_bpd_valuation_product) = (a * b)) -> (exists bpvi_result_bpd_valuation_product_candidate. ((exists bpvi_b_bpd_valuation_product_candidate_power bpvi_c_bpd_valuation_product_candidate_power. ((forall bpvi_i_bpd_valuation_product_candidate_power. (exists bpvi_repeat_gap_bpd_valuation_product_candidate_power. bpvi_repeat_gap_bpd_valuation_product_candidate_power + S bpvi_i_bpd_valuation_product_candidate_power = bpd_candidate_bpd_valuation_product) -> (((exists bpvi_h_bpd_valuation_product_candidate_power_repeat. bpvi_h_bpd_valuation_product_candidate_power_repeat + S (p) = S ((S (bpvi_i_bpd_valuation_product_candidate_power)) * bpvi_c_bpd_valuation_product_candidate_power)) /\ exists bpvi_q_bpd_valuation_product_candidate_power_repeat. bpvi_b_bpd_valuation_product_candidate_power = bpvi_q_bpd_valuation_product_candidate_power_repeat * S ((S (bpvi_i_bpd_valuation_product_candidate_power)) * bpvi_c_bpd_valuation_product_candidate_power) + (p)))) /\ (exists bpvi_u_bpd_valuation_product_candidate_power bpvi_v_bpd_valuation_product_candidate_power. ((((exists bpvi_h_bpd_valuation_product_candidate_power_start. bpvi_h_bpd_valuation_product_candidate_power_start + S (1) = S ((S (0)) * bpvi_v_bpd_valuation_product_candidate_power)) /\ exists bpvi_q_bpd_valuation_product_candidate_power_start. bpvi_u_bpd_valuation_product_candidate_power = bpvi_q_bpd_valuation_product_candidate_power_start * S ((S (0)) * bpvi_v_bpd_valuation_product_candidate_power) + (1))) /\ ((((exists bpvi_h_bpd_valuation_product_candidate_power_terminal. bpvi_h_bpd_valuation_product_candidate_power_terminal + S (bpvi_result_bpd_valuation_product_candidate) = S ((S (bpd_candidate_bpd_valuation_product)) * bpvi_v_bpd_valuation_product_candidate_power)) /\ exists bpvi_q_bpd_valuation_product_candidate_power_terminal. bpvi_u_bpd_valuation_product_candidate_power = bpvi_q_bpd_valuation_product_candidate_power_terminal * S ((S (bpd_candidate_bpd_valuation_product)) * bpvi_v_bpd_valuation_product_candidate_power) + (bpvi_result_bpd_valuation_product_candidate))) /\ forall bpvi_j_bpd_valuation_product_candidate_power. (exists bpvi_product_gap_bpd_valuation_product_candidate_power. bpvi_product_gap_bpd_valuation_product_candidate_power + S bpvi_j_bpd_valuation_product_candidate_power = bpd_candidate_bpd_valuation_product) -> exists bpvi_factor_bpd_valuation_product_candidate_power bpvi_partial_bpd_valuation_product_candidate_power bpvi_successor_bpd_valuation_product_candidate_power. ((((exists bpvi_h_bpd_valuation_product_candidate_power_factor. bpvi_h_bpd_valuation_product_candidate_power_factor + S (bpvi_factor_bpd_valuation_product_candidate_power) = S ((S (bpvi_j_bpd_valuation_product_candidate_power)) * bpvi_c_bpd_valuation_product_candidate_power)) /\ exists bpvi_q_bpd_valuation_product_candidate_power_factor. bpvi_b_bpd_valuation_product_candidate_power = bpvi_q_bpd_valuation_product_candidate_power_factor * S ((S (bpvi_j_bpd_valuation_product_candidate_power)) * bpvi_c_bpd_valuation_product_candidate_power) + (bpvi_factor_bpd_valuation_product_candidate_power))) /\ ((((exists bpvi_h_bpd_valuation_product_candidate_power_partial. bpvi_h_bpd_valuation_product_candidate_power_partial + S (bpvi_partial_bpd_valuation_product_candidate_power) = S ((S (bpvi_j_bpd_valuation_product_candidate_power)) * bpvi_v_bpd_valuation_product_candidate_power)) /\ exists bpvi_q_bpd_valuation_product_candidate_power_partial. bpvi_u_bpd_valuation_product_candidate_power = bpvi_q_bpd_valuation_product_candidate_power_partial * S ((S (bpvi_j_bpd_valuation_product_candidate_power)) * bpvi_v_bpd_valuation_product_candidate_power) + (bpvi_partial_bpd_valuation_product_candidate_power))) /\ ((((exists bpvi_h_bpd_valuation_product_candidate_power_successor. bpvi_h_bpd_valuation_product_candidate_power_successor + S (bpvi_successor_bpd_valuation_product_candidate_power) = S ((S (S bpvi_j_bpd_valuation_product_candidate_power)) * bpvi_v_bpd_valuation_product_candidate_power)) /\ exists bpvi_q_bpd_valuation_product_candidate_power_successor. bpvi_u_bpd_valuation_product_candidate_power = bpvi_q_bpd_valuation_product_candidate_power_successor * S ((S (S bpvi_j_bpd_valuation_product_candidate_power)) * bpvi_v_bpd_valuation_product_candidate_power) + (bpvi_successor_bpd_valuation_product_candidate_power))) /\ bpvi_successor_bpd_valuation_product_candidate_power = bpvi_partial_bpd_valuation_product_candidate_power * bpvi_factor_bpd_valuation_product_candidate_power)))))))) /\ exists bpvi_divisor_factor_bpd_valuation_product_candidate. a * b = bpvi_result_bpd_valuation_product_candidate * bpvi_divisor_factor_bpd_valuation_product_candidate)) -> (exists bpd_gap_bpd_valuation_product_maximal. bpd_gap_bpd_valuation_product_maximal + (bpd_candidate_bpd_valuation_product) = (g))) -> (exists bpd_gap_valuation_mul_upper. bpd_gap_valuation_mul_upper + (g) = (e + f))

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

45 script commands · 9 reading checkpoints · 3 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.

Definition notation is shown below. Open the paired exact edition for the original native formulas. Source pairing is not a new equivalence certificate.

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

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

  1. L1
    intro p
  2. L2
    intro a
  3. L3
    intro b
  4. L4
    intro e
  5. L5
    intro f
  6. L6
    intro g
  7. L7
    intro hp
  8. L8
    intro ha
  9. L9
    intro hb
  10. L10
    intro hvaluation_a
02Fix variables and assumptionsL11–12

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

  1. L11
    intro hvaluation_b
  2. L12
    intro hvaluation_product
03Establish horderL13–16

Establish this local claim before using it. It is not an additional assumption.

  1. L13
    have horder : Le(g,e + f) ∨ Lt(e + f,g)Definitions: Le(g,e + f)Lt(e + f,g)Original native command in the exact edition
  2. L14
    specialize le_or_lt g
  3. L15
    specialize le_or_lt (e + f)
  4. L16
    exact le_or_lt
04Separate the logical casesL17–17

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L17
    cases horder
05Use earlier factsL18–18

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

  1. L18
    exact horder_left
06Separate the logical casesL19–19

Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.

  1. L19
    exfalso
07Establish hhighL20–25

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

  1. L20
    have hhigh : PowerDivides(p,g,a · b)Definitions: PowerDivides(p,g,a · b)Original native command in the exact edition
  2. L21
    specialize power_valuation_power_divides p
  3. L22
    specialize power_valuation_power_divides (a * b)
  4. L23
    specialize power_valuation_power_divides g
  5. L24
    apply power_valuation_power_divides
  6. L25
    exact hvaluation_product
08Establish hsuccessorL26–35

Establish this local claim before using it. It is not an additional assumption. The following proof commands apply power divides exponent antitone.

  1. L26
    have hsuccessor : PowerDivides(p,S (e + f),a · b)Definitions: PowerDivides(p,S (e + f),a · b)Original native command in the exact edition
  2. L27
    specialize power_divides_exponent_antitone p
  3. L28
    specialize power_divides_exponent_antitone (S (e + f))
  4. L29
    specialize power_divides_exponent_antitone g
  5. L30
    specialize power_divides_exponent_antitone (a * b)
  6. L31
    apply power_divides_exponent_antitone
  7. L32
    exact horder_right
  8. L33
    exact hhigh
  9. L34
    specialize power_valuation_mul_successor_not_divides p
  10. L35
    specialize power_valuation_mul_successor_not_divides a
09Use earlier factsL36–45

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

  1. L36
    specialize power_valuation_mul_successor_not_divides b
  2. L37
    specialize power_valuation_mul_successor_not_divides e
  3. L38
    specialize power_valuation_mul_successor_not_divides f
  4. L39
    apply power_valuation_mul_successor_not_divides
  5. L40
    exact hp
  6. L41
    exact ha
  7. L42
    exact hb
  8. L43
    exact hvaluation_a
  9. L44
    exact hvaluation_b
  10. L45
    exact hsuccessor

Library-wide reading audit

Original defined command ledger · 45 lines
  1. 0001intro p
  2. 0002intro a
  3. 0003intro b
  4. 0004intro e
  5. 0005intro f
  6. 0006intro g
  7. 0007intro hp
  8. 0008intro ha
  9. 0009intro hb
  10. 0010intro hvaluation_a
  11. 0011intro hvaluation_b
  12. 0012intro hvaluation_product
  13. 0013have horder : Le(g,e + f)Lt(e + f,g)
    Exact native replay linehave horder : (exists k. k + g = e + f) \/ exists k. k + S (e + f) = g
  14. 0014specialize le_or_lt g
  15. 0015specialize le_or_lt (e + f)
  16. 0016exact le_or_lt
  17. 0017cases horder
  18. 0018exact horder_left
  19. 0019exfalso
  20. 0020have hhigh : PowerDivides(p,g,a · b)
    Exact native replay linehave hhigh : exists bpvi_result_bpd_mul_upper_high. ((exists bpvi_b_bpd_mul_upper_high_power bpvi_c_bpd_mul_upper_high_power. ((forall bpvi_i_bpd_mul_upper_high_power. (exists bpvi_repeat_gap_bpd_mul_upper_high_power. bpvi_repeat_gap_bpd_mul_upper_high_power + S bpvi_i_bpd_mul_upper_high_power = g) -> (((exists bpvi_h_bpd_mul_upper_high_power_repeat. bpvi_h_bpd_mul_upper_high_power_repeat + S (p) = S ((S (bpvi_i_bpd_mul_upper_high_power)) * bpvi_c_bpd_mul_upper_high_power)) /\ exists bpvi_q_bpd_mul_upper_high_power_repeat. bpvi_b_bpd_mul_upper_high_power = bpvi_q_bpd_mul_upper_high_power_repeat * S ((S (bpvi_i_bpd_mul_upper_high_power)) * bpvi_c_bpd_mul_upper_high_power) + (p)))) /\ (exists bpvi_u_bpd_mul_upper_high_power bpvi_v_bpd_mul_upper_high_power. ((((exists bpvi_h_bpd_mul_upper_high_power_start. bpvi_h_bpd_mul_upper_high_power_start + S (1) = S ((S (0)) * bpvi_v_bpd_mul_upper_high_power)) /\ exists bpvi_q_bpd_mul_upper_high_power_start. bpvi_u_bpd_mul_upper_high_power = bpvi_q_bpd_mul_upper_high_power_start * S ((S (0)) * bpvi_v_bpd_mul_upper_high_power) + (1))) /\ ((((exists bpvi_h_bpd_mul_upper_high_power_terminal. bpvi_h_bpd_mul_upper_high_power_terminal + S (bpvi_result_bpd_mul_upper_high) = S ((S (g)) * bpvi_v_bpd_mul_upper_high_power)) /\ exists bpvi_q_bpd_mul_upper_high_power_terminal. bpvi_u_bpd_mul_upper_high_power = bpvi_q_bpd_mul_upper_high_power_terminal * S ((S (g)) * bpvi_v_bpd_mul_upper_high_power) + (bpvi_result_bpd_mul_upper_high))) /\ forall bpvi_j_bpd_mul_upper_high_power. (exists bpvi_product_gap_bpd_mul_upper_high_power. bpvi_product_gap_bpd_mul_upper_high_power + S bpvi_j_bpd_mul_upper_high_power = g) -> exists bpvi_factor_bpd_mul_upper_high_power bpvi_partial_bpd_mul_upper_high_power bpvi_successor_bpd_mul_upper_high_power. ((((exists bpvi_h_bpd_mul_upper_high_power_factor. bpvi_h_bpd_mul_upper_high_power_factor + S (bpvi_factor_bpd_mul_upper_high_power) = S ((S (bpvi_j_bpd_mul_upper_high_power)) * bpvi_c_bpd_mul_upper_high_power)) /\ exists bpvi_q_bpd_mul_upper_high_power_factor. bpvi_b_bpd_mul_upper_high_power = bpvi_q_bpd_mul_upper_high_power_factor * S ((S (bpvi_j_bpd_mul_upper_high_power)) * bpvi_c_bpd_mul_upper_high_power) + (bpvi_factor_bpd_mul_upper_high_power))) /\ ((((exists bpvi_h_bpd_mul_upper_high_power_partial. bpvi_h_bpd_mul_upper_high_power_partial + S (bpvi_partial_bpd_mul_upper_high_power) = S ((S (bpvi_j_bpd_mul_upper_high_power)) * bpvi_v_bpd_mul_upper_high_power)) /\ exists bpvi_q_bpd_mul_upper_high_power_partial. bpvi_u_bpd_mul_upper_high_power = bpvi_q_bpd_mul_upper_high_power_partial * S ((S (bpvi_j_bpd_mul_upper_high_power)) * bpvi_v_bpd_mul_upper_high_power) + (bpvi_partial_bpd_mul_upper_high_power))) /\ ((((exists bpvi_h_bpd_mul_upper_high_power_successor. bpvi_h_bpd_mul_upper_high_power_successor + S (bpvi_successor_bpd_mul_upper_high_power) = S ((S (S bpvi_j_bpd_mul_upper_high_power)) * bpvi_v_bpd_mul_upper_high_power)) /\ exists bpvi_q_bpd_mul_upper_high_power_successor. bpvi_u_bpd_mul_upper_high_power = bpvi_q_bpd_mul_upper_high_power_successor * S ((S (S bpvi_j_bpd_mul_upper_high_power)) * bpvi_v_bpd_mul_upper_high_power) + (bpvi_successor_bpd_mul_upper_high_power))) /\ bpvi_successor_bpd_mul_upper_high_power = bpvi_partial_bpd_mul_upper_high_power * bpvi_factor_bpd_mul_upper_high_power)))))))) /\ exists bpvi_divisor_factor_bpd_mul_upper_high. a * b = bpvi_result_bpd_mul_upper_high * bpvi_divisor_factor_bpd_mul_upper_high)
  21. 0021specialize power_valuation_power_divides p
  22. 0022specialize power_valuation_power_divides (a * b)
  23. 0023specialize power_valuation_power_divides g
  24. 0024apply power_valuation_power_divides
  25. 0025exact hvaluation_product
  26. 0026have hsuccessor : PowerDivides(p,S (e + f),a · b)
    Exact native replay linehave hsuccessor : exists bpvi_result_bpd_mul_upper_successor. ((exists bpvi_b_bpd_mul_upper_successor_power bpvi_c_bpd_mul_upper_successor_power. ((forall bpvi_i_bpd_mul_upper_successor_power. (exists bpvi_repeat_gap_bpd_mul_upper_successor_power. bpvi_repeat_gap_bpd_mul_upper_successor_power + S bpvi_i_bpd_mul_upper_successor_power = S (e + f)) -> (((exists bpvi_h_bpd_mul_upper_successor_power_repeat. bpvi_h_bpd_mul_upper_successor_power_repeat + S (p) = S ((S (bpvi_i_bpd_mul_upper_successor_power)) * bpvi_c_bpd_mul_upper_successor_power)) /\ exists bpvi_q_bpd_mul_upper_successor_power_repeat. bpvi_b_bpd_mul_upper_successor_power = bpvi_q_bpd_mul_upper_successor_power_repeat * S ((S (bpvi_i_bpd_mul_upper_successor_power)) * bpvi_c_bpd_mul_upper_successor_power) + (p)))) /\ (exists bpvi_u_bpd_mul_upper_successor_power bpvi_v_bpd_mul_upper_successor_power. ((((exists bpvi_h_bpd_mul_upper_successor_power_start. bpvi_h_bpd_mul_upper_successor_power_start + S (1) = S ((S (0)) * bpvi_v_bpd_mul_upper_successor_power)) /\ exists bpvi_q_bpd_mul_upper_successor_power_start. bpvi_u_bpd_mul_upper_successor_power = bpvi_q_bpd_mul_upper_successor_power_start * S ((S (0)) * bpvi_v_bpd_mul_upper_successor_power) + (1))) /\ ((((exists bpvi_h_bpd_mul_upper_successor_power_terminal. bpvi_h_bpd_mul_upper_successor_power_terminal + S (bpvi_result_bpd_mul_upper_successor) = S ((S (S (e + f))) * bpvi_v_bpd_mul_upper_successor_power)) /\ exists bpvi_q_bpd_mul_upper_successor_power_terminal. bpvi_u_bpd_mul_upper_successor_power = bpvi_q_bpd_mul_upper_successor_power_terminal * S ((S (S (e + f))) * bpvi_v_bpd_mul_upper_successor_power) + (bpvi_result_bpd_mul_upper_successor))) /\ forall bpvi_j_bpd_mul_upper_successor_power. (exists bpvi_product_gap_bpd_mul_upper_successor_power. bpvi_product_gap_bpd_mul_upper_successor_power + S bpvi_j_bpd_mul_upper_successor_power = S (e + f)) -> exists bpvi_factor_bpd_mul_upper_successor_power bpvi_partial_bpd_mul_upper_successor_power bpvi_successor_bpd_mul_upper_successor_power. ((((exists bpvi_h_bpd_mul_upper_successor_power_factor. bpvi_h_bpd_mul_upper_successor_power_factor + S (bpvi_factor_bpd_mul_upper_successor_power) = S ((S (bpvi_j_bpd_mul_upper_successor_power)) * bpvi_c_bpd_mul_upper_successor_power)) /\ exists bpvi_q_bpd_mul_upper_successor_power_factor. bpvi_b_bpd_mul_upper_successor_power = bpvi_q_bpd_mul_upper_successor_power_factor * S ((S (bpvi_j_bpd_mul_upper_successor_power)) * bpvi_c_bpd_mul_upper_successor_power) + (bpvi_factor_bpd_mul_upper_successor_power))) /\ ((((exists bpvi_h_bpd_mul_upper_successor_power_partial. bpvi_h_bpd_mul_upper_successor_power_partial + S (bpvi_partial_bpd_mul_upper_successor_power) = S ((S (bpvi_j_bpd_mul_upper_successor_power)) * bpvi_v_bpd_mul_upper_successor_power)) /\ exists bpvi_q_bpd_mul_upper_successor_power_partial. bpvi_u_bpd_mul_upper_successor_power = bpvi_q_bpd_mul_upper_successor_power_partial * S ((S (bpvi_j_bpd_mul_upper_successor_power)) * bpvi_v_bpd_mul_upper_successor_power) + (bpvi_partial_bpd_mul_upper_successor_power))) /\ ((((exists bpvi_h_bpd_mul_upper_successor_power_successor. bpvi_h_bpd_mul_upper_successor_power_successor + S (bpvi_successor_bpd_mul_upper_successor_power) = S ((S (S bpvi_j_bpd_mul_upper_successor_power)) * bpvi_v_bpd_mul_upper_successor_power)) /\ exists bpvi_q_bpd_mul_upper_successor_power_successor. bpvi_u_bpd_mul_upper_successor_power = bpvi_q_bpd_mul_upper_successor_power_successor * S ((S (S bpvi_j_bpd_mul_upper_successor_power)) * bpvi_v_bpd_mul_upper_successor_power) + (bpvi_successor_bpd_mul_upper_successor_power))) /\ bpvi_successor_bpd_mul_upper_successor_power = bpvi_partial_bpd_mul_upper_successor_power * bpvi_factor_bpd_mul_upper_successor_power)))))))) /\ exists bpvi_divisor_factor_bpd_mul_upper_successor. a * b = bpvi_result_bpd_mul_upper_successor * bpvi_divisor_factor_bpd_mul_upper_successor)
  27. 0027specialize power_divides_exponent_antitone p
  28. 0028specialize power_divides_exponent_antitone (S (e + f))
  29. 0029specialize power_divides_exponent_antitone g
  30. 0030specialize power_divides_exponent_antitone (a * b)
  31. 0031apply power_divides_exponent_antitone
  32. 0032exact horder_right
  33. 0033exact hhigh
  34. 0034specialize power_valuation_mul_successor_not_divides p
  35. 0035specialize power_valuation_mul_successor_not_divides a
  36. 0036specialize power_valuation_mul_successor_not_divides b
  37. 0037specialize power_valuation_mul_successor_not_divides e
  38. 0038specialize power_valuation_mul_successor_not_divides f
  39. 0039apply power_valuation_mul_successor_not_divides
  40. 0040exact hp
  41. 0041exact ha
  42. 0042exact hb
  43. 0043exact hvaluation_a
  44. 0044exact hvaluation_b
  45. 0045exact hsuccessor