EL0026

odd_prime_lifting_the_exponent_value

The full LTE valuation holds for every actual supplied power/difference witness, by extensionality of the constructed power graphs.

Alpha v34 checked-use · first admitted v29 · independently kernel and Lean verified; not Stable

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.

All displayed hypotheses are required. Powers and positive differences are actual existential outputs. The proof constructs second-order correction identities and iterates the prime step; no binomial expansion or LTE oracle is assumed. The 2-adic variants remain separate open targets.

Exact theorem in conservative defined notation

∀ p. ∀ x. ∀ y. ∀ d. ∀ n. ∀ a. ∀ b. ∀ X. ∀ Y. ∀ D. ¬p = 1 ∧ (∀ z. ∀ m. p = z · m → z = 1 ∨ m = 1) → Lt(2,p)Lt(y,x) → ¬y = 0 → ¬n = 0 → x = y + d → Dvd(p,d) → ¬Dvd(p,x · y)BoundedPowerValuation(p,d,d,a)BoundedPowerValuation(p,n,n,b)Pow(x,n,X)Pow(y,n,Y) → X = Y + D → BoundedPowerValuation(p,D,D,a + b)

Every linked abbreviation expands hygienically to the identical original native formula.

Definition DAG

Actual proof prerequisites

odd_prime_lifting_the_exponentpower_valuation_value_eq_transport · checked external prerequisitelte_power_difference_functional
Original expanded first-order statement
forall p x y d n a b X Y D. (~((p) = 1) /\ forall pvs_left_supplied_prime pvs_right_supplied_prime. (p) = pvs_left_supplied_prime * pvs_right_supplied_prime -> pvs_left_supplied_prime = 1 \/ pvs_right_supplied_prime = 1) -> (exists olte_gap_supplied_odd. olte_gap_supplied_odd + S (2) = (p)) -> (exists olte_gap_supplied_order. olte_gap_supplied_order + S (y) = (x)) -> ~(y = 0) -> ~(n = 0) -> x = y + d -> (exists olte_factor_supplied_divisor. (d) = (p) * olte_factor_supplied_divisor) -> ~(exists olte_factor_supplied_units. (x * y) = (p) * olte_factor_supplied_units) -> (((exists bpd_gap_pvs_supplied_difference_valuation_selected_bound. bpd_gap_pvs_supplied_difference_valuation_selected_bound + (a) = (d)) /\ (exists bpvi_result_pvs_supplied_difference_valuation_selected. ((exists bpvi_b_pvs_supplied_difference_valuation_selected_power bpvi_c_pvs_supplied_difference_valuation_selected_power. ((forall bpvi_i_pvs_supplied_difference_valuation_selected_power. (exists bpvi_repeat_gap_pvs_supplied_difference_valuation_selected_power. bpvi_repeat_gap_pvs_supplied_difference_valuation_selected_power + S bpvi_i_pvs_supplied_difference_valuation_selected_power = a) -> (((exists bpvi_h_pvs_supplied_difference_valuation_selected_power_repeat. bpvi_h_pvs_supplied_difference_valuation_selected_power_repeat + S (p) = S ((S (bpvi_i_pvs_supplied_difference_valuation_selected_power)) * bpvi_c_pvs_supplied_difference_valuation_selected_power)) /\ exists bpvi_q_pvs_supplied_difference_valuation_selected_power_repeat. bpvi_b_pvs_supplied_difference_valuation_selected_power = bpvi_q_pvs_supplied_difference_valuation_selected_power_repeat * S ((S (bpvi_i_pvs_supplied_difference_valuation_selected_power)) * bpvi_c_pvs_supplied_difference_valuation_selected_power) + (p)))) /\ (exists bpvi_u_pvs_supplied_difference_valuation_selected_power bpvi_v_pvs_supplied_difference_valuation_selected_power. ((((exists bpvi_h_pvs_supplied_difference_valuation_selected_power_start. bpvi_h_pvs_supplied_difference_valuation_selected_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_supplied_difference_valuation_selected_power)) /\ exists bpvi_q_pvs_supplied_difference_valuation_selected_power_start. bpvi_u_pvs_supplied_difference_valuation_selected_power = bpvi_q_pvs_supplied_difference_valuation_selected_power_start * S ((S (0)) * bpvi_v_pvs_supplied_difference_valuation_selected_power) + (1))) /\ ((((exists bpvi_h_pvs_supplied_difference_valuation_selected_power_terminal. bpvi_h_pvs_supplied_difference_valuation_selected_power_terminal + S (bpvi_result_pvs_supplied_difference_valuation_selected) = S ((S (a)) * bpvi_v_pvs_supplied_difference_valuation_selected_power)) /\ exists bpvi_q_pvs_supplied_difference_valuation_selected_power_terminal. bpvi_u_pvs_supplied_difference_valuation_selected_power = bpvi_q_pvs_supplied_difference_valuation_selected_power_terminal * S ((S (a)) * bpvi_v_pvs_supplied_difference_valuation_selected_power) + (bpvi_result_pvs_supplied_difference_valuation_selected))) /\ forall bpvi_j_pvs_supplied_difference_valuation_selected_power. (exists bpvi_product_gap_pvs_supplied_difference_valuation_selected_power. bpvi_product_gap_pvs_supplied_difference_valuation_selected_power + S bpvi_j_pvs_supplied_difference_valuation_selected_power = a) -> exists bpvi_factor_pvs_supplied_difference_valuation_selected_power bpvi_partial_pvs_supplied_difference_valuation_selected_power bpvi_successor_pvs_supplied_difference_valuation_selected_power. ((((exists bpvi_h_pvs_supplied_difference_valuation_selected_power_factor. bpvi_h_pvs_supplied_difference_valuation_selected_power_factor + S (bpvi_factor_pvs_supplied_difference_valuation_selected_power) = S ((S (bpvi_j_pvs_supplied_difference_valuation_selected_power)) * bpvi_c_pvs_supplied_difference_valuation_selected_power)) /\ exists bpvi_q_pvs_supplied_difference_valuation_selected_power_factor. bpvi_b_pvs_supplied_difference_valuation_selected_power = bpvi_q_pvs_supplied_difference_valuation_selected_power_factor * S ((S (bpvi_j_pvs_supplied_difference_valuation_selected_power)) * bpvi_c_pvs_supplied_difference_valuation_selected_power) + (bpvi_factor_pvs_supplied_difference_valuation_selected_power))) /\ ((((exists bpvi_h_pvs_supplied_difference_valuation_selected_power_partial. bpvi_h_pvs_supplied_difference_valuation_selected_power_partial + S (bpvi_partial_pvs_supplied_difference_valuation_selected_power) = S ((S (bpvi_j_pvs_supplied_difference_valuation_selected_power)) * bpvi_v_pvs_supplied_difference_valuation_selected_power)) /\ exists bpvi_q_pvs_supplied_difference_valuation_selected_power_partial. bpvi_u_pvs_supplied_difference_valuation_selected_power = bpvi_q_pvs_supplied_difference_valuation_selected_power_partial * S ((S (bpvi_j_pvs_supplied_difference_valuation_selected_power)) * bpvi_v_pvs_supplied_difference_valuation_selected_power) + (bpvi_partial_pvs_supplied_difference_valuation_selected_power))) /\ ((((exists bpvi_h_pvs_supplied_difference_valuation_selected_power_successor. bpvi_h_pvs_supplied_difference_valuation_selected_power_successor + S (bpvi_successor_pvs_supplied_difference_valuation_selected_power) = S ((S (S bpvi_j_pvs_supplied_difference_valuation_selected_power)) * bpvi_v_pvs_supplied_difference_valuation_selected_power)) /\ exists bpvi_q_pvs_supplied_difference_valuation_selected_power_successor. bpvi_u_pvs_supplied_difference_valuation_selected_power = bpvi_q_pvs_supplied_difference_valuation_selected_power_successor * S ((S (S bpvi_j_pvs_supplied_difference_valuation_selected_power)) * bpvi_v_pvs_supplied_difference_valuation_selected_power) + (bpvi_successor_pvs_supplied_difference_valuation_selected_power))) /\ bpvi_successor_pvs_supplied_difference_valuation_selected_power = bpvi_partial_pvs_supplied_difference_valuation_selected_power * bpvi_factor_pvs_supplied_difference_valuation_selected_power)))))))) /\ exists bpvi_divisor_factor_pvs_supplied_difference_valuation_selected. d = bpvi_result_pvs_supplied_difference_valuation_selected * bpvi_divisor_factor_pvs_supplied_difference_valuation_selected))) /\ forall bpd_candidate_pvs_supplied_difference_valuation. (exists bpd_gap_pvs_supplied_difference_valuation_candidate_bound. bpd_gap_pvs_supplied_difference_valuation_candidate_bound + (bpd_candidate_pvs_supplied_difference_valuation) = (d)) -> (exists bpvi_result_pvs_supplied_difference_valuation_candidate. ((exists bpvi_b_pvs_supplied_difference_valuation_candidate_power bpvi_c_pvs_supplied_difference_valuation_candidate_power. ((forall bpvi_i_pvs_supplied_difference_valuation_candidate_power. (exists bpvi_repeat_gap_pvs_supplied_difference_valuation_candidate_power. bpvi_repeat_gap_pvs_supplied_difference_valuation_candidate_power + S bpvi_i_pvs_supplied_difference_valuation_candidate_power = bpd_candidate_pvs_supplied_difference_valuation) -> (((exists bpvi_h_pvs_supplied_difference_valuation_candidate_power_repeat. bpvi_h_pvs_supplied_difference_valuation_candidate_power_repeat + S (p) = S ((S (bpvi_i_pvs_supplied_difference_valuation_candidate_power)) * bpvi_c_pvs_supplied_difference_valuation_candidate_power)) /\ exists bpvi_q_pvs_supplied_difference_valuation_candidate_power_repeat. bpvi_b_pvs_supplied_difference_valuation_candidate_power = bpvi_q_pvs_supplied_difference_valuation_candidate_power_repeat * S ((S (bpvi_i_pvs_supplied_difference_valuation_candidate_power)) * bpvi_c_pvs_supplied_difference_valuation_candidate_power) + (p)))) /\ (exists bpvi_u_pvs_supplied_difference_valuation_candidate_power bpvi_v_pvs_supplied_difference_valuation_candidate_power. ((((exists bpvi_h_pvs_supplied_difference_valuation_candidate_power_start. bpvi_h_pvs_supplied_difference_valuation_candidate_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_supplied_difference_valuation_candidate_power)) /\ exists bpvi_q_pvs_supplied_difference_valuation_candidate_power_start. bpvi_u_pvs_supplied_difference_valuation_candidate_power = bpvi_q_pvs_supplied_difference_valuation_candidate_power_start * S ((S (0)) * bpvi_v_pvs_supplied_difference_valuation_candidate_power) + (1))) /\ ((((exists bpvi_h_pvs_supplied_difference_valuation_candidate_power_terminal. bpvi_h_pvs_supplied_difference_valuation_candidate_power_terminal + S (bpvi_result_pvs_supplied_difference_valuation_candidate) = S ((S (bpd_candidate_pvs_supplied_difference_valuation)) * bpvi_v_pvs_supplied_difference_valuation_candidate_power)) /\ exists bpvi_q_pvs_supplied_difference_valuation_candidate_power_terminal. bpvi_u_pvs_supplied_difference_valuation_candidate_power = bpvi_q_pvs_supplied_difference_valuation_candidate_power_terminal * S ((S (bpd_candidate_pvs_supplied_difference_valuation)) * bpvi_v_pvs_supplied_difference_valuation_candidate_power) + (bpvi_result_pvs_supplied_difference_valuation_candidate))) /\ forall bpvi_j_pvs_supplied_difference_valuation_candidate_power. (exists bpvi_product_gap_pvs_supplied_difference_valuation_candidate_power. bpvi_product_gap_pvs_supplied_difference_valuation_candidate_power + S bpvi_j_pvs_supplied_difference_valuation_candidate_power = bpd_candidate_pvs_supplied_difference_valuation) -> exists bpvi_factor_pvs_supplied_difference_valuation_candidate_power bpvi_partial_pvs_supplied_difference_valuation_candidate_power bpvi_successor_pvs_supplied_difference_valuation_candidate_power. ((((exists bpvi_h_pvs_supplied_difference_valuation_candidate_power_factor. bpvi_h_pvs_supplied_difference_valuation_candidate_power_factor + S (bpvi_factor_pvs_supplied_difference_valuation_candidate_power) = S ((S (bpvi_j_pvs_supplied_difference_valuation_candidate_power)) * bpvi_c_pvs_supplied_difference_valuation_candidate_power)) /\ exists bpvi_q_pvs_supplied_difference_valuation_candidate_power_factor. bpvi_b_pvs_supplied_difference_valuation_candidate_power = bpvi_q_pvs_supplied_difference_valuation_candidate_power_factor * S ((S (bpvi_j_pvs_supplied_difference_valuation_candidate_power)) * bpvi_c_pvs_supplied_difference_valuation_candidate_power) + (bpvi_factor_pvs_supplied_difference_valuation_candidate_power))) /\ ((((exists bpvi_h_pvs_supplied_difference_valuation_candidate_power_partial. bpvi_h_pvs_supplied_difference_valuation_candidate_power_partial + S (bpvi_partial_pvs_supplied_difference_valuation_candidate_power) = S ((S (bpvi_j_pvs_supplied_difference_valuation_candidate_power)) * bpvi_v_pvs_supplied_difference_valuation_candidate_power)) /\ exists bpvi_q_pvs_supplied_difference_valuation_candidate_power_partial. bpvi_u_pvs_supplied_difference_valuation_candidate_power = bpvi_q_pvs_supplied_difference_valuation_candidate_power_partial * S ((S (bpvi_j_pvs_supplied_difference_valuation_candidate_power)) * bpvi_v_pvs_supplied_difference_valuation_candidate_power) + (bpvi_partial_pvs_supplied_difference_valuation_candidate_power))) /\ ((((exists bpvi_h_pvs_supplied_difference_valuation_candidate_power_successor. bpvi_h_pvs_supplied_difference_valuation_candidate_power_successor + S (bpvi_successor_pvs_supplied_difference_valuation_candidate_power) = S ((S (S bpvi_j_pvs_supplied_difference_valuation_candidate_power)) * bpvi_v_pvs_supplied_difference_valuation_candidate_power)) /\ exists bpvi_q_pvs_supplied_difference_valuation_candidate_power_successor. bpvi_u_pvs_supplied_difference_valuation_candidate_power = bpvi_q_pvs_supplied_difference_valuation_candidate_power_successor * S ((S (S bpvi_j_pvs_supplied_difference_valuation_candidate_power)) * bpvi_v_pvs_supplied_difference_valuation_candidate_power) + (bpvi_successor_pvs_supplied_difference_valuation_candidate_power))) /\ bpvi_successor_pvs_supplied_difference_valuation_candidate_power = bpvi_partial_pvs_supplied_difference_valuation_candidate_power * bpvi_factor_pvs_supplied_difference_valuation_candidate_power)))))))) /\ exists bpvi_divisor_factor_pvs_supplied_difference_valuation_candidate. d = bpvi_result_pvs_supplied_difference_valuation_candidate * bpvi_divisor_factor_pvs_supplied_difference_valuation_candidate)) -> (exists bpd_gap_pvs_supplied_difference_valuation_maximal. bpd_gap_pvs_supplied_difference_valuation_maximal + (bpd_candidate_pvs_supplied_difference_valuation) = (a))) -> (((exists bpd_gap_pvs_supplied_exponent_valuation_selected_bound. bpd_gap_pvs_supplied_exponent_valuation_selected_bound + (b) = (n)) /\ (exists bpvi_result_pvs_supplied_exponent_valuation_selected. ((exists bpvi_b_pvs_supplied_exponent_valuation_selected_power bpvi_c_pvs_supplied_exponent_valuation_selected_power. ((forall bpvi_i_pvs_supplied_exponent_valuation_selected_power. (exists bpvi_repeat_gap_pvs_supplied_exponent_valuation_selected_power. bpvi_repeat_gap_pvs_supplied_exponent_valuation_selected_power + S bpvi_i_pvs_supplied_exponent_valuation_selected_power = b) -> (((exists bpvi_h_pvs_supplied_exponent_valuation_selected_power_repeat. bpvi_h_pvs_supplied_exponent_valuation_selected_power_repeat + S (p) = S ((S (bpvi_i_pvs_supplied_exponent_valuation_selected_power)) * bpvi_c_pvs_supplied_exponent_valuation_selected_power)) /\ exists bpvi_q_pvs_supplied_exponent_valuation_selected_power_repeat. bpvi_b_pvs_supplied_exponent_valuation_selected_power = bpvi_q_pvs_supplied_exponent_valuation_selected_power_repeat * S ((S (bpvi_i_pvs_supplied_exponent_valuation_selected_power)) * bpvi_c_pvs_supplied_exponent_valuation_selected_power) + (p)))) /\ (exists bpvi_u_pvs_supplied_exponent_valuation_selected_power bpvi_v_pvs_supplied_exponent_valuation_selected_power. ((((exists bpvi_h_pvs_supplied_exponent_valuation_selected_power_start. bpvi_h_pvs_supplied_exponent_valuation_selected_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_supplied_exponent_valuation_selected_power)) /\ exists bpvi_q_pvs_supplied_exponent_valuation_selected_power_start. bpvi_u_pvs_supplied_exponent_valuation_selected_power = bpvi_q_pvs_supplied_exponent_valuation_selected_power_start * S ((S (0)) * bpvi_v_pvs_supplied_exponent_valuation_selected_power) + (1))) /\ ((((exists bpvi_h_pvs_supplied_exponent_valuation_selected_power_terminal. bpvi_h_pvs_supplied_exponent_valuation_selected_power_terminal + S (bpvi_result_pvs_supplied_exponent_valuation_selected) = S ((S (b)) * bpvi_v_pvs_supplied_exponent_valuation_selected_power)) /\ exists bpvi_q_pvs_supplied_exponent_valuation_selected_power_terminal. bpvi_u_pvs_supplied_exponent_valuation_selected_power = bpvi_q_pvs_supplied_exponent_valuation_selected_power_terminal * S ((S (b)) * bpvi_v_pvs_supplied_exponent_valuation_selected_power) + (bpvi_result_pvs_supplied_exponent_valuation_selected))) /\ forall bpvi_j_pvs_supplied_exponent_valuation_selected_power. (exists bpvi_product_gap_pvs_supplied_exponent_valuation_selected_power. bpvi_product_gap_pvs_supplied_exponent_valuation_selected_power + S bpvi_j_pvs_supplied_exponent_valuation_selected_power = b) -> exists bpvi_factor_pvs_supplied_exponent_valuation_selected_power bpvi_partial_pvs_supplied_exponent_valuation_selected_power bpvi_successor_pvs_supplied_exponent_valuation_selected_power. ((((exists bpvi_h_pvs_supplied_exponent_valuation_selected_power_factor. bpvi_h_pvs_supplied_exponent_valuation_selected_power_factor + S (bpvi_factor_pvs_supplied_exponent_valuation_selected_power) = S ((S (bpvi_j_pvs_supplied_exponent_valuation_selected_power)) * bpvi_c_pvs_supplied_exponent_valuation_selected_power)) /\ exists bpvi_q_pvs_supplied_exponent_valuation_selected_power_factor. bpvi_b_pvs_supplied_exponent_valuation_selected_power = bpvi_q_pvs_supplied_exponent_valuation_selected_power_factor * S ((S (bpvi_j_pvs_supplied_exponent_valuation_selected_power)) * bpvi_c_pvs_supplied_exponent_valuation_selected_power) + (bpvi_factor_pvs_supplied_exponent_valuation_selected_power))) /\ ((((exists bpvi_h_pvs_supplied_exponent_valuation_selected_power_partial. bpvi_h_pvs_supplied_exponent_valuation_selected_power_partial + S (bpvi_partial_pvs_supplied_exponent_valuation_selected_power) = S ((S (bpvi_j_pvs_supplied_exponent_valuation_selected_power)) * bpvi_v_pvs_supplied_exponent_valuation_selected_power)) /\ exists bpvi_q_pvs_supplied_exponent_valuation_selected_power_partial. bpvi_u_pvs_supplied_exponent_valuation_selected_power = bpvi_q_pvs_supplied_exponent_valuation_selected_power_partial * S ((S (bpvi_j_pvs_supplied_exponent_valuation_selected_power)) * bpvi_v_pvs_supplied_exponent_valuation_selected_power) + (bpvi_partial_pvs_supplied_exponent_valuation_selected_power))) /\ ((((exists bpvi_h_pvs_supplied_exponent_valuation_selected_power_successor. bpvi_h_pvs_supplied_exponent_valuation_selected_power_successor + S (bpvi_successor_pvs_supplied_exponent_valuation_selected_power) = S ((S (S bpvi_j_pvs_supplied_exponent_valuation_selected_power)) * bpvi_v_pvs_supplied_exponent_valuation_selected_power)) /\ exists bpvi_q_pvs_supplied_exponent_valuation_selected_power_successor. bpvi_u_pvs_supplied_exponent_valuation_selected_power = bpvi_q_pvs_supplied_exponent_valuation_selected_power_successor * S ((S (S bpvi_j_pvs_supplied_exponent_valuation_selected_power)) * bpvi_v_pvs_supplied_exponent_valuation_selected_power) + (bpvi_successor_pvs_supplied_exponent_valuation_selected_power))) /\ bpvi_successor_pvs_supplied_exponent_valuation_selected_power = bpvi_partial_pvs_supplied_exponent_valuation_selected_power * bpvi_factor_pvs_supplied_exponent_valuation_selected_power)))))))) /\ exists bpvi_divisor_factor_pvs_supplied_exponent_valuation_selected. n = bpvi_result_pvs_supplied_exponent_valuation_selected * bpvi_divisor_factor_pvs_supplied_exponent_valuation_selected))) /\ forall bpd_candidate_pvs_supplied_exponent_valuation. (exists bpd_gap_pvs_supplied_exponent_valuation_candidate_bound. bpd_gap_pvs_supplied_exponent_valuation_candidate_bound + (bpd_candidate_pvs_supplied_exponent_valuation) = (n)) -> (exists bpvi_result_pvs_supplied_exponent_valuation_candidate. ((exists bpvi_b_pvs_supplied_exponent_valuation_candidate_power bpvi_c_pvs_supplied_exponent_valuation_candidate_power. ((forall bpvi_i_pvs_supplied_exponent_valuation_candidate_power. (exists bpvi_repeat_gap_pvs_supplied_exponent_valuation_candidate_power. bpvi_repeat_gap_pvs_supplied_exponent_valuation_candidate_power + S bpvi_i_pvs_supplied_exponent_valuation_candidate_power = bpd_candidate_pvs_supplied_exponent_valuation) -> (((exists bpvi_h_pvs_supplied_exponent_valuation_candidate_power_repeat. bpvi_h_pvs_supplied_exponent_valuation_candidate_power_repeat + S (p) = S ((S (bpvi_i_pvs_supplied_exponent_valuation_candidate_power)) * bpvi_c_pvs_supplied_exponent_valuation_candidate_power)) /\ exists bpvi_q_pvs_supplied_exponent_valuation_candidate_power_repeat. bpvi_b_pvs_supplied_exponent_valuation_candidate_power = bpvi_q_pvs_supplied_exponent_valuation_candidate_power_repeat * S ((S (bpvi_i_pvs_supplied_exponent_valuation_candidate_power)) * bpvi_c_pvs_supplied_exponent_valuation_candidate_power) + (p)))) /\ (exists bpvi_u_pvs_supplied_exponent_valuation_candidate_power bpvi_v_pvs_supplied_exponent_valuation_candidate_power. ((((exists bpvi_h_pvs_supplied_exponent_valuation_candidate_power_start. bpvi_h_pvs_supplied_exponent_valuation_candidate_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_supplied_exponent_valuation_candidate_power)) /\ exists bpvi_q_pvs_supplied_exponent_valuation_candidate_power_start. bpvi_u_pvs_supplied_exponent_valuation_candidate_power = bpvi_q_pvs_supplied_exponent_valuation_candidate_power_start * S ((S (0)) * bpvi_v_pvs_supplied_exponent_valuation_candidate_power) + (1))) /\ ((((exists bpvi_h_pvs_supplied_exponent_valuation_candidate_power_terminal. bpvi_h_pvs_supplied_exponent_valuation_candidate_power_terminal + S (bpvi_result_pvs_supplied_exponent_valuation_candidate) = S ((S (bpd_candidate_pvs_supplied_exponent_valuation)) * bpvi_v_pvs_supplied_exponent_valuation_candidate_power)) /\ exists bpvi_q_pvs_supplied_exponent_valuation_candidate_power_terminal. bpvi_u_pvs_supplied_exponent_valuation_candidate_power = bpvi_q_pvs_supplied_exponent_valuation_candidate_power_terminal * S ((S (bpd_candidate_pvs_supplied_exponent_valuation)) * bpvi_v_pvs_supplied_exponent_valuation_candidate_power) + (bpvi_result_pvs_supplied_exponent_valuation_candidate))) /\ forall bpvi_j_pvs_supplied_exponent_valuation_candidate_power. (exists bpvi_product_gap_pvs_supplied_exponent_valuation_candidate_power. bpvi_product_gap_pvs_supplied_exponent_valuation_candidate_power + S bpvi_j_pvs_supplied_exponent_valuation_candidate_power = bpd_candidate_pvs_supplied_exponent_valuation) -> exists bpvi_factor_pvs_supplied_exponent_valuation_candidate_power bpvi_partial_pvs_supplied_exponent_valuation_candidate_power bpvi_successor_pvs_supplied_exponent_valuation_candidate_power. ((((exists bpvi_h_pvs_supplied_exponent_valuation_candidate_power_factor. bpvi_h_pvs_supplied_exponent_valuation_candidate_power_factor + S (bpvi_factor_pvs_supplied_exponent_valuation_candidate_power) = S ((S (bpvi_j_pvs_supplied_exponent_valuation_candidate_power)) * bpvi_c_pvs_supplied_exponent_valuation_candidate_power)) /\ exists bpvi_q_pvs_supplied_exponent_valuation_candidate_power_factor. bpvi_b_pvs_supplied_exponent_valuation_candidate_power = bpvi_q_pvs_supplied_exponent_valuation_candidate_power_factor * S ((S (bpvi_j_pvs_supplied_exponent_valuation_candidate_power)) * bpvi_c_pvs_supplied_exponent_valuation_candidate_power) + (bpvi_factor_pvs_supplied_exponent_valuation_candidate_power))) /\ ((((exists bpvi_h_pvs_supplied_exponent_valuation_candidate_power_partial. bpvi_h_pvs_supplied_exponent_valuation_candidate_power_partial + S (bpvi_partial_pvs_supplied_exponent_valuation_candidate_power) = S ((S (bpvi_j_pvs_supplied_exponent_valuation_candidate_power)) * bpvi_v_pvs_supplied_exponent_valuation_candidate_power)) /\ exists bpvi_q_pvs_supplied_exponent_valuation_candidate_power_partial. bpvi_u_pvs_supplied_exponent_valuation_candidate_power = bpvi_q_pvs_supplied_exponent_valuation_candidate_power_partial * S ((S (bpvi_j_pvs_supplied_exponent_valuation_candidate_power)) * bpvi_v_pvs_supplied_exponent_valuation_candidate_power) + (bpvi_partial_pvs_supplied_exponent_valuation_candidate_power))) /\ ((((exists bpvi_h_pvs_supplied_exponent_valuation_candidate_power_successor. bpvi_h_pvs_supplied_exponent_valuation_candidate_power_successor + S (bpvi_successor_pvs_supplied_exponent_valuation_candidate_power) = S ((S (S bpvi_j_pvs_supplied_exponent_valuation_candidate_power)) * bpvi_v_pvs_supplied_exponent_valuation_candidate_power)) /\ exists bpvi_q_pvs_supplied_exponent_valuation_candidate_power_successor. bpvi_u_pvs_supplied_exponent_valuation_candidate_power = bpvi_q_pvs_supplied_exponent_valuation_candidate_power_successor * S ((S (S bpvi_j_pvs_supplied_exponent_valuation_candidate_power)) * bpvi_v_pvs_supplied_exponent_valuation_candidate_power) + (bpvi_successor_pvs_supplied_exponent_valuation_candidate_power))) /\ bpvi_successor_pvs_supplied_exponent_valuation_candidate_power = bpvi_partial_pvs_supplied_exponent_valuation_candidate_power * bpvi_factor_pvs_supplied_exponent_valuation_candidate_power)))))))) /\ exists bpvi_divisor_factor_pvs_supplied_exponent_valuation_candidate. n = bpvi_result_pvs_supplied_exponent_valuation_candidate * bpvi_divisor_factor_pvs_supplied_exponent_valuation_candidate)) -> (exists bpd_gap_pvs_supplied_exponent_valuation_maximal. bpd_gap_pvs_supplied_exponent_valuation_maximal + (bpd_candidate_pvs_supplied_exponent_valuation) = (b))) -> (exists pa_b_olte_supplied_X pa_c_olte_supplied_X. ((forall pa_i_olte_supplied_X_repeat. (exists pa_lt_olte_supplied_X_repeat_bound. pa_lt_olte_supplied_X_repeat_bound + S pa_i_olte_supplied_X_repeat = n) -> (((exists pa_h_olte_supplied_X_repeat_decoded. pa_h_olte_supplied_X_repeat_decoded + S (x) = S ((S (pa_i_olte_supplied_X_repeat)) * pa_c_olte_supplied_X)) /\ exists pa_q_olte_supplied_X_repeat_decoded. pa_b_olte_supplied_X = pa_q_olte_supplied_X_repeat_decoded * S ((S (pa_i_olte_supplied_X_repeat)) * pa_c_olte_supplied_X) + (x)))) /\ (exists pa_u_olte_supplied_X_product pa_v_olte_supplied_X_product. ((((exists pa_h_olte_supplied_X_product_start. pa_h_olte_supplied_X_product_start + S (1) = S ((S (0)) * pa_v_olte_supplied_X_product)) /\ exists pa_q_olte_supplied_X_product_start. pa_u_olte_supplied_X_product = pa_q_olte_supplied_X_product_start * S ((S (0)) * pa_v_olte_supplied_X_product) + (1))) /\ ((((exists pa_h_olte_supplied_X_product_terminal. pa_h_olte_supplied_X_product_terminal + S (X) = S ((S (n)) * pa_v_olte_supplied_X_product)) /\ exists pa_q_olte_supplied_X_product_terminal. pa_u_olte_supplied_X_product = pa_q_olte_supplied_X_product_terminal * S ((S (n)) * pa_v_olte_supplied_X_product) + (X))) /\ forall pa_i_olte_supplied_X_product. (exists pa_lt_olte_supplied_X_product_bound. pa_lt_olte_supplied_X_product_bound + S pa_i_olte_supplied_X_product = n) -> exists pa_p_olte_supplied_X_product pa_r_olte_supplied_X_product pa_s_olte_supplied_X_product. ((((exists pa_h_olte_supplied_X_product_factor. pa_h_olte_supplied_X_product_factor + S (pa_p_olte_supplied_X_product) = S ((S (pa_i_olte_supplied_X_product)) * pa_c_olte_supplied_X)) /\ exists pa_q_olte_supplied_X_product_factor. pa_b_olte_supplied_X = pa_q_olte_supplied_X_product_factor * S ((S (pa_i_olte_supplied_X_product)) * pa_c_olte_supplied_X) + (pa_p_olte_supplied_X_product))) /\ ((((exists pa_h_olte_supplied_X_product_partial. pa_h_olte_supplied_X_product_partial + S (pa_r_olte_supplied_X_product) = S ((S (pa_i_olte_supplied_X_product)) * pa_v_olte_supplied_X_product)) /\ exists pa_q_olte_supplied_X_product_partial. pa_u_olte_supplied_X_product = pa_q_olte_supplied_X_product_partial * S ((S (pa_i_olte_supplied_X_product)) * pa_v_olte_supplied_X_product) + (pa_r_olte_supplied_X_product))) /\ ((((exists pa_h_olte_supplied_X_product_successor. pa_h_olte_supplied_X_product_successor + S (pa_s_olte_supplied_X_product) = S ((S (S pa_i_olte_supplied_X_product)) * pa_v_olte_supplied_X_product)) /\ exists pa_q_olte_supplied_X_product_successor. pa_u_olte_supplied_X_product = pa_q_olte_supplied_X_product_successor * S ((S (S pa_i_olte_supplied_X_product)) * pa_v_olte_supplied_X_product) + (pa_s_olte_supplied_X_product))) /\ pa_s_olte_supplied_X_product = pa_r_olte_supplied_X_product * pa_p_olte_supplied_X_product)))))))) -> (exists pa_b_olte_supplied_Y pa_c_olte_supplied_Y. ((forall pa_i_olte_supplied_Y_repeat. (exists pa_lt_olte_supplied_Y_repeat_bound. pa_lt_olte_supplied_Y_repeat_bound + S pa_i_olte_supplied_Y_repeat = n) -> (((exists pa_h_olte_supplied_Y_repeat_decoded. pa_h_olte_supplied_Y_repeat_decoded + S (y) = S ((S (pa_i_olte_supplied_Y_repeat)) * pa_c_olte_supplied_Y)) /\ exists pa_q_olte_supplied_Y_repeat_decoded. pa_b_olte_supplied_Y = pa_q_olte_supplied_Y_repeat_decoded * S ((S (pa_i_olte_supplied_Y_repeat)) * pa_c_olte_supplied_Y) + (y)))) /\ (exists pa_u_olte_supplied_Y_product pa_v_olte_supplied_Y_product. ((((exists pa_h_olte_supplied_Y_product_start. pa_h_olte_supplied_Y_product_start + S (1) = S ((S (0)) * pa_v_olte_supplied_Y_product)) /\ exists pa_q_olte_supplied_Y_product_start. pa_u_olte_supplied_Y_product = pa_q_olte_supplied_Y_product_start * S ((S (0)) * pa_v_olte_supplied_Y_product) + (1))) /\ ((((exists pa_h_olte_supplied_Y_product_terminal. pa_h_olte_supplied_Y_product_terminal + S (Y) = S ((S (n)) * pa_v_olte_supplied_Y_product)) /\ exists pa_q_olte_supplied_Y_product_terminal. pa_u_olte_supplied_Y_product = pa_q_olte_supplied_Y_product_terminal * S ((S (n)) * pa_v_olte_supplied_Y_product) + (Y))) /\ forall pa_i_olte_supplied_Y_product. (exists pa_lt_olte_supplied_Y_product_bound. pa_lt_olte_supplied_Y_product_bound + S pa_i_olte_supplied_Y_product = n) -> exists pa_p_olte_supplied_Y_product pa_r_olte_supplied_Y_product pa_s_olte_supplied_Y_product. ((((exists pa_h_olte_supplied_Y_product_factor. pa_h_olte_supplied_Y_product_factor + S (pa_p_olte_supplied_Y_product) = S ((S (pa_i_olte_supplied_Y_product)) * pa_c_olte_supplied_Y)) /\ exists pa_q_olte_supplied_Y_product_factor. pa_b_olte_supplied_Y = pa_q_olte_supplied_Y_product_factor * S ((S (pa_i_olte_supplied_Y_product)) * pa_c_olte_supplied_Y) + (pa_p_olte_supplied_Y_product))) /\ ((((exists pa_h_olte_supplied_Y_product_partial. pa_h_olte_supplied_Y_product_partial + S (pa_r_olte_supplied_Y_product) = S ((S (pa_i_olte_supplied_Y_product)) * pa_v_olte_supplied_Y_product)) /\ exists pa_q_olte_supplied_Y_product_partial. pa_u_olte_supplied_Y_product = pa_q_olte_supplied_Y_product_partial * S ((S (pa_i_olte_supplied_Y_product)) * pa_v_olte_supplied_Y_product) + (pa_r_olte_supplied_Y_product))) /\ ((((exists pa_h_olte_supplied_Y_product_successor. pa_h_olte_supplied_Y_product_successor + S (pa_s_olte_supplied_Y_product) = S ((S (S pa_i_olte_supplied_Y_product)) * pa_v_olte_supplied_Y_product)) /\ exists pa_q_olte_supplied_Y_product_successor. pa_u_olte_supplied_Y_product = pa_q_olte_supplied_Y_product_successor * S ((S (S pa_i_olte_supplied_Y_product)) * pa_v_olte_supplied_Y_product) + (pa_s_olte_supplied_Y_product))) /\ pa_s_olte_supplied_Y_product = pa_r_olte_supplied_Y_product * pa_p_olte_supplied_Y_product)))))))) -> X = Y + D -> (((exists bpd_gap_pvs_supplied_result_selected_bound. bpd_gap_pvs_supplied_result_selected_bound + (a + b) = (D)) /\ (exists bpvi_result_pvs_supplied_result_selected. ((exists bpvi_b_pvs_supplied_result_selected_power bpvi_c_pvs_supplied_result_selected_power. ((forall bpvi_i_pvs_supplied_result_selected_power. (exists bpvi_repeat_gap_pvs_supplied_result_selected_power. bpvi_repeat_gap_pvs_supplied_result_selected_power + S bpvi_i_pvs_supplied_result_selected_power = a + b) -> (((exists bpvi_h_pvs_supplied_result_selected_power_repeat. bpvi_h_pvs_supplied_result_selected_power_repeat + S (p) = S ((S (bpvi_i_pvs_supplied_result_selected_power)) * bpvi_c_pvs_supplied_result_selected_power)) /\ exists bpvi_q_pvs_supplied_result_selected_power_repeat. bpvi_b_pvs_supplied_result_selected_power = bpvi_q_pvs_supplied_result_selected_power_repeat * S ((S (bpvi_i_pvs_supplied_result_selected_power)) * bpvi_c_pvs_supplied_result_selected_power) + (p)))) /\ (exists bpvi_u_pvs_supplied_result_selected_power bpvi_v_pvs_supplied_result_selected_power. ((((exists bpvi_h_pvs_supplied_result_selected_power_start. bpvi_h_pvs_supplied_result_selected_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_supplied_result_selected_power)) /\ exists bpvi_q_pvs_supplied_result_selected_power_start. bpvi_u_pvs_supplied_result_selected_power = bpvi_q_pvs_supplied_result_selected_power_start * S ((S (0)) * bpvi_v_pvs_supplied_result_selected_power) + (1))) /\ ((((exists bpvi_h_pvs_supplied_result_selected_power_terminal. bpvi_h_pvs_supplied_result_selected_power_terminal + S (bpvi_result_pvs_supplied_result_selected) = S ((S (a + b)) * bpvi_v_pvs_supplied_result_selected_power)) /\ exists bpvi_q_pvs_supplied_result_selected_power_terminal. bpvi_u_pvs_supplied_result_selected_power = bpvi_q_pvs_supplied_result_selected_power_terminal * S ((S (a + b)) * bpvi_v_pvs_supplied_result_selected_power) + (bpvi_result_pvs_supplied_result_selected))) /\ forall bpvi_j_pvs_supplied_result_selected_power. (exists bpvi_product_gap_pvs_supplied_result_selected_power. bpvi_product_gap_pvs_supplied_result_selected_power + S bpvi_j_pvs_supplied_result_selected_power = a + b) -> exists bpvi_factor_pvs_supplied_result_selected_power bpvi_partial_pvs_supplied_result_selected_power bpvi_successor_pvs_supplied_result_selected_power. ((((exists bpvi_h_pvs_supplied_result_selected_power_factor. bpvi_h_pvs_supplied_result_selected_power_factor + S (bpvi_factor_pvs_supplied_result_selected_power) = S ((S (bpvi_j_pvs_supplied_result_selected_power)) * bpvi_c_pvs_supplied_result_selected_power)) /\ exists bpvi_q_pvs_supplied_result_selected_power_factor. bpvi_b_pvs_supplied_result_selected_power = bpvi_q_pvs_supplied_result_selected_power_factor * S ((S (bpvi_j_pvs_supplied_result_selected_power)) * bpvi_c_pvs_supplied_result_selected_power) + (bpvi_factor_pvs_supplied_result_selected_power))) /\ ((((exists bpvi_h_pvs_supplied_result_selected_power_partial. bpvi_h_pvs_supplied_result_selected_power_partial + S (bpvi_partial_pvs_supplied_result_selected_power) = S ((S (bpvi_j_pvs_supplied_result_selected_power)) * bpvi_v_pvs_supplied_result_selected_power)) /\ exists bpvi_q_pvs_supplied_result_selected_power_partial. bpvi_u_pvs_supplied_result_selected_power = bpvi_q_pvs_supplied_result_selected_power_partial * S ((S (bpvi_j_pvs_supplied_result_selected_power)) * bpvi_v_pvs_supplied_result_selected_power) + (bpvi_partial_pvs_supplied_result_selected_power))) /\ ((((exists bpvi_h_pvs_supplied_result_selected_power_successor. bpvi_h_pvs_supplied_result_selected_power_successor + S (bpvi_successor_pvs_supplied_result_selected_power) = S ((S (S bpvi_j_pvs_supplied_result_selected_power)) * bpvi_v_pvs_supplied_result_selected_power)) /\ exists bpvi_q_pvs_supplied_result_selected_power_successor. bpvi_u_pvs_supplied_result_selected_power = bpvi_q_pvs_supplied_result_selected_power_successor * S ((S (S bpvi_j_pvs_supplied_result_selected_power)) * bpvi_v_pvs_supplied_result_selected_power) + (bpvi_successor_pvs_supplied_result_selected_power))) /\ bpvi_successor_pvs_supplied_result_selected_power = bpvi_partial_pvs_supplied_result_selected_power * bpvi_factor_pvs_supplied_result_selected_power)))))))) /\ exists bpvi_divisor_factor_pvs_supplied_result_selected. D = bpvi_result_pvs_supplied_result_selected * bpvi_divisor_factor_pvs_supplied_result_selected))) /\ forall bpd_candidate_pvs_supplied_result. (exists bpd_gap_pvs_supplied_result_candidate_bound. bpd_gap_pvs_supplied_result_candidate_bound + (bpd_candidate_pvs_supplied_result) = (D)) -> (exists bpvi_result_pvs_supplied_result_candidate. ((exists bpvi_b_pvs_supplied_result_candidate_power bpvi_c_pvs_supplied_result_candidate_power. ((forall bpvi_i_pvs_supplied_result_candidate_power. (exists bpvi_repeat_gap_pvs_supplied_result_candidate_power. bpvi_repeat_gap_pvs_supplied_result_candidate_power + S bpvi_i_pvs_supplied_result_candidate_power = bpd_candidate_pvs_supplied_result) -> (((exists bpvi_h_pvs_supplied_result_candidate_power_repeat. bpvi_h_pvs_supplied_result_candidate_power_repeat + S (p) = S ((S (bpvi_i_pvs_supplied_result_candidate_power)) * bpvi_c_pvs_supplied_result_candidate_power)) /\ exists bpvi_q_pvs_supplied_result_candidate_power_repeat. bpvi_b_pvs_supplied_result_candidate_power = bpvi_q_pvs_supplied_result_candidate_power_repeat * S ((S (bpvi_i_pvs_supplied_result_candidate_power)) * bpvi_c_pvs_supplied_result_candidate_power) + (p)))) /\ (exists bpvi_u_pvs_supplied_result_candidate_power bpvi_v_pvs_supplied_result_candidate_power. ((((exists bpvi_h_pvs_supplied_result_candidate_power_start. bpvi_h_pvs_supplied_result_candidate_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_supplied_result_candidate_power)) /\ exists bpvi_q_pvs_supplied_result_candidate_power_start. bpvi_u_pvs_supplied_result_candidate_power = bpvi_q_pvs_supplied_result_candidate_power_start * S ((S (0)) * bpvi_v_pvs_supplied_result_candidate_power) + (1))) /\ ((((exists bpvi_h_pvs_supplied_result_candidate_power_terminal. bpvi_h_pvs_supplied_result_candidate_power_terminal + S (bpvi_result_pvs_supplied_result_candidate) = S ((S (bpd_candidate_pvs_supplied_result)) * bpvi_v_pvs_supplied_result_candidate_power)) /\ exists bpvi_q_pvs_supplied_result_candidate_power_terminal. bpvi_u_pvs_supplied_result_candidate_power = bpvi_q_pvs_supplied_result_candidate_power_terminal * S ((S (bpd_candidate_pvs_supplied_result)) * bpvi_v_pvs_supplied_result_candidate_power) + (bpvi_result_pvs_supplied_result_candidate))) /\ forall bpvi_j_pvs_supplied_result_candidate_power. (exists bpvi_product_gap_pvs_supplied_result_candidate_power. bpvi_product_gap_pvs_supplied_result_candidate_power + S bpvi_j_pvs_supplied_result_candidate_power = bpd_candidate_pvs_supplied_result) -> exists bpvi_factor_pvs_supplied_result_candidate_power bpvi_partial_pvs_supplied_result_candidate_power bpvi_successor_pvs_supplied_result_candidate_power. ((((exists bpvi_h_pvs_supplied_result_candidate_power_factor. bpvi_h_pvs_supplied_result_candidate_power_factor + S (bpvi_factor_pvs_supplied_result_candidate_power) = S ((S (bpvi_j_pvs_supplied_result_candidate_power)) * bpvi_c_pvs_supplied_result_candidate_power)) /\ exists bpvi_q_pvs_supplied_result_candidate_power_factor. bpvi_b_pvs_supplied_result_candidate_power = bpvi_q_pvs_supplied_result_candidate_power_factor * S ((S (bpvi_j_pvs_supplied_result_candidate_power)) * bpvi_c_pvs_supplied_result_candidate_power) + (bpvi_factor_pvs_supplied_result_candidate_power))) /\ ((((exists bpvi_h_pvs_supplied_result_candidate_power_partial. bpvi_h_pvs_supplied_result_candidate_power_partial + S (bpvi_partial_pvs_supplied_result_candidate_power) = S ((S (bpvi_j_pvs_supplied_result_candidate_power)) * bpvi_v_pvs_supplied_result_candidate_power)) /\ exists bpvi_q_pvs_supplied_result_candidate_power_partial. bpvi_u_pvs_supplied_result_candidate_power = bpvi_q_pvs_supplied_result_candidate_power_partial * S ((S (bpvi_j_pvs_supplied_result_candidate_power)) * bpvi_v_pvs_supplied_result_candidate_power) + (bpvi_partial_pvs_supplied_result_candidate_power))) /\ ((((exists bpvi_h_pvs_supplied_result_candidate_power_successor. bpvi_h_pvs_supplied_result_candidate_power_successor + S (bpvi_successor_pvs_supplied_result_candidate_power) = S ((S (S bpvi_j_pvs_supplied_result_candidate_power)) * bpvi_v_pvs_supplied_result_candidate_power)) /\ exists bpvi_q_pvs_supplied_result_candidate_power_successor. bpvi_u_pvs_supplied_result_candidate_power = bpvi_q_pvs_supplied_result_candidate_power_successor * S ((S (S bpvi_j_pvs_supplied_result_candidate_power)) * bpvi_v_pvs_supplied_result_candidate_power) + (bpvi_successor_pvs_supplied_result_candidate_power))) /\ bpvi_successor_pvs_supplied_result_candidate_power = bpvi_partial_pvs_supplied_result_candidate_power * bpvi_factor_pvs_supplied_result_candidate_power)))))))) /\ exists bpvi_divisor_factor_pvs_supplied_result_candidate. D = bpvi_result_pvs_supplied_result_candidate * bpvi_divisor_factor_pvs_supplied_result_candidate)) -> (exists bpd_gap_pvs_supplied_result_maximal. bpd_gap_pvs_supplied_result_maximal + (bpd_candidate_pvs_supplied_result) = (a + b)))

Complete tactic proof in conservative notation

All 73 original proof lines are preserved. Only local proposition formulas are abbreviated; every abbreviation has an exact binder-safe expansion check. The linked exact edition contains the unchanged replay script.

Read the argument

Proof checkpoints

73 script commands · 9 reading checkpoints · 1 local claims

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

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 (2)
01Fix variables and assumptionsL1–10

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

  1. L1
    intro p
  2. L2
    intro x
  3. L3
    intro y
  4. L4
    intro d
  5. L5
    intro n
  6. L6
    intro a
  7. L7
    intro b
  8. L8
    intro X
  9. L9
    intro Y
  10. L10
    intro D
02Fix variables and assumptionsL11–20

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

  1. L11
    intro hp
  2. L12
    intro hpgt
  3. L13
    intro hxy
  4. L14
    intro hyzero
  5. L15
    intro hnzero
  6. L16
    intro hbalance
  7. L17
    intro hdiv
  8. L18
    intro hunits
  9. L19
    intro hvd
  10. L20
    intro hvn
03Fix variables and assumptionsL21–23

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

  1. L21
    intro hX
  2. L22
    intro hY
  3. L23
    intro hD
04Establish hresultL24–33

Establish this local claim before using it. It is not an additional assumption. The following proof commands apply odd prime lifting the exponent.

  1. L24
    have hresult : ∃ A. ∃ B. ∃ E. LiftedPowerDifference(p,x,y,n,a + b,A,B,E)Definitions: LiftedPowerDifference(p,x,y,n,a + b,A,B,E)Original native command in the exact edition
  2. L25
    specialize odd_prime_lifting_the_exponent (p)
  3. L26
    specialize odd_prime_lifting_the_exponent (x)
  4. L27
    specialize odd_prime_lifting_the_exponent (y)
  5. L28
    specialize odd_prime_lifting_the_exponent (d)
  6. L29
    specialize odd_prime_lifting_the_exponent (n)
  7. L30
    specialize odd_prime_lifting_the_exponent (a)
  8. L31
    specialize odd_prime_lifting_the_exponent (b)
  9. L32
    apply odd_prime_lifting_the_exponent
  10. L33
    exact hp
05Use earlier factsL34–42

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

  1. L34
    exact hpgt
  2. L35
    exact hxy
  3. L36
    exact hyzero
  4. L37
    exact hnzero
  5. L38
    exact hbalance
  6. L39
    exact hdiv
  7. L40
    exact hunits
  8. L41
    exact hvd
  9. L42
    exact hvn
06Separate the logical casesL43–51

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

  1. L43
    cases hresult
  2. L44
    cases hresult_witness
  3. L45
    cases hresult_witness_witness
  4. L46
    cases hresult_witness_witness_witness
  5. L47
    cases hresult_witness_witness_witness_right
  6. L48
    cases hresult_witness_witness_witness_right_right
  7. L49
    cases hresult_witness_witness_witness_right_right_right
  8. L50
    cases hresult_witness_witness_witness_right_right_right_right
  9. L51
    cases hresult_witness_witness_witness_right_right_right_right_right
07Use earlier factsL52–61

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

  1. L52
    specialize power_valuation_value_eq_transport (p)
  2. L53
    specialize power_valuation_value_eq_transport (x3)
  3. L54
    specialize power_valuation_value_eq_transport (D)
  4. L55
    specialize power_valuation_value_eq_transport (a + b)
  5. L56
    apply power_valuation_value_eq_transport
  6. L57
    specialize lte_power_difference_functional (x)
  7. L58
    specialize lte_power_difference_functional (y)
  8. L59
    specialize lte_power_difference_functional (n)
  9. L60
    specialize lte_power_difference_functional (x1)
  10. L61
    specialize lte_power_difference_functional (x2)
08Use earlier factsL62–71

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

  1. L62
    specialize lte_power_difference_functional (x3)
  2. L63
    specialize lte_power_difference_functional (X)
  3. L64
    specialize lte_power_difference_functional (Y)
  4. L65
    specialize lte_power_difference_functional (D)
  5. L66
    apply lte_power_difference_functional
  6. L67
    exact hresult_witness_witness_witness_left
  7. L68
    exact hresult_witness_witness_witness_right_left
  8. L69
    exact hresult_witness_witness_witness_right_right_left
  9. L70
    exact hX
  10. L71
    exact hY
09Use earlier factsL72–73

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

  1. L72
    exact hD
  2. L73
    exact hresult_witness_witness_witness_right_right_right_right_right_right

Library-wide reading audit

Original defined command ledger · 73 lines
  1. 0001intro p
  2. 0002intro x
  3. 0003intro y
  4. 0004intro d
  5. 0005intro n
  6. 0006intro a
  7. 0007intro b
  8. 0008intro X
  9. 0009intro Y
  10. 0010intro D
  11. 0011intro hp
  12. 0012intro hpgt
  13. 0013intro hxy
  14. 0014intro hyzero
  15. 0015intro hnzero
  16. 0016intro hbalance
  17. 0017intro hdiv
  18. 0018intro hunits
  19. 0019intro hvd
  20. 0020intro hvn
  21. 0021intro hX
  22. 0022intro hY
  23. 0023intro hD
  24. 0024have hresult : ∃ A. ∃ B. ∃ E. LiftedPowerDifference(p,x,y,n,a + b,A,B,E)
  25. 0025specialize odd_prime_lifting_the_exponent (p)
  26. 0026specialize odd_prime_lifting_the_exponent (x)
  27. 0027specialize odd_prime_lifting_the_exponent (y)
  28. 0028specialize odd_prime_lifting_the_exponent (d)
  29. 0029specialize odd_prime_lifting_the_exponent (n)
  30. 0030specialize odd_prime_lifting_the_exponent (a)
  31. 0031specialize odd_prime_lifting_the_exponent (b)
  32. 0032apply odd_prime_lifting_the_exponent
  33. 0033exact hp
  34. 0034exact hpgt
  35. 0035exact hxy
  36. 0036exact hyzero
  37. 0037exact hnzero
  38. 0038exact hbalance
  39. 0039exact hdiv
  40. 0040exact hunits
  41. 0041exact hvd
  42. 0042exact hvn
  43. 0043cases hresult
  44. 0044cases hresult_witness
  45. 0045cases hresult_witness_witness
  46. 0046cases hresult_witness_witness_witness
  47. 0047cases hresult_witness_witness_witness_right
  48. 0048cases hresult_witness_witness_witness_right_right
  49. 0049cases hresult_witness_witness_witness_right_right_right
  50. 0050cases hresult_witness_witness_witness_right_right_right_right
  51. 0051cases hresult_witness_witness_witness_right_right_right_right_right
  52. 0052specialize power_valuation_value_eq_transport (p)
  53. 0053specialize power_valuation_value_eq_transport (x3)
  54. 0054specialize power_valuation_value_eq_transport (D)
  55. 0055specialize power_valuation_value_eq_transport (a + b)
  56. 0056apply power_valuation_value_eq_transport
  57. 0057specialize lte_power_difference_functional (x)
  58. 0058specialize lte_power_difference_functional (y)
  59. 0059specialize lte_power_difference_functional (n)
  60. 0060specialize lte_power_difference_functional (x1)
  61. 0061specialize lte_power_difference_functional (x2)
  62. 0062specialize lte_power_difference_functional (x3)
  63. 0063specialize lte_power_difference_functional (X)
  64. 0064specialize lte_power_difference_functional (Y)
  65. 0065specialize lte_power_difference_functional (D)
  66. 0066apply lte_power_difference_functional
  67. 0067exact hresult_witness_witness_witness_left
  68. 0068exact hresult_witness_witness_witness_right_left
  69. 0069exact hresult_witness_witness_witness_right_right_left
  70. 0070exact hX
  71. 0071exact hY
  72. 0072exact hD
  73. 0073exact hresult_witness_witness_witness_right_right_right_right_right_right