EL0021

lte_positive_exponent_exact

For every positive exponent, strip its actual prime-power valuation, iterate the prime step, and apply the nondivisor cofactor step to construct the full exact LTE valuation.

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. ∀ a. ∀ b. ∀ d. ∀ n. ∀ e. ∀ k. ¬p = 1 ∧ (∀ x. ∀ y. p = x · y → x = 1 ∨ y = 1) → ¬p = 2 → a = b + d → ¬d = 0 → Dvd(p,d) → ¬Dvd(p,b) → ¬n = 0 → BoundedPowerValuation(p,d,d,e)BoundedPowerValuation(p,n,n,k) → ∃ x. ∃ y. ∃ z. LiftedPowerDifference(p,a,b,n,e + k,x,y,z)

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

Definition DAG

Actual proof prerequisites

power_valuation_exact_cofactor · checked external prerequisitelte_prime_power_iterationpow_functional · checked external prerequisitelte_coprime_exponent_steplte_power_iteration_construct
Original expanded first-order statement
forall p a b d n e k. (~((p) = 1) /\ forall pvs_left_general_prime pvs_right_general_prime. (p) = pvs_left_general_prime * pvs_right_general_prime -> pvs_left_general_prime = 1 \/ pvs_right_general_prime = 1) -> ~(p = 2) -> a = b + d -> ~(d = 0) -> (exists olte_factor_general_divisor. (d) = (p) * olte_factor_general_divisor) -> ~(exists olte_factor_general_unit. (b) = (p) * olte_factor_general_unit) -> ~(n = 0) -> (((exists bpd_gap_pvs_general_difference_valuation_selected_bound. bpd_gap_pvs_general_difference_valuation_selected_bound + (e) = (d)) /\ (exists bpvi_result_pvs_general_difference_valuation_selected. ((exists bpvi_b_pvs_general_difference_valuation_selected_power bpvi_c_pvs_general_difference_valuation_selected_power. ((forall bpvi_i_pvs_general_difference_valuation_selected_power. (exists bpvi_repeat_gap_pvs_general_difference_valuation_selected_power. bpvi_repeat_gap_pvs_general_difference_valuation_selected_power + S bpvi_i_pvs_general_difference_valuation_selected_power = e) -> (((exists bpvi_h_pvs_general_difference_valuation_selected_power_repeat. bpvi_h_pvs_general_difference_valuation_selected_power_repeat + S (p) = S ((S (bpvi_i_pvs_general_difference_valuation_selected_power)) * bpvi_c_pvs_general_difference_valuation_selected_power)) /\ exists bpvi_q_pvs_general_difference_valuation_selected_power_repeat. bpvi_b_pvs_general_difference_valuation_selected_power = bpvi_q_pvs_general_difference_valuation_selected_power_repeat * S ((S (bpvi_i_pvs_general_difference_valuation_selected_power)) * bpvi_c_pvs_general_difference_valuation_selected_power) + (p)))) /\ (exists bpvi_u_pvs_general_difference_valuation_selected_power bpvi_v_pvs_general_difference_valuation_selected_power. ((((exists bpvi_h_pvs_general_difference_valuation_selected_power_start. bpvi_h_pvs_general_difference_valuation_selected_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_general_difference_valuation_selected_power)) /\ exists bpvi_q_pvs_general_difference_valuation_selected_power_start. bpvi_u_pvs_general_difference_valuation_selected_power = bpvi_q_pvs_general_difference_valuation_selected_power_start * S ((S (0)) * bpvi_v_pvs_general_difference_valuation_selected_power) + (1))) /\ ((((exists bpvi_h_pvs_general_difference_valuation_selected_power_terminal. bpvi_h_pvs_general_difference_valuation_selected_power_terminal + S (bpvi_result_pvs_general_difference_valuation_selected) = S ((S (e)) * bpvi_v_pvs_general_difference_valuation_selected_power)) /\ exists bpvi_q_pvs_general_difference_valuation_selected_power_terminal. bpvi_u_pvs_general_difference_valuation_selected_power = bpvi_q_pvs_general_difference_valuation_selected_power_terminal * S ((S (e)) * bpvi_v_pvs_general_difference_valuation_selected_power) + (bpvi_result_pvs_general_difference_valuation_selected))) /\ forall bpvi_j_pvs_general_difference_valuation_selected_power. (exists bpvi_product_gap_pvs_general_difference_valuation_selected_power. bpvi_product_gap_pvs_general_difference_valuation_selected_power + S bpvi_j_pvs_general_difference_valuation_selected_power = e) -> exists bpvi_factor_pvs_general_difference_valuation_selected_power bpvi_partial_pvs_general_difference_valuation_selected_power bpvi_successor_pvs_general_difference_valuation_selected_power. ((((exists bpvi_h_pvs_general_difference_valuation_selected_power_factor. bpvi_h_pvs_general_difference_valuation_selected_power_factor + S (bpvi_factor_pvs_general_difference_valuation_selected_power) = S ((S (bpvi_j_pvs_general_difference_valuation_selected_power)) * bpvi_c_pvs_general_difference_valuation_selected_power)) /\ exists bpvi_q_pvs_general_difference_valuation_selected_power_factor. bpvi_b_pvs_general_difference_valuation_selected_power = bpvi_q_pvs_general_difference_valuation_selected_power_factor * S ((S (bpvi_j_pvs_general_difference_valuation_selected_power)) * bpvi_c_pvs_general_difference_valuation_selected_power) + (bpvi_factor_pvs_general_difference_valuation_selected_power))) /\ ((((exists bpvi_h_pvs_general_difference_valuation_selected_power_partial. bpvi_h_pvs_general_difference_valuation_selected_power_partial + S (bpvi_partial_pvs_general_difference_valuation_selected_power) = S ((S (bpvi_j_pvs_general_difference_valuation_selected_power)) * bpvi_v_pvs_general_difference_valuation_selected_power)) /\ exists bpvi_q_pvs_general_difference_valuation_selected_power_partial. bpvi_u_pvs_general_difference_valuation_selected_power = bpvi_q_pvs_general_difference_valuation_selected_power_partial * S ((S (bpvi_j_pvs_general_difference_valuation_selected_power)) * bpvi_v_pvs_general_difference_valuation_selected_power) + (bpvi_partial_pvs_general_difference_valuation_selected_power))) /\ ((((exists bpvi_h_pvs_general_difference_valuation_selected_power_successor. bpvi_h_pvs_general_difference_valuation_selected_power_successor + S (bpvi_successor_pvs_general_difference_valuation_selected_power) = S ((S (S bpvi_j_pvs_general_difference_valuation_selected_power)) * bpvi_v_pvs_general_difference_valuation_selected_power)) /\ exists bpvi_q_pvs_general_difference_valuation_selected_power_successor. bpvi_u_pvs_general_difference_valuation_selected_power = bpvi_q_pvs_general_difference_valuation_selected_power_successor * S ((S (S bpvi_j_pvs_general_difference_valuation_selected_power)) * bpvi_v_pvs_general_difference_valuation_selected_power) + (bpvi_successor_pvs_general_difference_valuation_selected_power))) /\ bpvi_successor_pvs_general_difference_valuation_selected_power = bpvi_partial_pvs_general_difference_valuation_selected_power * bpvi_factor_pvs_general_difference_valuation_selected_power)))))))) /\ exists bpvi_divisor_factor_pvs_general_difference_valuation_selected. d = bpvi_result_pvs_general_difference_valuation_selected * bpvi_divisor_factor_pvs_general_difference_valuation_selected))) /\ forall bpd_candidate_pvs_general_difference_valuation. (exists bpd_gap_pvs_general_difference_valuation_candidate_bound. bpd_gap_pvs_general_difference_valuation_candidate_bound + (bpd_candidate_pvs_general_difference_valuation) = (d)) -> (exists bpvi_result_pvs_general_difference_valuation_candidate. ((exists bpvi_b_pvs_general_difference_valuation_candidate_power bpvi_c_pvs_general_difference_valuation_candidate_power. ((forall bpvi_i_pvs_general_difference_valuation_candidate_power. (exists bpvi_repeat_gap_pvs_general_difference_valuation_candidate_power. bpvi_repeat_gap_pvs_general_difference_valuation_candidate_power + S bpvi_i_pvs_general_difference_valuation_candidate_power = bpd_candidate_pvs_general_difference_valuation) -> (((exists bpvi_h_pvs_general_difference_valuation_candidate_power_repeat. bpvi_h_pvs_general_difference_valuation_candidate_power_repeat + S (p) = S ((S (bpvi_i_pvs_general_difference_valuation_candidate_power)) * bpvi_c_pvs_general_difference_valuation_candidate_power)) /\ exists bpvi_q_pvs_general_difference_valuation_candidate_power_repeat. bpvi_b_pvs_general_difference_valuation_candidate_power = bpvi_q_pvs_general_difference_valuation_candidate_power_repeat * S ((S (bpvi_i_pvs_general_difference_valuation_candidate_power)) * bpvi_c_pvs_general_difference_valuation_candidate_power) + (p)))) /\ (exists bpvi_u_pvs_general_difference_valuation_candidate_power bpvi_v_pvs_general_difference_valuation_candidate_power. ((((exists bpvi_h_pvs_general_difference_valuation_candidate_power_start. bpvi_h_pvs_general_difference_valuation_candidate_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_general_difference_valuation_candidate_power)) /\ exists bpvi_q_pvs_general_difference_valuation_candidate_power_start. bpvi_u_pvs_general_difference_valuation_candidate_power = bpvi_q_pvs_general_difference_valuation_candidate_power_start * S ((S (0)) * bpvi_v_pvs_general_difference_valuation_candidate_power) + (1))) /\ ((((exists bpvi_h_pvs_general_difference_valuation_candidate_power_terminal. bpvi_h_pvs_general_difference_valuation_candidate_power_terminal + S (bpvi_result_pvs_general_difference_valuation_candidate) = S ((S (bpd_candidate_pvs_general_difference_valuation)) * bpvi_v_pvs_general_difference_valuation_candidate_power)) /\ exists bpvi_q_pvs_general_difference_valuation_candidate_power_terminal. bpvi_u_pvs_general_difference_valuation_candidate_power = bpvi_q_pvs_general_difference_valuation_candidate_power_terminal * S ((S (bpd_candidate_pvs_general_difference_valuation)) * bpvi_v_pvs_general_difference_valuation_candidate_power) + (bpvi_result_pvs_general_difference_valuation_candidate))) /\ forall bpvi_j_pvs_general_difference_valuation_candidate_power. (exists bpvi_product_gap_pvs_general_difference_valuation_candidate_power. bpvi_product_gap_pvs_general_difference_valuation_candidate_power + S bpvi_j_pvs_general_difference_valuation_candidate_power = bpd_candidate_pvs_general_difference_valuation) -> exists bpvi_factor_pvs_general_difference_valuation_candidate_power bpvi_partial_pvs_general_difference_valuation_candidate_power bpvi_successor_pvs_general_difference_valuation_candidate_power. ((((exists bpvi_h_pvs_general_difference_valuation_candidate_power_factor. bpvi_h_pvs_general_difference_valuation_candidate_power_factor + S (bpvi_factor_pvs_general_difference_valuation_candidate_power) = S ((S (bpvi_j_pvs_general_difference_valuation_candidate_power)) * bpvi_c_pvs_general_difference_valuation_candidate_power)) /\ exists bpvi_q_pvs_general_difference_valuation_candidate_power_factor. bpvi_b_pvs_general_difference_valuation_candidate_power = bpvi_q_pvs_general_difference_valuation_candidate_power_factor * S ((S (bpvi_j_pvs_general_difference_valuation_candidate_power)) * bpvi_c_pvs_general_difference_valuation_candidate_power) + (bpvi_factor_pvs_general_difference_valuation_candidate_power))) /\ ((((exists bpvi_h_pvs_general_difference_valuation_candidate_power_partial. bpvi_h_pvs_general_difference_valuation_candidate_power_partial + S (bpvi_partial_pvs_general_difference_valuation_candidate_power) = S ((S (bpvi_j_pvs_general_difference_valuation_candidate_power)) * bpvi_v_pvs_general_difference_valuation_candidate_power)) /\ exists bpvi_q_pvs_general_difference_valuation_candidate_power_partial. bpvi_u_pvs_general_difference_valuation_candidate_power = bpvi_q_pvs_general_difference_valuation_candidate_power_partial * S ((S (bpvi_j_pvs_general_difference_valuation_candidate_power)) * bpvi_v_pvs_general_difference_valuation_candidate_power) + (bpvi_partial_pvs_general_difference_valuation_candidate_power))) /\ ((((exists bpvi_h_pvs_general_difference_valuation_candidate_power_successor. bpvi_h_pvs_general_difference_valuation_candidate_power_successor + S (bpvi_successor_pvs_general_difference_valuation_candidate_power) = S ((S (S bpvi_j_pvs_general_difference_valuation_candidate_power)) * bpvi_v_pvs_general_difference_valuation_candidate_power)) /\ exists bpvi_q_pvs_general_difference_valuation_candidate_power_successor. bpvi_u_pvs_general_difference_valuation_candidate_power = bpvi_q_pvs_general_difference_valuation_candidate_power_successor * S ((S (S bpvi_j_pvs_general_difference_valuation_candidate_power)) * bpvi_v_pvs_general_difference_valuation_candidate_power) + (bpvi_successor_pvs_general_difference_valuation_candidate_power))) /\ bpvi_successor_pvs_general_difference_valuation_candidate_power = bpvi_partial_pvs_general_difference_valuation_candidate_power * bpvi_factor_pvs_general_difference_valuation_candidate_power)))))))) /\ exists bpvi_divisor_factor_pvs_general_difference_valuation_candidate. d = bpvi_result_pvs_general_difference_valuation_candidate * bpvi_divisor_factor_pvs_general_difference_valuation_candidate)) -> (exists bpd_gap_pvs_general_difference_valuation_maximal. bpd_gap_pvs_general_difference_valuation_maximal + (bpd_candidate_pvs_general_difference_valuation) = (e))) -> (((exists bpd_gap_pvs_general_exponent_valuation_selected_bound. bpd_gap_pvs_general_exponent_valuation_selected_bound + (k) = (n)) /\ (exists bpvi_result_pvs_general_exponent_valuation_selected. ((exists bpvi_b_pvs_general_exponent_valuation_selected_power bpvi_c_pvs_general_exponent_valuation_selected_power. ((forall bpvi_i_pvs_general_exponent_valuation_selected_power. (exists bpvi_repeat_gap_pvs_general_exponent_valuation_selected_power. bpvi_repeat_gap_pvs_general_exponent_valuation_selected_power + S bpvi_i_pvs_general_exponent_valuation_selected_power = k) -> (((exists bpvi_h_pvs_general_exponent_valuation_selected_power_repeat. bpvi_h_pvs_general_exponent_valuation_selected_power_repeat + S (p) = S ((S (bpvi_i_pvs_general_exponent_valuation_selected_power)) * bpvi_c_pvs_general_exponent_valuation_selected_power)) /\ exists bpvi_q_pvs_general_exponent_valuation_selected_power_repeat. bpvi_b_pvs_general_exponent_valuation_selected_power = bpvi_q_pvs_general_exponent_valuation_selected_power_repeat * S ((S (bpvi_i_pvs_general_exponent_valuation_selected_power)) * bpvi_c_pvs_general_exponent_valuation_selected_power) + (p)))) /\ (exists bpvi_u_pvs_general_exponent_valuation_selected_power bpvi_v_pvs_general_exponent_valuation_selected_power. ((((exists bpvi_h_pvs_general_exponent_valuation_selected_power_start. bpvi_h_pvs_general_exponent_valuation_selected_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_general_exponent_valuation_selected_power)) /\ exists bpvi_q_pvs_general_exponent_valuation_selected_power_start. bpvi_u_pvs_general_exponent_valuation_selected_power = bpvi_q_pvs_general_exponent_valuation_selected_power_start * S ((S (0)) * bpvi_v_pvs_general_exponent_valuation_selected_power) + (1))) /\ ((((exists bpvi_h_pvs_general_exponent_valuation_selected_power_terminal. bpvi_h_pvs_general_exponent_valuation_selected_power_terminal + S (bpvi_result_pvs_general_exponent_valuation_selected) = S ((S (k)) * bpvi_v_pvs_general_exponent_valuation_selected_power)) /\ exists bpvi_q_pvs_general_exponent_valuation_selected_power_terminal. bpvi_u_pvs_general_exponent_valuation_selected_power = bpvi_q_pvs_general_exponent_valuation_selected_power_terminal * S ((S (k)) * bpvi_v_pvs_general_exponent_valuation_selected_power) + (bpvi_result_pvs_general_exponent_valuation_selected))) /\ forall bpvi_j_pvs_general_exponent_valuation_selected_power. (exists bpvi_product_gap_pvs_general_exponent_valuation_selected_power. bpvi_product_gap_pvs_general_exponent_valuation_selected_power + S bpvi_j_pvs_general_exponent_valuation_selected_power = k) -> exists bpvi_factor_pvs_general_exponent_valuation_selected_power bpvi_partial_pvs_general_exponent_valuation_selected_power bpvi_successor_pvs_general_exponent_valuation_selected_power. ((((exists bpvi_h_pvs_general_exponent_valuation_selected_power_factor. bpvi_h_pvs_general_exponent_valuation_selected_power_factor + S (bpvi_factor_pvs_general_exponent_valuation_selected_power) = S ((S (bpvi_j_pvs_general_exponent_valuation_selected_power)) * bpvi_c_pvs_general_exponent_valuation_selected_power)) /\ exists bpvi_q_pvs_general_exponent_valuation_selected_power_factor. bpvi_b_pvs_general_exponent_valuation_selected_power = bpvi_q_pvs_general_exponent_valuation_selected_power_factor * S ((S (bpvi_j_pvs_general_exponent_valuation_selected_power)) * bpvi_c_pvs_general_exponent_valuation_selected_power) + (bpvi_factor_pvs_general_exponent_valuation_selected_power))) /\ ((((exists bpvi_h_pvs_general_exponent_valuation_selected_power_partial. bpvi_h_pvs_general_exponent_valuation_selected_power_partial + S (bpvi_partial_pvs_general_exponent_valuation_selected_power) = S ((S (bpvi_j_pvs_general_exponent_valuation_selected_power)) * bpvi_v_pvs_general_exponent_valuation_selected_power)) /\ exists bpvi_q_pvs_general_exponent_valuation_selected_power_partial. bpvi_u_pvs_general_exponent_valuation_selected_power = bpvi_q_pvs_general_exponent_valuation_selected_power_partial * S ((S (bpvi_j_pvs_general_exponent_valuation_selected_power)) * bpvi_v_pvs_general_exponent_valuation_selected_power) + (bpvi_partial_pvs_general_exponent_valuation_selected_power))) /\ ((((exists bpvi_h_pvs_general_exponent_valuation_selected_power_successor. bpvi_h_pvs_general_exponent_valuation_selected_power_successor + S (bpvi_successor_pvs_general_exponent_valuation_selected_power) = S ((S (S bpvi_j_pvs_general_exponent_valuation_selected_power)) * bpvi_v_pvs_general_exponent_valuation_selected_power)) /\ exists bpvi_q_pvs_general_exponent_valuation_selected_power_successor. bpvi_u_pvs_general_exponent_valuation_selected_power = bpvi_q_pvs_general_exponent_valuation_selected_power_successor * S ((S (S bpvi_j_pvs_general_exponent_valuation_selected_power)) * bpvi_v_pvs_general_exponent_valuation_selected_power) + (bpvi_successor_pvs_general_exponent_valuation_selected_power))) /\ bpvi_successor_pvs_general_exponent_valuation_selected_power = bpvi_partial_pvs_general_exponent_valuation_selected_power * bpvi_factor_pvs_general_exponent_valuation_selected_power)))))))) /\ exists bpvi_divisor_factor_pvs_general_exponent_valuation_selected. n = bpvi_result_pvs_general_exponent_valuation_selected * bpvi_divisor_factor_pvs_general_exponent_valuation_selected))) /\ forall bpd_candidate_pvs_general_exponent_valuation. (exists bpd_gap_pvs_general_exponent_valuation_candidate_bound. bpd_gap_pvs_general_exponent_valuation_candidate_bound + (bpd_candidate_pvs_general_exponent_valuation) = (n)) -> (exists bpvi_result_pvs_general_exponent_valuation_candidate. ((exists bpvi_b_pvs_general_exponent_valuation_candidate_power bpvi_c_pvs_general_exponent_valuation_candidate_power. ((forall bpvi_i_pvs_general_exponent_valuation_candidate_power. (exists bpvi_repeat_gap_pvs_general_exponent_valuation_candidate_power. bpvi_repeat_gap_pvs_general_exponent_valuation_candidate_power + S bpvi_i_pvs_general_exponent_valuation_candidate_power = bpd_candidate_pvs_general_exponent_valuation) -> (((exists bpvi_h_pvs_general_exponent_valuation_candidate_power_repeat. bpvi_h_pvs_general_exponent_valuation_candidate_power_repeat + S (p) = S ((S (bpvi_i_pvs_general_exponent_valuation_candidate_power)) * bpvi_c_pvs_general_exponent_valuation_candidate_power)) /\ exists bpvi_q_pvs_general_exponent_valuation_candidate_power_repeat. bpvi_b_pvs_general_exponent_valuation_candidate_power = bpvi_q_pvs_general_exponent_valuation_candidate_power_repeat * S ((S (bpvi_i_pvs_general_exponent_valuation_candidate_power)) * bpvi_c_pvs_general_exponent_valuation_candidate_power) + (p)))) /\ (exists bpvi_u_pvs_general_exponent_valuation_candidate_power bpvi_v_pvs_general_exponent_valuation_candidate_power. ((((exists bpvi_h_pvs_general_exponent_valuation_candidate_power_start. bpvi_h_pvs_general_exponent_valuation_candidate_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_general_exponent_valuation_candidate_power)) /\ exists bpvi_q_pvs_general_exponent_valuation_candidate_power_start. bpvi_u_pvs_general_exponent_valuation_candidate_power = bpvi_q_pvs_general_exponent_valuation_candidate_power_start * S ((S (0)) * bpvi_v_pvs_general_exponent_valuation_candidate_power) + (1))) /\ ((((exists bpvi_h_pvs_general_exponent_valuation_candidate_power_terminal. bpvi_h_pvs_general_exponent_valuation_candidate_power_terminal + S (bpvi_result_pvs_general_exponent_valuation_candidate) = S ((S (bpd_candidate_pvs_general_exponent_valuation)) * bpvi_v_pvs_general_exponent_valuation_candidate_power)) /\ exists bpvi_q_pvs_general_exponent_valuation_candidate_power_terminal. bpvi_u_pvs_general_exponent_valuation_candidate_power = bpvi_q_pvs_general_exponent_valuation_candidate_power_terminal * S ((S (bpd_candidate_pvs_general_exponent_valuation)) * bpvi_v_pvs_general_exponent_valuation_candidate_power) + (bpvi_result_pvs_general_exponent_valuation_candidate))) /\ forall bpvi_j_pvs_general_exponent_valuation_candidate_power. (exists bpvi_product_gap_pvs_general_exponent_valuation_candidate_power. bpvi_product_gap_pvs_general_exponent_valuation_candidate_power + S bpvi_j_pvs_general_exponent_valuation_candidate_power = bpd_candidate_pvs_general_exponent_valuation) -> exists bpvi_factor_pvs_general_exponent_valuation_candidate_power bpvi_partial_pvs_general_exponent_valuation_candidate_power bpvi_successor_pvs_general_exponent_valuation_candidate_power. ((((exists bpvi_h_pvs_general_exponent_valuation_candidate_power_factor. bpvi_h_pvs_general_exponent_valuation_candidate_power_factor + S (bpvi_factor_pvs_general_exponent_valuation_candidate_power) = S ((S (bpvi_j_pvs_general_exponent_valuation_candidate_power)) * bpvi_c_pvs_general_exponent_valuation_candidate_power)) /\ exists bpvi_q_pvs_general_exponent_valuation_candidate_power_factor. bpvi_b_pvs_general_exponent_valuation_candidate_power = bpvi_q_pvs_general_exponent_valuation_candidate_power_factor * S ((S (bpvi_j_pvs_general_exponent_valuation_candidate_power)) * bpvi_c_pvs_general_exponent_valuation_candidate_power) + (bpvi_factor_pvs_general_exponent_valuation_candidate_power))) /\ ((((exists bpvi_h_pvs_general_exponent_valuation_candidate_power_partial. bpvi_h_pvs_general_exponent_valuation_candidate_power_partial + S (bpvi_partial_pvs_general_exponent_valuation_candidate_power) = S ((S (bpvi_j_pvs_general_exponent_valuation_candidate_power)) * bpvi_v_pvs_general_exponent_valuation_candidate_power)) /\ exists bpvi_q_pvs_general_exponent_valuation_candidate_power_partial. bpvi_u_pvs_general_exponent_valuation_candidate_power = bpvi_q_pvs_general_exponent_valuation_candidate_power_partial * S ((S (bpvi_j_pvs_general_exponent_valuation_candidate_power)) * bpvi_v_pvs_general_exponent_valuation_candidate_power) + (bpvi_partial_pvs_general_exponent_valuation_candidate_power))) /\ ((((exists bpvi_h_pvs_general_exponent_valuation_candidate_power_successor. bpvi_h_pvs_general_exponent_valuation_candidate_power_successor + S (bpvi_successor_pvs_general_exponent_valuation_candidate_power) = S ((S (S bpvi_j_pvs_general_exponent_valuation_candidate_power)) * bpvi_v_pvs_general_exponent_valuation_candidate_power)) /\ exists bpvi_q_pvs_general_exponent_valuation_candidate_power_successor. bpvi_u_pvs_general_exponent_valuation_candidate_power = bpvi_q_pvs_general_exponent_valuation_candidate_power_successor * S ((S (S bpvi_j_pvs_general_exponent_valuation_candidate_power)) * bpvi_v_pvs_general_exponent_valuation_candidate_power) + (bpvi_successor_pvs_general_exponent_valuation_candidate_power))) /\ bpvi_successor_pvs_general_exponent_valuation_candidate_power = bpvi_partial_pvs_general_exponent_valuation_candidate_power * bpvi_factor_pvs_general_exponent_valuation_candidate_power)))))))) /\ exists bpvi_divisor_factor_pvs_general_exponent_valuation_candidate. n = bpvi_result_pvs_general_exponent_valuation_candidate * bpvi_divisor_factor_pvs_general_exponent_valuation_candidate)) -> (exists bpd_gap_pvs_general_exponent_valuation_maximal. bpd_gap_pvs_general_exponent_valuation_maximal + (bpd_candidate_pvs_general_exponent_valuation) = (k))) -> exists A B D. (((exists pa_b_olte_general_resultA pa_c_olte_general_resultA. ((forall pa_i_olte_general_resultA_repeat. (exists pa_lt_olte_general_resultA_repeat_bound. pa_lt_olte_general_resultA_repeat_bound + S pa_i_olte_general_resultA_repeat = n) -> (((exists pa_h_olte_general_resultA_repeat_decoded. pa_h_olte_general_resultA_repeat_decoded + S (a) = S ((S (pa_i_olte_general_resultA_repeat)) * pa_c_olte_general_resultA)) /\ exists pa_q_olte_general_resultA_repeat_decoded. pa_b_olte_general_resultA = pa_q_olte_general_resultA_repeat_decoded * S ((S (pa_i_olte_general_resultA_repeat)) * pa_c_olte_general_resultA) + (a)))) /\ (exists pa_u_olte_general_resultA_product pa_v_olte_general_resultA_product. ((((exists pa_h_olte_general_resultA_product_start. pa_h_olte_general_resultA_product_start + S (1) = S ((S (0)) * pa_v_olte_general_resultA_product)) /\ exists pa_q_olte_general_resultA_product_start. pa_u_olte_general_resultA_product = pa_q_olte_general_resultA_product_start * S ((S (0)) * pa_v_olte_general_resultA_product) + (1))) /\ ((((exists pa_h_olte_general_resultA_product_terminal. pa_h_olte_general_resultA_product_terminal + S (A) = S ((S (n)) * pa_v_olte_general_resultA_product)) /\ exists pa_q_olte_general_resultA_product_terminal. pa_u_olte_general_resultA_product = pa_q_olte_general_resultA_product_terminal * S ((S (n)) * pa_v_olte_general_resultA_product) + (A))) /\ forall pa_i_olte_general_resultA_product. (exists pa_lt_olte_general_resultA_product_bound. pa_lt_olte_general_resultA_product_bound + S pa_i_olte_general_resultA_product = n) -> exists pa_p_olte_general_resultA_product pa_r_olte_general_resultA_product pa_s_olte_general_resultA_product. ((((exists pa_h_olte_general_resultA_product_factor. pa_h_olte_general_resultA_product_factor + S (pa_p_olte_general_resultA_product) = S ((S (pa_i_olte_general_resultA_product)) * pa_c_olte_general_resultA)) /\ exists pa_q_olte_general_resultA_product_factor. pa_b_olte_general_resultA = pa_q_olte_general_resultA_product_factor * S ((S (pa_i_olte_general_resultA_product)) * pa_c_olte_general_resultA) + (pa_p_olte_general_resultA_product))) /\ ((((exists pa_h_olte_general_resultA_product_partial. pa_h_olte_general_resultA_product_partial + S (pa_r_olte_general_resultA_product) = S ((S (pa_i_olte_general_resultA_product)) * pa_v_olte_general_resultA_product)) /\ exists pa_q_olte_general_resultA_product_partial. pa_u_olte_general_resultA_product = pa_q_olte_general_resultA_product_partial * S ((S (pa_i_olte_general_resultA_product)) * pa_v_olte_general_resultA_product) + (pa_r_olte_general_resultA_product))) /\ ((((exists pa_h_olte_general_resultA_product_successor. pa_h_olte_general_resultA_product_successor + S (pa_s_olte_general_resultA_product) = S ((S (S pa_i_olte_general_resultA_product)) * pa_v_olte_general_resultA_product)) /\ exists pa_q_olte_general_resultA_product_successor. pa_u_olte_general_resultA_product = pa_q_olte_general_resultA_product_successor * S ((S (S pa_i_olte_general_resultA_product)) * pa_v_olte_general_resultA_product) + (pa_s_olte_general_resultA_product))) /\ pa_s_olte_general_resultA_product = pa_r_olte_general_resultA_product * pa_p_olte_general_resultA_product)))))))) /\ (((exists pa_b_olte_general_resultB pa_c_olte_general_resultB. ((forall pa_i_olte_general_resultB_repeat. (exists pa_lt_olte_general_resultB_repeat_bound. pa_lt_olte_general_resultB_repeat_bound + S pa_i_olte_general_resultB_repeat = n) -> (((exists pa_h_olte_general_resultB_repeat_decoded. pa_h_olte_general_resultB_repeat_decoded + S (b) = S ((S (pa_i_olte_general_resultB_repeat)) * pa_c_olte_general_resultB)) /\ exists pa_q_olte_general_resultB_repeat_decoded. pa_b_olte_general_resultB = pa_q_olte_general_resultB_repeat_decoded * S ((S (pa_i_olte_general_resultB_repeat)) * pa_c_olte_general_resultB) + (b)))) /\ (exists pa_u_olte_general_resultB_product pa_v_olte_general_resultB_product. ((((exists pa_h_olte_general_resultB_product_start. pa_h_olte_general_resultB_product_start + S (1) = S ((S (0)) * pa_v_olte_general_resultB_product)) /\ exists pa_q_olte_general_resultB_product_start. pa_u_olte_general_resultB_product = pa_q_olte_general_resultB_product_start * S ((S (0)) * pa_v_olte_general_resultB_product) + (1))) /\ ((((exists pa_h_olte_general_resultB_product_terminal. pa_h_olte_general_resultB_product_terminal + S (B) = S ((S (n)) * pa_v_olte_general_resultB_product)) /\ exists pa_q_olte_general_resultB_product_terminal. pa_u_olte_general_resultB_product = pa_q_olte_general_resultB_product_terminal * S ((S (n)) * pa_v_olte_general_resultB_product) + (B))) /\ forall pa_i_olte_general_resultB_product. (exists pa_lt_olte_general_resultB_product_bound. pa_lt_olte_general_resultB_product_bound + S pa_i_olte_general_resultB_product = n) -> exists pa_p_olte_general_resultB_product pa_r_olte_general_resultB_product pa_s_olte_general_resultB_product. ((((exists pa_h_olte_general_resultB_product_factor. pa_h_olte_general_resultB_product_factor + S (pa_p_olte_general_resultB_product) = S ((S (pa_i_olte_general_resultB_product)) * pa_c_olte_general_resultB)) /\ exists pa_q_olte_general_resultB_product_factor. pa_b_olte_general_resultB = pa_q_olte_general_resultB_product_factor * S ((S (pa_i_olte_general_resultB_product)) * pa_c_olte_general_resultB) + (pa_p_olte_general_resultB_product))) /\ ((((exists pa_h_olte_general_resultB_product_partial. pa_h_olte_general_resultB_product_partial + S (pa_r_olte_general_resultB_product) = S ((S (pa_i_olte_general_resultB_product)) * pa_v_olte_general_resultB_product)) /\ exists pa_q_olte_general_resultB_product_partial. pa_u_olte_general_resultB_product = pa_q_olte_general_resultB_product_partial * S ((S (pa_i_olte_general_resultB_product)) * pa_v_olte_general_resultB_product) + (pa_r_olte_general_resultB_product))) /\ ((((exists pa_h_olte_general_resultB_product_successor. pa_h_olte_general_resultB_product_successor + S (pa_s_olte_general_resultB_product) = S ((S (S pa_i_olte_general_resultB_product)) * pa_v_olte_general_resultB_product)) /\ exists pa_q_olte_general_resultB_product_successor. pa_u_olte_general_resultB_product = pa_q_olte_general_resultB_product_successor * S ((S (S pa_i_olte_general_resultB_product)) * pa_v_olte_general_resultB_product) + (pa_s_olte_general_resultB_product))) /\ pa_s_olte_general_resultB_product = pa_r_olte_general_resultB_product * pa_p_olte_general_resultB_product)))))))) /\ ((((A) = (B) + (D)) /\ (((~((D) = 0)) /\ (((exists olte_factor_general_resultdivides. (D) = (p) * olte_factor_general_resultdivides) /\ (((~(exists olte_factor_general_resultunit. (B) = (p) * olte_factor_general_resultunit)) /\ (((exists bpd_gap_pvs_olte_general_resultvaluation_selected_bound. bpd_gap_pvs_olte_general_resultvaluation_selected_bound + (e + k) = (D)) /\ (exists bpvi_result_pvs_olte_general_resultvaluation_selected. ((exists bpvi_b_pvs_olte_general_resultvaluation_selected_power bpvi_c_pvs_olte_general_resultvaluation_selected_power. ((forall bpvi_i_pvs_olte_general_resultvaluation_selected_power. (exists bpvi_repeat_gap_pvs_olte_general_resultvaluation_selected_power. bpvi_repeat_gap_pvs_olte_general_resultvaluation_selected_power + S bpvi_i_pvs_olte_general_resultvaluation_selected_power = e + k) -> (((exists bpvi_h_pvs_olte_general_resultvaluation_selected_power_repeat. bpvi_h_pvs_olte_general_resultvaluation_selected_power_repeat + S (p) = S ((S (bpvi_i_pvs_olte_general_resultvaluation_selected_power)) * bpvi_c_pvs_olte_general_resultvaluation_selected_power)) /\ exists bpvi_q_pvs_olte_general_resultvaluation_selected_power_repeat. bpvi_b_pvs_olte_general_resultvaluation_selected_power = bpvi_q_pvs_olte_general_resultvaluation_selected_power_repeat * S ((S (bpvi_i_pvs_olte_general_resultvaluation_selected_power)) * bpvi_c_pvs_olte_general_resultvaluation_selected_power) + (p)))) /\ (exists bpvi_u_pvs_olte_general_resultvaluation_selected_power bpvi_v_pvs_olte_general_resultvaluation_selected_power. ((((exists bpvi_h_pvs_olte_general_resultvaluation_selected_power_start. bpvi_h_pvs_olte_general_resultvaluation_selected_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_olte_general_resultvaluation_selected_power)) /\ exists bpvi_q_pvs_olte_general_resultvaluation_selected_power_start. bpvi_u_pvs_olte_general_resultvaluation_selected_power = bpvi_q_pvs_olte_general_resultvaluation_selected_power_start * S ((S (0)) * bpvi_v_pvs_olte_general_resultvaluation_selected_power) + (1))) /\ ((((exists bpvi_h_pvs_olte_general_resultvaluation_selected_power_terminal. bpvi_h_pvs_olte_general_resultvaluation_selected_power_terminal + S (bpvi_result_pvs_olte_general_resultvaluation_selected) = S ((S (e + k)) * bpvi_v_pvs_olte_general_resultvaluation_selected_power)) /\ exists bpvi_q_pvs_olte_general_resultvaluation_selected_power_terminal. bpvi_u_pvs_olte_general_resultvaluation_selected_power = bpvi_q_pvs_olte_general_resultvaluation_selected_power_terminal * S ((S (e + k)) * bpvi_v_pvs_olte_general_resultvaluation_selected_power) + (bpvi_result_pvs_olte_general_resultvaluation_selected))) /\ forall bpvi_j_pvs_olte_general_resultvaluation_selected_power. (exists bpvi_product_gap_pvs_olte_general_resultvaluation_selected_power. bpvi_product_gap_pvs_olte_general_resultvaluation_selected_power + S bpvi_j_pvs_olte_general_resultvaluation_selected_power = e + k) -> exists bpvi_factor_pvs_olte_general_resultvaluation_selected_power bpvi_partial_pvs_olte_general_resultvaluation_selected_power bpvi_successor_pvs_olte_general_resultvaluation_selected_power. ((((exists bpvi_h_pvs_olte_general_resultvaluation_selected_power_factor. bpvi_h_pvs_olte_general_resultvaluation_selected_power_factor + S (bpvi_factor_pvs_olte_general_resultvaluation_selected_power) = S ((S (bpvi_j_pvs_olte_general_resultvaluation_selected_power)) * bpvi_c_pvs_olte_general_resultvaluation_selected_power)) /\ exists bpvi_q_pvs_olte_general_resultvaluation_selected_power_factor. bpvi_b_pvs_olte_general_resultvaluation_selected_power = bpvi_q_pvs_olte_general_resultvaluation_selected_power_factor * S ((S (bpvi_j_pvs_olte_general_resultvaluation_selected_power)) * bpvi_c_pvs_olte_general_resultvaluation_selected_power) + (bpvi_factor_pvs_olte_general_resultvaluation_selected_power))) /\ ((((exists bpvi_h_pvs_olte_general_resultvaluation_selected_power_partial. bpvi_h_pvs_olte_general_resultvaluation_selected_power_partial + S (bpvi_partial_pvs_olte_general_resultvaluation_selected_power) = S ((S (bpvi_j_pvs_olte_general_resultvaluation_selected_power)) * bpvi_v_pvs_olte_general_resultvaluation_selected_power)) /\ exists bpvi_q_pvs_olte_general_resultvaluation_selected_power_partial. bpvi_u_pvs_olte_general_resultvaluation_selected_power = bpvi_q_pvs_olte_general_resultvaluation_selected_power_partial * S ((S (bpvi_j_pvs_olte_general_resultvaluation_selected_power)) * bpvi_v_pvs_olte_general_resultvaluation_selected_power) + (bpvi_partial_pvs_olte_general_resultvaluation_selected_power))) /\ ((((exists bpvi_h_pvs_olte_general_resultvaluation_selected_power_successor. bpvi_h_pvs_olte_general_resultvaluation_selected_power_successor + S (bpvi_successor_pvs_olte_general_resultvaluation_selected_power) = S ((S (S bpvi_j_pvs_olte_general_resultvaluation_selected_power)) * bpvi_v_pvs_olte_general_resultvaluation_selected_power)) /\ exists bpvi_q_pvs_olte_general_resultvaluation_selected_power_successor. bpvi_u_pvs_olte_general_resultvaluation_selected_power = bpvi_q_pvs_olte_general_resultvaluation_selected_power_successor * S ((S (S bpvi_j_pvs_olte_general_resultvaluation_selected_power)) * bpvi_v_pvs_olte_general_resultvaluation_selected_power) + (bpvi_successor_pvs_olte_general_resultvaluation_selected_power))) /\ bpvi_successor_pvs_olte_general_resultvaluation_selected_power = bpvi_partial_pvs_olte_general_resultvaluation_selected_power * bpvi_factor_pvs_olte_general_resultvaluation_selected_power)))))))) /\ exists bpvi_divisor_factor_pvs_olte_general_resultvaluation_selected. D = bpvi_result_pvs_olte_general_resultvaluation_selected * bpvi_divisor_factor_pvs_olte_general_resultvaluation_selected))) /\ forall bpd_candidate_pvs_olte_general_resultvaluation. (exists bpd_gap_pvs_olte_general_resultvaluation_candidate_bound. bpd_gap_pvs_olte_general_resultvaluation_candidate_bound + (bpd_candidate_pvs_olte_general_resultvaluation) = (D)) -> (exists bpvi_result_pvs_olte_general_resultvaluation_candidate. ((exists bpvi_b_pvs_olte_general_resultvaluation_candidate_power bpvi_c_pvs_olte_general_resultvaluation_candidate_power. ((forall bpvi_i_pvs_olte_general_resultvaluation_candidate_power. (exists bpvi_repeat_gap_pvs_olte_general_resultvaluation_candidate_power. bpvi_repeat_gap_pvs_olte_general_resultvaluation_candidate_power + S bpvi_i_pvs_olte_general_resultvaluation_candidate_power = bpd_candidate_pvs_olte_general_resultvaluation) -> (((exists bpvi_h_pvs_olte_general_resultvaluation_candidate_power_repeat. bpvi_h_pvs_olte_general_resultvaluation_candidate_power_repeat + S (p) = S ((S (bpvi_i_pvs_olte_general_resultvaluation_candidate_power)) * bpvi_c_pvs_olte_general_resultvaluation_candidate_power)) /\ exists bpvi_q_pvs_olte_general_resultvaluation_candidate_power_repeat. bpvi_b_pvs_olte_general_resultvaluation_candidate_power = bpvi_q_pvs_olte_general_resultvaluation_candidate_power_repeat * S ((S (bpvi_i_pvs_olte_general_resultvaluation_candidate_power)) * bpvi_c_pvs_olte_general_resultvaluation_candidate_power) + (p)))) /\ (exists bpvi_u_pvs_olte_general_resultvaluation_candidate_power bpvi_v_pvs_olte_general_resultvaluation_candidate_power. ((((exists bpvi_h_pvs_olte_general_resultvaluation_candidate_power_start. bpvi_h_pvs_olte_general_resultvaluation_candidate_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_olte_general_resultvaluation_candidate_power)) /\ exists bpvi_q_pvs_olte_general_resultvaluation_candidate_power_start. bpvi_u_pvs_olte_general_resultvaluation_candidate_power = bpvi_q_pvs_olte_general_resultvaluation_candidate_power_start * S ((S (0)) * bpvi_v_pvs_olte_general_resultvaluation_candidate_power) + (1))) /\ ((((exists bpvi_h_pvs_olte_general_resultvaluation_candidate_power_terminal. bpvi_h_pvs_olte_general_resultvaluation_candidate_power_terminal + S (bpvi_result_pvs_olte_general_resultvaluation_candidate) = S ((S (bpd_candidate_pvs_olte_general_resultvaluation)) * bpvi_v_pvs_olte_general_resultvaluation_candidate_power)) /\ exists bpvi_q_pvs_olte_general_resultvaluation_candidate_power_terminal. bpvi_u_pvs_olte_general_resultvaluation_candidate_power = bpvi_q_pvs_olte_general_resultvaluation_candidate_power_terminal * S ((S (bpd_candidate_pvs_olte_general_resultvaluation)) * bpvi_v_pvs_olte_general_resultvaluation_candidate_power) + (bpvi_result_pvs_olte_general_resultvaluation_candidate))) /\ forall bpvi_j_pvs_olte_general_resultvaluation_candidate_power. (exists bpvi_product_gap_pvs_olte_general_resultvaluation_candidate_power. bpvi_product_gap_pvs_olte_general_resultvaluation_candidate_power + S bpvi_j_pvs_olte_general_resultvaluation_candidate_power = bpd_candidate_pvs_olte_general_resultvaluation) -> exists bpvi_factor_pvs_olte_general_resultvaluation_candidate_power bpvi_partial_pvs_olte_general_resultvaluation_candidate_power bpvi_successor_pvs_olte_general_resultvaluation_candidate_power. ((((exists bpvi_h_pvs_olte_general_resultvaluation_candidate_power_factor. bpvi_h_pvs_olte_general_resultvaluation_candidate_power_factor + S (bpvi_factor_pvs_olte_general_resultvaluation_candidate_power) = S ((S (bpvi_j_pvs_olte_general_resultvaluation_candidate_power)) * bpvi_c_pvs_olte_general_resultvaluation_candidate_power)) /\ exists bpvi_q_pvs_olte_general_resultvaluation_candidate_power_factor. bpvi_b_pvs_olte_general_resultvaluation_candidate_power = bpvi_q_pvs_olte_general_resultvaluation_candidate_power_factor * S ((S (bpvi_j_pvs_olte_general_resultvaluation_candidate_power)) * bpvi_c_pvs_olte_general_resultvaluation_candidate_power) + (bpvi_factor_pvs_olte_general_resultvaluation_candidate_power))) /\ ((((exists bpvi_h_pvs_olte_general_resultvaluation_candidate_power_partial. bpvi_h_pvs_olte_general_resultvaluation_candidate_power_partial + S (bpvi_partial_pvs_olte_general_resultvaluation_candidate_power) = S ((S (bpvi_j_pvs_olte_general_resultvaluation_candidate_power)) * bpvi_v_pvs_olte_general_resultvaluation_candidate_power)) /\ exists bpvi_q_pvs_olte_general_resultvaluation_candidate_power_partial. bpvi_u_pvs_olte_general_resultvaluation_candidate_power = bpvi_q_pvs_olte_general_resultvaluation_candidate_power_partial * S ((S (bpvi_j_pvs_olte_general_resultvaluation_candidate_power)) * bpvi_v_pvs_olte_general_resultvaluation_candidate_power) + (bpvi_partial_pvs_olte_general_resultvaluation_candidate_power))) /\ ((((exists bpvi_h_pvs_olte_general_resultvaluation_candidate_power_successor. bpvi_h_pvs_olte_general_resultvaluation_candidate_power_successor + S (bpvi_successor_pvs_olte_general_resultvaluation_candidate_power) = S ((S (S bpvi_j_pvs_olte_general_resultvaluation_candidate_power)) * bpvi_v_pvs_olte_general_resultvaluation_candidate_power)) /\ exists bpvi_q_pvs_olte_general_resultvaluation_candidate_power_successor. bpvi_u_pvs_olte_general_resultvaluation_candidate_power = bpvi_q_pvs_olte_general_resultvaluation_candidate_power_successor * S ((S (S bpvi_j_pvs_olte_general_resultvaluation_candidate_power)) * bpvi_v_pvs_olte_general_resultvaluation_candidate_power) + (bpvi_successor_pvs_olte_general_resultvaluation_candidate_power))) /\ bpvi_successor_pvs_olte_general_resultvaluation_candidate_power = bpvi_partial_pvs_olte_general_resultvaluation_candidate_power * bpvi_factor_pvs_olte_general_resultvaluation_candidate_power)))))))) /\ exists bpvi_divisor_factor_pvs_olte_general_resultvaluation_candidate. D = bpvi_result_pvs_olte_general_resultvaluation_candidate * bpvi_divisor_factor_pvs_olte_general_resultvaluation_candidate)) -> (exists bpd_gap_pvs_olte_general_resultvaluation_maximal. bpd_gap_pvs_olte_general_resultvaluation_maximal + (bpd_candidate_pvs_olte_general_resultvaluation) = (e + k)))))))))))))))

Complete tactic proof in conservative notation

All 123 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

123 script commands · 29 reading checkpoints · 4 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 (3)
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 d
  5. L5
    intro n
  6. L6
    intro e
  7. L7
    intro k
  8. L8
    intro hp
  9. L9
    intro hne
  10. L10
    intro ha
02Fix variables and assumptionsL11–16

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

  1. L11
    intro hdzero
  2. L12
    intro hd
  3. L13
    intro hb
  4. L14
    intro hnzero
  5. L15
    intro hvd
  6. L16
    intro hvn
03Establish hcofactorL17–24

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

  1. L17
    have hcofactor : ∃ P. ∃ u. Pow(p,k,P) ∧ (n = P · u ∧ (¬u = 0 ∧ ¬Dvd(p,u)))Definitions: Pow(p,k,P)Dvd(p,u)Original native command in the exact edition
  2. L18
    specialize power_valuation_exact_cofactor (p)
  3. L19
    specialize power_valuation_exact_cofactor (n)
  4. L20
    specialize power_valuation_exact_cofactor (k)
  5. L21
    apply power_valuation_exact_cofactor
  6. L22
    exact hp
  7. L23
    exact hnzero
  8. L24
    exact hvn
04Separate the logical casesL25–29

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

  1. L25
    cases hcofactor
  2. L26
    cases hcofactor_witness
  3. L27
    cases hcofactor_witness_witness
  4. L28
    cases hcofactor_witness_witness_right
  5. L29
    cases hcofactor_witness_witness_right_right
05Establish htowerL30–39

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

  1. L30
    have htower : ∃ q. ∃ A. ∃ B. ∃ D. Pow(p,k,q) ∧ LiftedPowerDifference(p,a,b,q,e + k,A,B,D)Definitions: Pow(p,k,q)LiftedPowerDifference(p,a,b,q,e + k,A,B,D)Original native command in the exact edition
  2. L31
    specialize lte_prime_power_iteration (p)
  3. L32
    specialize lte_prime_power_iteration (a)
  4. L33
    specialize lte_prime_power_iteration (b)
  5. L34
    specialize lte_prime_power_iteration (d)
  6. L35
    specialize lte_prime_power_iteration (e)
  7. L36
    specialize lte_prime_power_iteration (k)
  8. L37
    apply lte_prime_power_iteration
  9. L38
    exact hp
  10. L39
    exact hne
06Use earlier factsL40–44

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

  1. L40
    exact ha
  2. L41
    exact hdzero
  3. L42
    exact hd
  4. L43
    exact hb
  5. L44
    exact hvd
07Separate the logical casesL45–54

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

  1. L45
    cases htower
  2. L46
    cases htower_witness
  3. L47
    cases htower_witness_witness
  4. L48
    cases htower_witness_witness_witness
  5. L49
    cases htower_witness_witness_witness_witness
  6. L50
    cases htower_witness_witness_witness_witness_right
  7. L51
    cases htower_witness_witness_witness_witness_right_right
  8. L52
    cases htower_witness_witness_witness_witness_right_right_right
  9. L53
    cases htower_witness_witness_witness_witness_right_right_right_right
  10. L54
    cases htower_witness_witness_witness_witness_right_right_right_right_right
08Separate the logical casesL55–55

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

  1. L55
    cases htower_witness_witness_witness_witness_right_right_right_right_right_right
09Establish hpowerL56–63

Establish this local claim before using it. It is not an additional assumption. The following proof commands apply pow functional.

  1. L56
    have hpower : x2 = x
  2. L57
    specialize pow_functional (p)
  3. L58
    specialize pow_functional (k)
  4. L59
    specialize pow_functional (x2)
  5. L60
    specialize pow_functional (x)
  6. L61
    apply pow_functional
  7. L62
    exact htower_witness_witness_witness_witness_left
  8. L63
    exact hcofactor_witness_witness_left
10Establish hstepL64–73

Establish this local claim before using it. It is not an additional assumption. The following proof commands apply lte coprime exponent step.

  1. L64
    have hstep : ∃ A. ∃ B. ∃ D. LiftedPowerDifference(p,x3,x4,x1,e + k,A,B,D)Definitions: LiftedPowerDifference(p,x3,x4,x1,e + k,A,B,D)Original native command in the exact edition
  2. L65
    specialize lte_coprime_exponent_step (p)
  3. L66
    specialize lte_coprime_exponent_step (x3)
  4. L67
    specialize lte_coprime_exponent_step (x4)
  5. L68
    specialize lte_coprime_exponent_step (x5)
  6. L69
    specialize lte_coprime_exponent_step (x1)
  7. L70
    specialize lte_coprime_exponent_step (e + k)
  8. L71
    apply lte_coprime_exponent_step
  9. L72
    exact hp
  10. L73
    exact htower_witness_witness_witness_witness_right_right_right_left
11Use earlier factsL74–78

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

  1. L74
    exact htower_witness_witness_witness_witness_right_right_right_right_left
  2. L75
    exact htower_witness_witness_witness_witness_right_right_right_right_right_left
  3. L76
    exact htower_witness_witness_witness_witness_right_right_right_right_right_right_left
  4. L77
    exact hcofactor_witness_witness_right_right_right
  5. L78
    exact htower_witness_witness_witness_witness_right_right_right_right_right_right_right
12Separate the logical casesL79–87

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

  1. L79
    cases hstep
  2. L80
    cases hstep_witness
  3. L81
    cases hstep_witness_witness
  4. L82
    cases hstep_witness_witness_witness
  5. L83
    cases hstep_witness_witness_witness_right
  6. L84
    cases hstep_witness_witness_witness_right_right
  7. L85
    cases hstep_witness_witness_witness_right_right_right
  8. L86
    cases hstep_witness_witness_witness_right_right_right_right
  9. L87
    cases hstep_witness_witness_witness_right_right_right_right_right
13Construct an explicit witnessL88–90

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

  1. L88
    exists x6
  2. L89
    exists x7
  3. L90
    exists x8
14Separate the logical casesL91–91

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

  1. L91
    split
15Use earlier factsL92–98

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

  1. L92
    specialize lte_power_iteration_construct (a)
  2. L93
    specialize lte_power_iteration_construct (x2)
  3. L94
    specialize lte_power_iteration_construct (x1)
  4. L95
    specialize lte_power_iteration_construct (n)
  5. L96
    specialize lte_power_iteration_construct (x3)
  6. L97
    specialize lte_power_iteration_construct (x6)
  7. L98
    apply lte_power_iteration_construct
16Calculate and transport equalitiesL99–99

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

  1. L99
    rewrite hpower
17Use earlier factsL100–102

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

  1. L100
    exact hcofactor_witness_witness_right_left
  2. L101
    exact htower_witness_witness_witness_witness_right_left
  3. L102
    exact hstep_witness_witness_witness_left
18Separate the logical casesL103–103

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

  1. L103
    split
19Use earlier factsL104–110

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

  1. L104
    specialize lte_power_iteration_construct (b)
  2. L105
    specialize lte_power_iteration_construct (x2)
  3. L106
    specialize lte_power_iteration_construct (x1)
  4. L107
    specialize lte_power_iteration_construct (n)
  5. L108
    specialize lte_power_iteration_construct (x4)
  6. L109
    specialize lte_power_iteration_construct (x7)
  7. L110
    apply lte_power_iteration_construct
20Calculate and transport equalitiesL111–111

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

  1. L111
    rewrite hpower
21Use earlier factsL112–114

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

  1. L112
    exact hcofactor_witness_witness_right_left
  2. L113
    exact htower_witness_witness_witness_witness_right_right_left
  3. L114
    exact hstep_witness_witness_witness_right_left
22Separate the logical casesL115–115

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

  1. L115
    split
23Use earlier factsL116–116

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

  1. L116
    exact hstep_witness_witness_witness_right_right_left
24Separate the logical casesL117–117

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

  1. L117
    split
25Use earlier factsL118–118

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

  1. L118
    exact hstep_witness_witness_witness_right_right_right_left
26Separate the logical casesL119–119

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

  1. L119
    split
27Use earlier factsL120–120

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

  1. L120
    exact hstep_witness_witness_witness_right_right_right_right_left
28Separate the logical casesL121–121

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

  1. L121
    split
29Use earlier factsL122–123

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

  1. L122
    exact hstep_witness_witness_witness_right_right_right_right_right_left
  2. L123
    exact hstep_witness_witness_witness_right_right_right_right_right_right

Library-wide reading audit

Original defined command ledger · 123 lines
  1. 0001intro p
  2. 0002intro a
  3. 0003intro b
  4. 0004intro d
  5. 0005intro n
  6. 0006intro e
  7. 0007intro k
  8. 0008intro hp
  9. 0009intro hne
  10. 0010intro ha
  11. 0011intro hdzero
  12. 0012intro hd
  13. 0013intro hb
  14. 0014intro hnzero
  15. 0015intro hvd
  16. 0016intro hvn
  17. 0017have hcofactor : ∃ P. ∃ u. Pow(p,k,P) ∧ (n = P · u ∧ (¬u = 0 ∧ ¬Dvd(p,u)))
  18. 0018specialize power_valuation_exact_cofactor (p)
  19. 0019specialize power_valuation_exact_cofactor (n)
  20. 0020specialize power_valuation_exact_cofactor (k)
  21. 0021apply power_valuation_exact_cofactor
  22. 0022exact hp
  23. 0023exact hnzero
  24. 0024exact hvn
  25. 0025cases hcofactor
  26. 0026cases hcofactor_witness
  27. 0027cases hcofactor_witness_witness
  28. 0028cases hcofactor_witness_witness_right
  29. 0029cases hcofactor_witness_witness_right_right
  30. 0030have htower : ∃ q. ∃ A. ∃ B. ∃ D. Pow(p,k,q)LiftedPowerDifference(p,a,b,q,e + k,A,B,D)
  31. 0031specialize lte_prime_power_iteration (p)
  32. 0032specialize lte_prime_power_iteration (a)
  33. 0033specialize lte_prime_power_iteration (b)
  34. 0034specialize lte_prime_power_iteration (d)
  35. 0035specialize lte_prime_power_iteration (e)
  36. 0036specialize lte_prime_power_iteration (k)
  37. 0037apply lte_prime_power_iteration
  38. 0038exact hp
  39. 0039exact hne
  40. 0040exact ha
  41. 0041exact hdzero
  42. 0042exact hd
  43. 0043exact hb
  44. 0044exact hvd
  45. 0045cases htower
  46. 0046cases htower_witness
  47. 0047cases htower_witness_witness
  48. 0048cases htower_witness_witness_witness
  49. 0049cases htower_witness_witness_witness_witness
  50. 0050cases htower_witness_witness_witness_witness_right
  51. 0051cases htower_witness_witness_witness_witness_right_right
  52. 0052cases htower_witness_witness_witness_witness_right_right_right
  53. 0053cases htower_witness_witness_witness_witness_right_right_right_right
  54. 0054cases htower_witness_witness_witness_witness_right_right_right_right_right
  55. 0055cases htower_witness_witness_witness_witness_right_right_right_right_right_right
  56. 0056have hpower : x2 = x
  57. 0057specialize pow_functional (p)
  58. 0058specialize pow_functional (k)
  59. 0059specialize pow_functional (x2)
  60. 0060specialize pow_functional (x)
  61. 0061apply pow_functional
  62. 0062exact htower_witness_witness_witness_witness_left
  63. 0063exact hcofactor_witness_witness_left
  64. 0064have hstep : ∃ A. ∃ B. ∃ D. LiftedPowerDifference(p,x3,x4,x1,e + k,A,B,D)
  65. 0065specialize lte_coprime_exponent_step (p)
  66. 0066specialize lte_coprime_exponent_step (x3)
  67. 0067specialize lte_coprime_exponent_step (x4)
  68. 0068specialize lte_coprime_exponent_step (x5)
  69. 0069specialize lte_coprime_exponent_step (x1)
  70. 0070specialize lte_coprime_exponent_step (e + k)
  71. 0071apply lte_coprime_exponent_step
  72. 0072exact hp
  73. 0073exact htower_witness_witness_witness_witness_right_right_right_left
  74. 0074exact htower_witness_witness_witness_witness_right_right_right_right_left
  75. 0075exact htower_witness_witness_witness_witness_right_right_right_right_right_left
  76. 0076exact htower_witness_witness_witness_witness_right_right_right_right_right_right_left
  77. 0077exact hcofactor_witness_witness_right_right_right
  78. 0078exact htower_witness_witness_witness_witness_right_right_right_right_right_right_right
  79. 0079cases hstep
  80. 0080cases hstep_witness
  81. 0081cases hstep_witness_witness
  82. 0082cases hstep_witness_witness_witness
  83. 0083cases hstep_witness_witness_witness_right
  84. 0084cases hstep_witness_witness_witness_right_right
  85. 0085cases hstep_witness_witness_witness_right_right_right
  86. 0086cases hstep_witness_witness_witness_right_right_right_right
  87. 0087cases hstep_witness_witness_witness_right_right_right_right_right
  88. 0088exists x6
  89. 0089exists x7
  90. 0090exists x8
  91. 0091split
  92. 0092specialize lte_power_iteration_construct (a)
  93. 0093specialize lte_power_iteration_construct (x2)
  94. 0094specialize lte_power_iteration_construct (x1)
  95. 0095specialize lte_power_iteration_construct (n)
  96. 0096specialize lte_power_iteration_construct (x3)
  97. 0097specialize lte_power_iteration_construct (x6)
  98. 0098apply lte_power_iteration_construct
  99. 0099rewrite hpower
  100. 0100exact hcofactor_witness_witness_right_left
  101. 0101exact htower_witness_witness_witness_witness_right_left
  102. 0102exact hstep_witness_witness_witness_left
  103. 0103split
  104. 0104specialize lte_power_iteration_construct (b)
  105. 0105specialize lte_power_iteration_construct (x2)
  106. 0106specialize lte_power_iteration_construct (x1)
  107. 0107specialize lte_power_iteration_construct (n)
  108. 0108specialize lte_power_iteration_construct (x4)
  109. 0109specialize lte_power_iteration_construct (x7)
  110. 0110apply lte_power_iteration_construct
  111. 0111rewrite hpower
  112. 0112exact hcofactor_witness_witness_right_left
  113. 0113exact htower_witness_witness_witness_witness_right_right_left
  114. 0114exact hstep_witness_witness_witness_right_left
  115. 0115split
  116. 0116exact hstep_witness_witness_witness_right_right_left
  117. 0117split
  118. 0118exact hstep_witness_witness_witness_right_right_right_left
  119. 0119split
  120. 0120exact hstep_witness_witness_witness_right_right_right_right_left
  121. 0121split
  122. 0122exact hstep_witness_witness_witness_right_right_right_right_right_left
  123. 0123exact hstep_witness_witness_witness_right_right_right_right_right_right