PV000D

prime_exponent_entries_recode

Actual prefix-preserving beta recodings preserve all prime/exponent/power data, without a sequence oracle.

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.

This is a shared constructive tool, not an additional major blueprint goal. The list covers every prime divisor, has no repeated primes, and contains actual prime-power values. One uses the empty support; zero is excluded.

Exact theorem in conservative defined notation

∀ n. ∀ pb. ∀ pc. ∀ eb. ∀ ec. ∀ vb. ∀ vc. ∀ l. ∀ qb. ∀ qc. ∀ fb. ∀ fc. ∀ wb. ∀ wc. PrimeExponentEntries(n,pb,pc,eb,ec,vb,vc,l) → (∀ x. ∀ y. Lt(x,l)BetaAt(pb,pc,x,y)BetaAt(qb,qc,x,y)) → (∀ x. ∀ y. Lt(x,l)BetaAt(eb,ec,x,y)BetaAt(fb,fc,x,y)) → (∀ x. ∀ y. Lt(x,l)BetaAt(vb,vc,x,y)BetaAt(wb,wc,x,y)) → PrimeExponentEntries(n,qb,qc,fb,fc,wb,wc,l)

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

Definition DAG

Actual proof prerequisites

none
Original expanded first-order statement
forall n pb pc eb ec vb vc l qb qc fb fc wb wc. (forall pvs_index_recode_source. (exists pvs_gap_recode_sourceindex. pvs_gap_recode_sourceindex + S (pvs_index_recode_source) = (l)) -> exists pvs_prime_recode_source pvs_exponent_recode_source pvs_power_recode_source. (((((exists ff_h_pvs_recode_sourceprime. ff_h_pvs_recode_sourceprime + S (pvs_prime_recode_source) = S ((S (pvs_index_recode_source)) * pc)) /\ exists ff_q_pvs_recode_sourceprime. pb = ff_q_pvs_recode_sourceprime * S ((S (pvs_index_recode_source)) * pc) + (pvs_prime_recode_source))) /\ (((((exists ff_h_pvs_recode_sourceexponent. ff_h_pvs_recode_sourceexponent + S (pvs_exponent_recode_source) = S ((S (pvs_index_recode_source)) * ec)) /\ exists ff_q_pvs_recode_sourceexponent. eb = ff_q_pvs_recode_sourceexponent * S ((S (pvs_index_recode_source)) * ec) + (pvs_exponent_recode_source))) /\ (((((exists ff_h_pvs_recode_sourcepower. ff_h_pvs_recode_sourcepower + S (pvs_power_recode_source) = S ((S (pvs_index_recode_source)) * vc)) /\ exists ff_q_pvs_recode_sourcepower. vb = ff_q_pvs_recode_sourcepower * S ((S (pvs_index_recode_source)) * vc) + (pvs_power_recode_source))) /\ (((~((pvs_prime_recode_source) = 1) /\ forall pvs_left_recode_sourcedomain pvs_right_recode_sourcedomain. (pvs_prime_recode_source) = pvs_left_recode_sourcedomain * pvs_right_recode_sourcedomain -> pvs_left_recode_sourcedomain = 1 \/ pvs_right_recode_sourcedomain = 1) /\ (((~(pvs_exponent_recode_source = 0)) /\ (((((exists bpd_gap_pvs_recode_sourcevaluation_selected_bound. bpd_gap_pvs_recode_sourcevaluation_selected_bound + (pvs_exponent_recode_source) = (n)) /\ (exists bpvi_result_pvs_recode_sourcevaluation_selected. ((exists bpvi_b_pvs_recode_sourcevaluation_selected_power bpvi_c_pvs_recode_sourcevaluation_selected_power. ((forall bpvi_i_pvs_recode_sourcevaluation_selected_power. (exists bpvi_repeat_gap_pvs_recode_sourcevaluation_selected_power. bpvi_repeat_gap_pvs_recode_sourcevaluation_selected_power + S bpvi_i_pvs_recode_sourcevaluation_selected_power = pvs_exponent_recode_source) -> (((exists bpvi_h_pvs_recode_sourcevaluation_selected_power_repeat. bpvi_h_pvs_recode_sourcevaluation_selected_power_repeat + S (pvs_prime_recode_source) = S ((S (bpvi_i_pvs_recode_sourcevaluation_selected_power)) * bpvi_c_pvs_recode_sourcevaluation_selected_power)) /\ exists bpvi_q_pvs_recode_sourcevaluation_selected_power_repeat. bpvi_b_pvs_recode_sourcevaluation_selected_power = bpvi_q_pvs_recode_sourcevaluation_selected_power_repeat * S ((S (bpvi_i_pvs_recode_sourcevaluation_selected_power)) * bpvi_c_pvs_recode_sourcevaluation_selected_power) + (pvs_prime_recode_source)))) /\ (exists bpvi_u_pvs_recode_sourcevaluation_selected_power bpvi_v_pvs_recode_sourcevaluation_selected_power. ((((exists bpvi_h_pvs_recode_sourcevaluation_selected_power_start. bpvi_h_pvs_recode_sourcevaluation_selected_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_recode_sourcevaluation_selected_power)) /\ exists bpvi_q_pvs_recode_sourcevaluation_selected_power_start. bpvi_u_pvs_recode_sourcevaluation_selected_power = bpvi_q_pvs_recode_sourcevaluation_selected_power_start * S ((S (0)) * bpvi_v_pvs_recode_sourcevaluation_selected_power) + (1))) /\ ((((exists bpvi_h_pvs_recode_sourcevaluation_selected_power_terminal. bpvi_h_pvs_recode_sourcevaluation_selected_power_terminal + S (bpvi_result_pvs_recode_sourcevaluation_selected) = S ((S (pvs_exponent_recode_source)) * bpvi_v_pvs_recode_sourcevaluation_selected_power)) /\ exists bpvi_q_pvs_recode_sourcevaluation_selected_power_terminal. bpvi_u_pvs_recode_sourcevaluation_selected_power = bpvi_q_pvs_recode_sourcevaluation_selected_power_terminal * S ((S (pvs_exponent_recode_source)) * bpvi_v_pvs_recode_sourcevaluation_selected_power) + (bpvi_result_pvs_recode_sourcevaluation_selected))) /\ forall bpvi_j_pvs_recode_sourcevaluation_selected_power. (exists bpvi_product_gap_pvs_recode_sourcevaluation_selected_power. bpvi_product_gap_pvs_recode_sourcevaluation_selected_power + S bpvi_j_pvs_recode_sourcevaluation_selected_power = pvs_exponent_recode_source) -> exists bpvi_factor_pvs_recode_sourcevaluation_selected_power bpvi_partial_pvs_recode_sourcevaluation_selected_power bpvi_successor_pvs_recode_sourcevaluation_selected_power. ((((exists bpvi_h_pvs_recode_sourcevaluation_selected_power_factor. bpvi_h_pvs_recode_sourcevaluation_selected_power_factor + S (bpvi_factor_pvs_recode_sourcevaluation_selected_power) = S ((S (bpvi_j_pvs_recode_sourcevaluation_selected_power)) * bpvi_c_pvs_recode_sourcevaluation_selected_power)) /\ exists bpvi_q_pvs_recode_sourcevaluation_selected_power_factor. bpvi_b_pvs_recode_sourcevaluation_selected_power = bpvi_q_pvs_recode_sourcevaluation_selected_power_factor * S ((S (bpvi_j_pvs_recode_sourcevaluation_selected_power)) * bpvi_c_pvs_recode_sourcevaluation_selected_power) + (bpvi_factor_pvs_recode_sourcevaluation_selected_power))) /\ ((((exists bpvi_h_pvs_recode_sourcevaluation_selected_power_partial. bpvi_h_pvs_recode_sourcevaluation_selected_power_partial + S (bpvi_partial_pvs_recode_sourcevaluation_selected_power) = S ((S (bpvi_j_pvs_recode_sourcevaluation_selected_power)) * bpvi_v_pvs_recode_sourcevaluation_selected_power)) /\ exists bpvi_q_pvs_recode_sourcevaluation_selected_power_partial. bpvi_u_pvs_recode_sourcevaluation_selected_power = bpvi_q_pvs_recode_sourcevaluation_selected_power_partial * S ((S (bpvi_j_pvs_recode_sourcevaluation_selected_power)) * bpvi_v_pvs_recode_sourcevaluation_selected_power) + (bpvi_partial_pvs_recode_sourcevaluation_selected_power))) /\ ((((exists bpvi_h_pvs_recode_sourcevaluation_selected_power_successor. bpvi_h_pvs_recode_sourcevaluation_selected_power_successor + S (bpvi_successor_pvs_recode_sourcevaluation_selected_power) = S ((S (S bpvi_j_pvs_recode_sourcevaluation_selected_power)) * bpvi_v_pvs_recode_sourcevaluation_selected_power)) /\ exists bpvi_q_pvs_recode_sourcevaluation_selected_power_successor. bpvi_u_pvs_recode_sourcevaluation_selected_power = bpvi_q_pvs_recode_sourcevaluation_selected_power_successor * S ((S (S bpvi_j_pvs_recode_sourcevaluation_selected_power)) * bpvi_v_pvs_recode_sourcevaluation_selected_power) + (bpvi_successor_pvs_recode_sourcevaluation_selected_power))) /\ bpvi_successor_pvs_recode_sourcevaluation_selected_power = bpvi_partial_pvs_recode_sourcevaluation_selected_power * bpvi_factor_pvs_recode_sourcevaluation_selected_power)))))))) /\ exists bpvi_divisor_factor_pvs_recode_sourcevaluation_selected. n = bpvi_result_pvs_recode_sourcevaluation_selected * bpvi_divisor_factor_pvs_recode_sourcevaluation_selected))) /\ forall bpd_candidate_pvs_recode_sourcevaluation. (exists bpd_gap_pvs_recode_sourcevaluation_candidate_bound. bpd_gap_pvs_recode_sourcevaluation_candidate_bound + (bpd_candidate_pvs_recode_sourcevaluation) = (n)) -> (exists bpvi_result_pvs_recode_sourcevaluation_candidate. ((exists bpvi_b_pvs_recode_sourcevaluation_candidate_power bpvi_c_pvs_recode_sourcevaluation_candidate_power. ((forall bpvi_i_pvs_recode_sourcevaluation_candidate_power. (exists bpvi_repeat_gap_pvs_recode_sourcevaluation_candidate_power. bpvi_repeat_gap_pvs_recode_sourcevaluation_candidate_power + S bpvi_i_pvs_recode_sourcevaluation_candidate_power = bpd_candidate_pvs_recode_sourcevaluation) -> (((exists bpvi_h_pvs_recode_sourcevaluation_candidate_power_repeat. bpvi_h_pvs_recode_sourcevaluation_candidate_power_repeat + S (pvs_prime_recode_source) = S ((S (bpvi_i_pvs_recode_sourcevaluation_candidate_power)) * bpvi_c_pvs_recode_sourcevaluation_candidate_power)) /\ exists bpvi_q_pvs_recode_sourcevaluation_candidate_power_repeat. bpvi_b_pvs_recode_sourcevaluation_candidate_power = bpvi_q_pvs_recode_sourcevaluation_candidate_power_repeat * S ((S (bpvi_i_pvs_recode_sourcevaluation_candidate_power)) * bpvi_c_pvs_recode_sourcevaluation_candidate_power) + (pvs_prime_recode_source)))) /\ (exists bpvi_u_pvs_recode_sourcevaluation_candidate_power bpvi_v_pvs_recode_sourcevaluation_candidate_power. ((((exists bpvi_h_pvs_recode_sourcevaluation_candidate_power_start. bpvi_h_pvs_recode_sourcevaluation_candidate_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_recode_sourcevaluation_candidate_power)) /\ exists bpvi_q_pvs_recode_sourcevaluation_candidate_power_start. bpvi_u_pvs_recode_sourcevaluation_candidate_power = bpvi_q_pvs_recode_sourcevaluation_candidate_power_start * S ((S (0)) * bpvi_v_pvs_recode_sourcevaluation_candidate_power) + (1))) /\ ((((exists bpvi_h_pvs_recode_sourcevaluation_candidate_power_terminal. bpvi_h_pvs_recode_sourcevaluation_candidate_power_terminal + S (bpvi_result_pvs_recode_sourcevaluation_candidate) = S ((S (bpd_candidate_pvs_recode_sourcevaluation)) * bpvi_v_pvs_recode_sourcevaluation_candidate_power)) /\ exists bpvi_q_pvs_recode_sourcevaluation_candidate_power_terminal. bpvi_u_pvs_recode_sourcevaluation_candidate_power = bpvi_q_pvs_recode_sourcevaluation_candidate_power_terminal * S ((S (bpd_candidate_pvs_recode_sourcevaluation)) * bpvi_v_pvs_recode_sourcevaluation_candidate_power) + (bpvi_result_pvs_recode_sourcevaluation_candidate))) /\ forall bpvi_j_pvs_recode_sourcevaluation_candidate_power. (exists bpvi_product_gap_pvs_recode_sourcevaluation_candidate_power. bpvi_product_gap_pvs_recode_sourcevaluation_candidate_power + S bpvi_j_pvs_recode_sourcevaluation_candidate_power = bpd_candidate_pvs_recode_sourcevaluation) -> exists bpvi_factor_pvs_recode_sourcevaluation_candidate_power bpvi_partial_pvs_recode_sourcevaluation_candidate_power bpvi_successor_pvs_recode_sourcevaluation_candidate_power. ((((exists bpvi_h_pvs_recode_sourcevaluation_candidate_power_factor. bpvi_h_pvs_recode_sourcevaluation_candidate_power_factor + S (bpvi_factor_pvs_recode_sourcevaluation_candidate_power) = S ((S (bpvi_j_pvs_recode_sourcevaluation_candidate_power)) * bpvi_c_pvs_recode_sourcevaluation_candidate_power)) /\ exists bpvi_q_pvs_recode_sourcevaluation_candidate_power_factor. bpvi_b_pvs_recode_sourcevaluation_candidate_power = bpvi_q_pvs_recode_sourcevaluation_candidate_power_factor * S ((S (bpvi_j_pvs_recode_sourcevaluation_candidate_power)) * bpvi_c_pvs_recode_sourcevaluation_candidate_power) + (bpvi_factor_pvs_recode_sourcevaluation_candidate_power))) /\ ((((exists bpvi_h_pvs_recode_sourcevaluation_candidate_power_partial. bpvi_h_pvs_recode_sourcevaluation_candidate_power_partial + S (bpvi_partial_pvs_recode_sourcevaluation_candidate_power) = S ((S (bpvi_j_pvs_recode_sourcevaluation_candidate_power)) * bpvi_v_pvs_recode_sourcevaluation_candidate_power)) /\ exists bpvi_q_pvs_recode_sourcevaluation_candidate_power_partial. bpvi_u_pvs_recode_sourcevaluation_candidate_power = bpvi_q_pvs_recode_sourcevaluation_candidate_power_partial * S ((S (bpvi_j_pvs_recode_sourcevaluation_candidate_power)) * bpvi_v_pvs_recode_sourcevaluation_candidate_power) + (bpvi_partial_pvs_recode_sourcevaluation_candidate_power))) /\ ((((exists bpvi_h_pvs_recode_sourcevaluation_candidate_power_successor. bpvi_h_pvs_recode_sourcevaluation_candidate_power_successor + S (bpvi_successor_pvs_recode_sourcevaluation_candidate_power) = S ((S (S bpvi_j_pvs_recode_sourcevaluation_candidate_power)) * bpvi_v_pvs_recode_sourcevaluation_candidate_power)) /\ exists bpvi_q_pvs_recode_sourcevaluation_candidate_power_successor. bpvi_u_pvs_recode_sourcevaluation_candidate_power = bpvi_q_pvs_recode_sourcevaluation_candidate_power_successor * S ((S (S bpvi_j_pvs_recode_sourcevaluation_candidate_power)) * bpvi_v_pvs_recode_sourcevaluation_candidate_power) + (bpvi_successor_pvs_recode_sourcevaluation_candidate_power))) /\ bpvi_successor_pvs_recode_sourcevaluation_candidate_power = bpvi_partial_pvs_recode_sourcevaluation_candidate_power * bpvi_factor_pvs_recode_sourcevaluation_candidate_power)))))))) /\ exists bpvi_divisor_factor_pvs_recode_sourcevaluation_candidate. n = bpvi_result_pvs_recode_sourcevaluation_candidate * bpvi_divisor_factor_pvs_recode_sourcevaluation_candidate)) -> (exists bpd_gap_pvs_recode_sourcevaluation_maximal. bpd_gap_pvs_recode_sourcevaluation_maximal + (bpd_candidate_pvs_recode_sourcevaluation) = (pvs_exponent_recode_source))) /\ (exists pa_b_pvs_recode_sourcevalue pa_c_pvs_recode_sourcevalue. ((forall pa_i_pvs_recode_sourcevalue_repeat. (exists pa_lt_pvs_recode_sourcevalue_repeat_bound. pa_lt_pvs_recode_sourcevalue_repeat_bound + S pa_i_pvs_recode_sourcevalue_repeat = pvs_exponent_recode_source) -> (((exists pa_h_pvs_recode_sourcevalue_repeat_decoded. pa_h_pvs_recode_sourcevalue_repeat_decoded + S (pvs_prime_recode_source) = S ((S (pa_i_pvs_recode_sourcevalue_repeat)) * pa_c_pvs_recode_sourcevalue)) /\ exists pa_q_pvs_recode_sourcevalue_repeat_decoded. pa_b_pvs_recode_sourcevalue = pa_q_pvs_recode_sourcevalue_repeat_decoded * S ((S (pa_i_pvs_recode_sourcevalue_repeat)) * pa_c_pvs_recode_sourcevalue) + (pvs_prime_recode_source)))) /\ (exists pa_u_pvs_recode_sourcevalue_product pa_v_pvs_recode_sourcevalue_product. ((((exists pa_h_pvs_recode_sourcevalue_product_start. pa_h_pvs_recode_sourcevalue_product_start + S (1) = S ((S (0)) * pa_v_pvs_recode_sourcevalue_product)) /\ exists pa_q_pvs_recode_sourcevalue_product_start. pa_u_pvs_recode_sourcevalue_product = pa_q_pvs_recode_sourcevalue_product_start * S ((S (0)) * pa_v_pvs_recode_sourcevalue_product) + (1))) /\ ((((exists pa_h_pvs_recode_sourcevalue_product_terminal. pa_h_pvs_recode_sourcevalue_product_terminal + S (pvs_power_recode_source) = S ((S (pvs_exponent_recode_source)) * pa_v_pvs_recode_sourcevalue_product)) /\ exists pa_q_pvs_recode_sourcevalue_product_terminal. pa_u_pvs_recode_sourcevalue_product = pa_q_pvs_recode_sourcevalue_product_terminal * S ((S (pvs_exponent_recode_source)) * pa_v_pvs_recode_sourcevalue_product) + (pvs_power_recode_source))) /\ forall pa_i_pvs_recode_sourcevalue_product. (exists pa_lt_pvs_recode_sourcevalue_product_bound. pa_lt_pvs_recode_sourcevalue_product_bound + S pa_i_pvs_recode_sourcevalue_product = pvs_exponent_recode_source) -> exists pa_p_pvs_recode_sourcevalue_product pa_r_pvs_recode_sourcevalue_product pa_s_pvs_recode_sourcevalue_product. ((((exists pa_h_pvs_recode_sourcevalue_product_factor. pa_h_pvs_recode_sourcevalue_product_factor + S (pa_p_pvs_recode_sourcevalue_product) = S ((S (pa_i_pvs_recode_sourcevalue_product)) * pa_c_pvs_recode_sourcevalue)) /\ exists pa_q_pvs_recode_sourcevalue_product_factor. pa_b_pvs_recode_sourcevalue = pa_q_pvs_recode_sourcevalue_product_factor * S ((S (pa_i_pvs_recode_sourcevalue_product)) * pa_c_pvs_recode_sourcevalue) + (pa_p_pvs_recode_sourcevalue_product))) /\ ((((exists pa_h_pvs_recode_sourcevalue_product_partial. pa_h_pvs_recode_sourcevalue_product_partial + S (pa_r_pvs_recode_sourcevalue_product) = S ((S (pa_i_pvs_recode_sourcevalue_product)) * pa_v_pvs_recode_sourcevalue_product)) /\ exists pa_q_pvs_recode_sourcevalue_product_partial. pa_u_pvs_recode_sourcevalue_product = pa_q_pvs_recode_sourcevalue_product_partial * S ((S (pa_i_pvs_recode_sourcevalue_product)) * pa_v_pvs_recode_sourcevalue_product) + (pa_r_pvs_recode_sourcevalue_product))) /\ ((((exists pa_h_pvs_recode_sourcevalue_product_successor. pa_h_pvs_recode_sourcevalue_product_successor + S (pa_s_pvs_recode_sourcevalue_product) = S ((S (S pa_i_pvs_recode_sourcevalue_product)) * pa_v_pvs_recode_sourcevalue_product)) /\ exists pa_q_pvs_recode_sourcevalue_product_successor. pa_u_pvs_recode_sourcevalue_product = pa_q_pvs_recode_sourcevalue_product_successor * S ((S (S pa_i_pvs_recode_sourcevalue_product)) * pa_v_pvs_recode_sourcevalue_product) + (pa_s_pvs_recode_sourcevalue_product))) /\ pa_s_pvs_recode_sourcevalue_product = pa_r_pvs_recode_sourcevalue_product * pa_p_pvs_recode_sourcevalue_product))))))))))))))))))))) -> (forall pfp_i_pvs_recode_primes pfp_a_pvs_recode_primes. (exists pfp_gap_pvs_recode_primesbound. pfp_gap_pvs_recode_primesbound + S (pfp_i_pvs_recode_primes) = (l)) -> (((exists ff_h_pfp_pvs_recode_primesold. ff_h_pfp_pvs_recode_primesold + S (pfp_a_pvs_recode_primes) = S ((S (pfp_i_pvs_recode_primes)) * pc)) /\ exists ff_q_pfp_pvs_recode_primesold. pb = ff_q_pfp_pvs_recode_primesold * S ((S (pfp_i_pvs_recode_primes)) * pc) + (pfp_a_pvs_recode_primes))) -> (((exists ff_h_pfp_pvs_recode_primesnew. ff_h_pfp_pvs_recode_primesnew + S (pfp_a_pvs_recode_primes) = S ((S (pfp_i_pvs_recode_primes)) * qc)) /\ exists ff_q_pfp_pvs_recode_primesnew. qb = ff_q_pfp_pvs_recode_primesnew * S ((S (pfp_i_pvs_recode_primes)) * qc) + (pfp_a_pvs_recode_primes)))) -> (forall pfp_i_pvs_recode_exponents pfp_a_pvs_recode_exponents. (exists pfp_gap_pvs_recode_exponentsbound. pfp_gap_pvs_recode_exponentsbound + S (pfp_i_pvs_recode_exponents) = (l)) -> (((exists ff_h_pfp_pvs_recode_exponentsold. ff_h_pfp_pvs_recode_exponentsold + S (pfp_a_pvs_recode_exponents) = S ((S (pfp_i_pvs_recode_exponents)) * ec)) /\ exists ff_q_pfp_pvs_recode_exponentsold. eb = ff_q_pfp_pvs_recode_exponentsold * S ((S (pfp_i_pvs_recode_exponents)) * ec) + (pfp_a_pvs_recode_exponents))) -> (((exists ff_h_pfp_pvs_recode_exponentsnew. ff_h_pfp_pvs_recode_exponentsnew + S (pfp_a_pvs_recode_exponents) = S ((S (pfp_i_pvs_recode_exponents)) * fc)) /\ exists ff_q_pfp_pvs_recode_exponentsnew. fb = ff_q_pfp_pvs_recode_exponentsnew * S ((S (pfp_i_pvs_recode_exponents)) * fc) + (pfp_a_pvs_recode_exponents)))) -> (forall pfp_i_pvs_recode_powers pfp_a_pvs_recode_powers. (exists pfp_gap_pvs_recode_powersbound. pfp_gap_pvs_recode_powersbound + S (pfp_i_pvs_recode_powers) = (l)) -> (((exists ff_h_pfp_pvs_recode_powersold. ff_h_pfp_pvs_recode_powersold + S (pfp_a_pvs_recode_powers) = S ((S (pfp_i_pvs_recode_powers)) * vc)) /\ exists ff_q_pfp_pvs_recode_powersold. vb = ff_q_pfp_pvs_recode_powersold * S ((S (pfp_i_pvs_recode_powers)) * vc) + (pfp_a_pvs_recode_powers))) -> (((exists ff_h_pfp_pvs_recode_powersnew. ff_h_pfp_pvs_recode_powersnew + S (pfp_a_pvs_recode_powers) = S ((S (pfp_i_pvs_recode_powers)) * wc)) /\ exists ff_q_pfp_pvs_recode_powersnew. wb = ff_q_pfp_pvs_recode_powersnew * S ((S (pfp_i_pvs_recode_powers)) * wc) + (pfp_a_pvs_recode_powers)))) -> (forall pvs_index_recode_target. (exists pvs_gap_recode_targetindex. pvs_gap_recode_targetindex + S (pvs_index_recode_target) = (l)) -> exists pvs_prime_recode_target pvs_exponent_recode_target pvs_power_recode_target. (((((exists ff_h_pvs_recode_targetprime. ff_h_pvs_recode_targetprime + S (pvs_prime_recode_target) = S ((S (pvs_index_recode_target)) * qc)) /\ exists ff_q_pvs_recode_targetprime. qb = ff_q_pvs_recode_targetprime * S ((S (pvs_index_recode_target)) * qc) + (pvs_prime_recode_target))) /\ (((((exists ff_h_pvs_recode_targetexponent. ff_h_pvs_recode_targetexponent + S (pvs_exponent_recode_target) = S ((S (pvs_index_recode_target)) * fc)) /\ exists ff_q_pvs_recode_targetexponent. fb = ff_q_pvs_recode_targetexponent * S ((S (pvs_index_recode_target)) * fc) + (pvs_exponent_recode_target))) /\ (((((exists ff_h_pvs_recode_targetpower. ff_h_pvs_recode_targetpower + S (pvs_power_recode_target) = S ((S (pvs_index_recode_target)) * wc)) /\ exists ff_q_pvs_recode_targetpower. wb = ff_q_pvs_recode_targetpower * S ((S (pvs_index_recode_target)) * wc) + (pvs_power_recode_target))) /\ (((~((pvs_prime_recode_target) = 1) /\ forall pvs_left_recode_targetdomain pvs_right_recode_targetdomain. (pvs_prime_recode_target) = pvs_left_recode_targetdomain * pvs_right_recode_targetdomain -> pvs_left_recode_targetdomain = 1 \/ pvs_right_recode_targetdomain = 1) /\ (((~(pvs_exponent_recode_target = 0)) /\ (((((exists bpd_gap_pvs_recode_targetvaluation_selected_bound. bpd_gap_pvs_recode_targetvaluation_selected_bound + (pvs_exponent_recode_target) = (n)) /\ (exists bpvi_result_pvs_recode_targetvaluation_selected. ((exists bpvi_b_pvs_recode_targetvaluation_selected_power bpvi_c_pvs_recode_targetvaluation_selected_power. ((forall bpvi_i_pvs_recode_targetvaluation_selected_power. (exists bpvi_repeat_gap_pvs_recode_targetvaluation_selected_power. bpvi_repeat_gap_pvs_recode_targetvaluation_selected_power + S bpvi_i_pvs_recode_targetvaluation_selected_power = pvs_exponent_recode_target) -> (((exists bpvi_h_pvs_recode_targetvaluation_selected_power_repeat. bpvi_h_pvs_recode_targetvaluation_selected_power_repeat + S (pvs_prime_recode_target) = S ((S (bpvi_i_pvs_recode_targetvaluation_selected_power)) * bpvi_c_pvs_recode_targetvaluation_selected_power)) /\ exists bpvi_q_pvs_recode_targetvaluation_selected_power_repeat. bpvi_b_pvs_recode_targetvaluation_selected_power = bpvi_q_pvs_recode_targetvaluation_selected_power_repeat * S ((S (bpvi_i_pvs_recode_targetvaluation_selected_power)) * bpvi_c_pvs_recode_targetvaluation_selected_power) + (pvs_prime_recode_target)))) /\ (exists bpvi_u_pvs_recode_targetvaluation_selected_power bpvi_v_pvs_recode_targetvaluation_selected_power. ((((exists bpvi_h_pvs_recode_targetvaluation_selected_power_start. bpvi_h_pvs_recode_targetvaluation_selected_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_recode_targetvaluation_selected_power)) /\ exists bpvi_q_pvs_recode_targetvaluation_selected_power_start. bpvi_u_pvs_recode_targetvaluation_selected_power = bpvi_q_pvs_recode_targetvaluation_selected_power_start * S ((S (0)) * bpvi_v_pvs_recode_targetvaluation_selected_power) + (1))) /\ ((((exists bpvi_h_pvs_recode_targetvaluation_selected_power_terminal. bpvi_h_pvs_recode_targetvaluation_selected_power_terminal + S (bpvi_result_pvs_recode_targetvaluation_selected) = S ((S (pvs_exponent_recode_target)) * bpvi_v_pvs_recode_targetvaluation_selected_power)) /\ exists bpvi_q_pvs_recode_targetvaluation_selected_power_terminal. bpvi_u_pvs_recode_targetvaluation_selected_power = bpvi_q_pvs_recode_targetvaluation_selected_power_terminal * S ((S (pvs_exponent_recode_target)) * bpvi_v_pvs_recode_targetvaluation_selected_power) + (bpvi_result_pvs_recode_targetvaluation_selected))) /\ forall bpvi_j_pvs_recode_targetvaluation_selected_power. (exists bpvi_product_gap_pvs_recode_targetvaluation_selected_power. bpvi_product_gap_pvs_recode_targetvaluation_selected_power + S bpvi_j_pvs_recode_targetvaluation_selected_power = pvs_exponent_recode_target) -> exists bpvi_factor_pvs_recode_targetvaluation_selected_power bpvi_partial_pvs_recode_targetvaluation_selected_power bpvi_successor_pvs_recode_targetvaluation_selected_power. ((((exists bpvi_h_pvs_recode_targetvaluation_selected_power_factor. bpvi_h_pvs_recode_targetvaluation_selected_power_factor + S (bpvi_factor_pvs_recode_targetvaluation_selected_power) = S ((S (bpvi_j_pvs_recode_targetvaluation_selected_power)) * bpvi_c_pvs_recode_targetvaluation_selected_power)) /\ exists bpvi_q_pvs_recode_targetvaluation_selected_power_factor. bpvi_b_pvs_recode_targetvaluation_selected_power = bpvi_q_pvs_recode_targetvaluation_selected_power_factor * S ((S (bpvi_j_pvs_recode_targetvaluation_selected_power)) * bpvi_c_pvs_recode_targetvaluation_selected_power) + (bpvi_factor_pvs_recode_targetvaluation_selected_power))) /\ ((((exists bpvi_h_pvs_recode_targetvaluation_selected_power_partial. bpvi_h_pvs_recode_targetvaluation_selected_power_partial + S (bpvi_partial_pvs_recode_targetvaluation_selected_power) = S ((S (bpvi_j_pvs_recode_targetvaluation_selected_power)) * bpvi_v_pvs_recode_targetvaluation_selected_power)) /\ exists bpvi_q_pvs_recode_targetvaluation_selected_power_partial. bpvi_u_pvs_recode_targetvaluation_selected_power = bpvi_q_pvs_recode_targetvaluation_selected_power_partial * S ((S (bpvi_j_pvs_recode_targetvaluation_selected_power)) * bpvi_v_pvs_recode_targetvaluation_selected_power) + (bpvi_partial_pvs_recode_targetvaluation_selected_power))) /\ ((((exists bpvi_h_pvs_recode_targetvaluation_selected_power_successor. bpvi_h_pvs_recode_targetvaluation_selected_power_successor + S (bpvi_successor_pvs_recode_targetvaluation_selected_power) = S ((S (S bpvi_j_pvs_recode_targetvaluation_selected_power)) * bpvi_v_pvs_recode_targetvaluation_selected_power)) /\ exists bpvi_q_pvs_recode_targetvaluation_selected_power_successor. bpvi_u_pvs_recode_targetvaluation_selected_power = bpvi_q_pvs_recode_targetvaluation_selected_power_successor * S ((S (S bpvi_j_pvs_recode_targetvaluation_selected_power)) * bpvi_v_pvs_recode_targetvaluation_selected_power) + (bpvi_successor_pvs_recode_targetvaluation_selected_power))) /\ bpvi_successor_pvs_recode_targetvaluation_selected_power = bpvi_partial_pvs_recode_targetvaluation_selected_power * bpvi_factor_pvs_recode_targetvaluation_selected_power)))))))) /\ exists bpvi_divisor_factor_pvs_recode_targetvaluation_selected. n = bpvi_result_pvs_recode_targetvaluation_selected * bpvi_divisor_factor_pvs_recode_targetvaluation_selected))) /\ forall bpd_candidate_pvs_recode_targetvaluation. (exists bpd_gap_pvs_recode_targetvaluation_candidate_bound. bpd_gap_pvs_recode_targetvaluation_candidate_bound + (bpd_candidate_pvs_recode_targetvaluation) = (n)) -> (exists bpvi_result_pvs_recode_targetvaluation_candidate. ((exists bpvi_b_pvs_recode_targetvaluation_candidate_power bpvi_c_pvs_recode_targetvaluation_candidate_power. ((forall bpvi_i_pvs_recode_targetvaluation_candidate_power. (exists bpvi_repeat_gap_pvs_recode_targetvaluation_candidate_power. bpvi_repeat_gap_pvs_recode_targetvaluation_candidate_power + S bpvi_i_pvs_recode_targetvaluation_candidate_power = bpd_candidate_pvs_recode_targetvaluation) -> (((exists bpvi_h_pvs_recode_targetvaluation_candidate_power_repeat. bpvi_h_pvs_recode_targetvaluation_candidate_power_repeat + S (pvs_prime_recode_target) = S ((S (bpvi_i_pvs_recode_targetvaluation_candidate_power)) * bpvi_c_pvs_recode_targetvaluation_candidate_power)) /\ exists bpvi_q_pvs_recode_targetvaluation_candidate_power_repeat. bpvi_b_pvs_recode_targetvaluation_candidate_power = bpvi_q_pvs_recode_targetvaluation_candidate_power_repeat * S ((S (bpvi_i_pvs_recode_targetvaluation_candidate_power)) * bpvi_c_pvs_recode_targetvaluation_candidate_power) + (pvs_prime_recode_target)))) /\ (exists bpvi_u_pvs_recode_targetvaluation_candidate_power bpvi_v_pvs_recode_targetvaluation_candidate_power. ((((exists bpvi_h_pvs_recode_targetvaluation_candidate_power_start. bpvi_h_pvs_recode_targetvaluation_candidate_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_recode_targetvaluation_candidate_power)) /\ exists bpvi_q_pvs_recode_targetvaluation_candidate_power_start. bpvi_u_pvs_recode_targetvaluation_candidate_power = bpvi_q_pvs_recode_targetvaluation_candidate_power_start * S ((S (0)) * bpvi_v_pvs_recode_targetvaluation_candidate_power) + (1))) /\ ((((exists bpvi_h_pvs_recode_targetvaluation_candidate_power_terminal. bpvi_h_pvs_recode_targetvaluation_candidate_power_terminal + S (bpvi_result_pvs_recode_targetvaluation_candidate) = S ((S (bpd_candidate_pvs_recode_targetvaluation)) * bpvi_v_pvs_recode_targetvaluation_candidate_power)) /\ exists bpvi_q_pvs_recode_targetvaluation_candidate_power_terminal. bpvi_u_pvs_recode_targetvaluation_candidate_power = bpvi_q_pvs_recode_targetvaluation_candidate_power_terminal * S ((S (bpd_candidate_pvs_recode_targetvaluation)) * bpvi_v_pvs_recode_targetvaluation_candidate_power) + (bpvi_result_pvs_recode_targetvaluation_candidate))) /\ forall bpvi_j_pvs_recode_targetvaluation_candidate_power. (exists bpvi_product_gap_pvs_recode_targetvaluation_candidate_power. bpvi_product_gap_pvs_recode_targetvaluation_candidate_power + S bpvi_j_pvs_recode_targetvaluation_candidate_power = bpd_candidate_pvs_recode_targetvaluation) -> exists bpvi_factor_pvs_recode_targetvaluation_candidate_power bpvi_partial_pvs_recode_targetvaluation_candidate_power bpvi_successor_pvs_recode_targetvaluation_candidate_power. ((((exists bpvi_h_pvs_recode_targetvaluation_candidate_power_factor. bpvi_h_pvs_recode_targetvaluation_candidate_power_factor + S (bpvi_factor_pvs_recode_targetvaluation_candidate_power) = S ((S (bpvi_j_pvs_recode_targetvaluation_candidate_power)) * bpvi_c_pvs_recode_targetvaluation_candidate_power)) /\ exists bpvi_q_pvs_recode_targetvaluation_candidate_power_factor. bpvi_b_pvs_recode_targetvaluation_candidate_power = bpvi_q_pvs_recode_targetvaluation_candidate_power_factor * S ((S (bpvi_j_pvs_recode_targetvaluation_candidate_power)) * bpvi_c_pvs_recode_targetvaluation_candidate_power) + (bpvi_factor_pvs_recode_targetvaluation_candidate_power))) /\ ((((exists bpvi_h_pvs_recode_targetvaluation_candidate_power_partial. bpvi_h_pvs_recode_targetvaluation_candidate_power_partial + S (bpvi_partial_pvs_recode_targetvaluation_candidate_power) = S ((S (bpvi_j_pvs_recode_targetvaluation_candidate_power)) * bpvi_v_pvs_recode_targetvaluation_candidate_power)) /\ exists bpvi_q_pvs_recode_targetvaluation_candidate_power_partial. bpvi_u_pvs_recode_targetvaluation_candidate_power = bpvi_q_pvs_recode_targetvaluation_candidate_power_partial * S ((S (bpvi_j_pvs_recode_targetvaluation_candidate_power)) * bpvi_v_pvs_recode_targetvaluation_candidate_power) + (bpvi_partial_pvs_recode_targetvaluation_candidate_power))) /\ ((((exists bpvi_h_pvs_recode_targetvaluation_candidate_power_successor. bpvi_h_pvs_recode_targetvaluation_candidate_power_successor + S (bpvi_successor_pvs_recode_targetvaluation_candidate_power) = S ((S (S bpvi_j_pvs_recode_targetvaluation_candidate_power)) * bpvi_v_pvs_recode_targetvaluation_candidate_power)) /\ exists bpvi_q_pvs_recode_targetvaluation_candidate_power_successor. bpvi_u_pvs_recode_targetvaluation_candidate_power = bpvi_q_pvs_recode_targetvaluation_candidate_power_successor * S ((S (S bpvi_j_pvs_recode_targetvaluation_candidate_power)) * bpvi_v_pvs_recode_targetvaluation_candidate_power) + (bpvi_successor_pvs_recode_targetvaluation_candidate_power))) /\ bpvi_successor_pvs_recode_targetvaluation_candidate_power = bpvi_partial_pvs_recode_targetvaluation_candidate_power * bpvi_factor_pvs_recode_targetvaluation_candidate_power)))))))) /\ exists bpvi_divisor_factor_pvs_recode_targetvaluation_candidate. n = bpvi_result_pvs_recode_targetvaluation_candidate * bpvi_divisor_factor_pvs_recode_targetvaluation_candidate)) -> (exists bpd_gap_pvs_recode_targetvaluation_maximal. bpd_gap_pvs_recode_targetvaluation_maximal + (bpd_candidate_pvs_recode_targetvaluation) = (pvs_exponent_recode_target))) /\ (exists pa_b_pvs_recode_targetvalue pa_c_pvs_recode_targetvalue. ((forall pa_i_pvs_recode_targetvalue_repeat. (exists pa_lt_pvs_recode_targetvalue_repeat_bound. pa_lt_pvs_recode_targetvalue_repeat_bound + S pa_i_pvs_recode_targetvalue_repeat = pvs_exponent_recode_target) -> (((exists pa_h_pvs_recode_targetvalue_repeat_decoded. pa_h_pvs_recode_targetvalue_repeat_decoded + S (pvs_prime_recode_target) = S ((S (pa_i_pvs_recode_targetvalue_repeat)) * pa_c_pvs_recode_targetvalue)) /\ exists pa_q_pvs_recode_targetvalue_repeat_decoded. pa_b_pvs_recode_targetvalue = pa_q_pvs_recode_targetvalue_repeat_decoded * S ((S (pa_i_pvs_recode_targetvalue_repeat)) * pa_c_pvs_recode_targetvalue) + (pvs_prime_recode_target)))) /\ (exists pa_u_pvs_recode_targetvalue_product pa_v_pvs_recode_targetvalue_product. ((((exists pa_h_pvs_recode_targetvalue_product_start. pa_h_pvs_recode_targetvalue_product_start + S (1) = S ((S (0)) * pa_v_pvs_recode_targetvalue_product)) /\ exists pa_q_pvs_recode_targetvalue_product_start. pa_u_pvs_recode_targetvalue_product = pa_q_pvs_recode_targetvalue_product_start * S ((S (0)) * pa_v_pvs_recode_targetvalue_product) + (1))) /\ ((((exists pa_h_pvs_recode_targetvalue_product_terminal. pa_h_pvs_recode_targetvalue_product_terminal + S (pvs_power_recode_target) = S ((S (pvs_exponent_recode_target)) * pa_v_pvs_recode_targetvalue_product)) /\ exists pa_q_pvs_recode_targetvalue_product_terminal. pa_u_pvs_recode_targetvalue_product = pa_q_pvs_recode_targetvalue_product_terminal * S ((S (pvs_exponent_recode_target)) * pa_v_pvs_recode_targetvalue_product) + (pvs_power_recode_target))) /\ forall pa_i_pvs_recode_targetvalue_product. (exists pa_lt_pvs_recode_targetvalue_product_bound. pa_lt_pvs_recode_targetvalue_product_bound + S pa_i_pvs_recode_targetvalue_product = pvs_exponent_recode_target) -> exists pa_p_pvs_recode_targetvalue_product pa_r_pvs_recode_targetvalue_product pa_s_pvs_recode_targetvalue_product. ((((exists pa_h_pvs_recode_targetvalue_product_factor. pa_h_pvs_recode_targetvalue_product_factor + S (pa_p_pvs_recode_targetvalue_product) = S ((S (pa_i_pvs_recode_targetvalue_product)) * pa_c_pvs_recode_targetvalue)) /\ exists pa_q_pvs_recode_targetvalue_product_factor. pa_b_pvs_recode_targetvalue = pa_q_pvs_recode_targetvalue_product_factor * S ((S (pa_i_pvs_recode_targetvalue_product)) * pa_c_pvs_recode_targetvalue) + (pa_p_pvs_recode_targetvalue_product))) /\ ((((exists pa_h_pvs_recode_targetvalue_product_partial. pa_h_pvs_recode_targetvalue_product_partial + S (pa_r_pvs_recode_targetvalue_product) = S ((S (pa_i_pvs_recode_targetvalue_product)) * pa_v_pvs_recode_targetvalue_product)) /\ exists pa_q_pvs_recode_targetvalue_product_partial. pa_u_pvs_recode_targetvalue_product = pa_q_pvs_recode_targetvalue_product_partial * S ((S (pa_i_pvs_recode_targetvalue_product)) * pa_v_pvs_recode_targetvalue_product) + (pa_r_pvs_recode_targetvalue_product))) /\ ((((exists pa_h_pvs_recode_targetvalue_product_successor. pa_h_pvs_recode_targetvalue_product_successor + S (pa_s_pvs_recode_targetvalue_product) = S ((S (S pa_i_pvs_recode_targetvalue_product)) * pa_v_pvs_recode_targetvalue_product)) /\ exists pa_q_pvs_recode_targetvalue_product_successor. pa_u_pvs_recode_targetvalue_product = pa_q_pvs_recode_targetvalue_product_successor * S ((S (S pa_i_pvs_recode_targetvalue_product)) * pa_v_pvs_recode_targetvalue_product) + (pa_s_pvs_recode_targetvalue_product))) /\ pa_s_pvs_recode_targetvalue_product = pa_r_pvs_recode_targetvalue_product * pa_p_pvs_recode_targetvalue_product)))))))))))))))))))))

Complete tactic proof in conservative notation

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

61 script commands · 17 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.

01Fix variables and assumptionsL1–10

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

  1. L1
    intro n
  2. L2
    intro pb
  3. L3
    intro pc
  4. L4
    intro eb
  5. L5
    intro ec
  6. L6
    intro vb
  7. L7
    intro vc
  8. L8
    intro l
  9. L9
    intro qb
  10. L10
    intro qc
02Fix variables and assumptionsL11–20

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

  1. L11
    intro fb
  2. L12
    intro fc
  3. L13
    intro wb
  4. L14
    intro wc
  5. L15
    intro hentries
  6. L16
    intro hprimes
  7. L17
    intro hexponents
  8. L18
    intro hpowers
  9. L19
    intro i
  10. L20
    intro hi
03Establish hrowL21–24

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

  1. L21
    have hrow : ∃ p. ∃ e. ∃ v. BetaAt(pb,pc,i,p) ∧ (BetaAt(eb,ec,i,e) ∧ (BetaAt(vb,vc,i,v) ∧ (Prime(p) ∧ (¬e = 0 ∧ (BoundedPowerValuation(p,n,n,e) ∧ Pow(p,e,v))))))Definitions: BetaAt(pb,pc,i,p)BetaAt(eb,ec,i,e)BetaAt(vb,vc,i,v)Prime(p)BoundedPowerValuation(p,n,n,e)Pow(p,e,v)Original native command in the exact edition
  2. L22
    specialize hentries (i)
  3. L23
    apply hentries
  4. L24
    exact hi
04Separate the logical casesL25–33

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

  1. L25
    cases hrow
  2. L26
    cases hrow_witness
  3. L27
    cases hrow_witness_witness
  4. L28
    cases hrow_witness_witness_witness
  5. L29
    cases hrow_witness_witness_witness_right
  6. L30
    cases hrow_witness_witness_witness_right_right
  7. L31
    cases hrow_witness_witness_witness_right_right_right
  8. L32
    cases hrow_witness_witness_witness_right_right_right_right
  9. L33
    cases hrow_witness_witness_witness_right_right_right_right_right
05Construct an explicit witnessL34–36

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

  1. L34
    exists x
  2. L35
    exists x1
  3. L36
    exists x2
06Separate the logical casesL37–37

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

  1. L37
    split
07Use earlier factsL38–42

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

  1. L38
    specialize hprimes (i)
  2. L39
    specialize hprimes (x)
  3. L40
    apply hprimes
  4. L41
    exact hi
  5. L42
    exact hrow_witness_witness_witness_left
08Separate the logical casesL43–43

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

  1. L43
    split
09Use earlier factsL44–48

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

  1. L44
    specialize hexponents (i)
  2. L45
    specialize hexponents (x1)
  3. L46
    apply hexponents
  4. L47
    exact hi
  5. L48
    exact hrow_witness_witness_witness_right_left
10Separate the logical casesL49–49

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

  1. L49
    split
11Use earlier factsL50–54

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

  1. L50
    specialize hpowers (i)
  2. L51
    specialize hpowers (x2)
  3. L52
    apply hpowers
  4. L53
    exact hi
  5. L54
    exact hrow_witness_witness_witness_right_right_left
12Separate the logical casesL55–55

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

  1. L55
    split
13Use earlier factsL56–56

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

  1. L56
    exact hrow_witness_witness_witness_right_right_right_left
14Separate the logical casesL57–57

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

  1. L57
    split
15Use earlier factsL58–58

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

  1. L58
    exact hrow_witness_witness_witness_right_right_right_right_left
16Separate the logical casesL59–59

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

  1. L59
    split
17Use earlier factsL60–61

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

  1. L60
    exact hrow_witness_witness_witness_right_right_right_right_right_left
  2. L61
    exact hrow_witness_witness_witness_right_right_right_right_right_right

Library-wide reading audit

Original defined command ledger · 61 lines
  1. 0001intro n
  2. 0002intro pb
  3. 0003intro pc
  4. 0004intro eb
  5. 0005intro ec
  6. 0006intro vb
  7. 0007intro vc
  8. 0008intro l
  9. 0009intro qb
  10. 0010intro qc
  11. 0011intro fb
  12. 0012intro fc
  13. 0013intro wb
  14. 0014intro wc
  15. 0015intro hentries
  16. 0016intro hprimes
  17. 0017intro hexponents
  18. 0018intro hpowers
  19. 0019intro i
  20. 0020intro hi
  21. 0021have hrow : ∃ p. ∃ e. ∃ v. BetaAt(pb,pc,i,p) ∧ (BetaAt(eb,ec,i,e) ∧ (BetaAt(vb,vc,i,v) ∧ (Prime(p) ∧ (¬e = 0 ∧ (BoundedPowerValuation(p,n,n,e)Pow(p,e,v))))))
  22. 0022specialize hentries (i)
  23. 0023apply hentries
  24. 0024exact hi
  25. 0025cases hrow
  26. 0026cases hrow_witness
  27. 0027cases hrow_witness_witness
  28. 0028cases hrow_witness_witness_witness
  29. 0029cases hrow_witness_witness_witness_right
  30. 0030cases hrow_witness_witness_witness_right_right
  31. 0031cases hrow_witness_witness_witness_right_right_right
  32. 0032cases hrow_witness_witness_witness_right_right_right_right
  33. 0033cases hrow_witness_witness_witness_right_right_right_right_right
  34. 0034exists x
  35. 0035exists x1
  36. 0036exists x2
  37. 0037split
  38. 0038specialize hprimes (i)
  39. 0039specialize hprimes (x)
  40. 0040apply hprimes
  41. 0041exact hi
  42. 0042exact hrow_witness_witness_witness_left
  43. 0043split
  44. 0044specialize hexponents (i)
  45. 0045specialize hexponents (x1)
  46. 0046apply hexponents
  47. 0047exact hi
  48. 0048exact hrow_witness_witness_witness_right_left
  49. 0049split
  50. 0050specialize hpowers (i)
  51. 0051specialize hpowers (x2)
  52. 0052apply hpowers
  53. 0053exact hi
  54. 0054exact hrow_witness_witness_witness_right_right_left
  55. 0055split
  56. 0056exact hrow_witness_witness_witness_right_right_right_left
  57. 0057split
  58. 0058exact hrow_witness_witness_witness_right_right_right_right_left
  59. 0059split
  60. 0060exact hrow_witness_witness_witness_right_right_right_right_right_left
  61. 0061exact hrow_witness_witness_witness_right_right_right_right_right_right