PV0002

prime_valuation_zero_of_nondivisor

Alpha v34 independently verified · alpha_closed; checked-use authorized; not Stable

Construct valuation zero for a positive value not divisible by the actual prime.

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.

Exact expanded first-order arithmetic statement

forall p n. (~((p) = 1) /\ forall pvs_left_zero_domain pvs_right_zero_domain. (p) = pvs_left_zero_domain * pvs_right_zero_domain -> pvs_left_zero_domain = 1 \/ pvs_right_zero_domain = 1) -> ~(n = 0) -> ~(exists pvs_factor_zero_nondivisor. (n) = (p) * pvs_factor_zero_nondivisor) -> (((exists bpd_gap_pvs_zero_value_selected_bound. bpd_gap_pvs_zero_value_selected_bound + (0) = (n)) /\ (exists bpvi_result_pvs_zero_value_selected. ((exists bpvi_b_pvs_zero_value_selected_power bpvi_c_pvs_zero_value_selected_power. ((forall bpvi_i_pvs_zero_value_selected_power. (exists bpvi_repeat_gap_pvs_zero_value_selected_power. bpvi_repeat_gap_pvs_zero_value_selected_power + S bpvi_i_pvs_zero_value_selected_power = 0) -> (((exists bpvi_h_pvs_zero_value_selected_power_repeat. bpvi_h_pvs_zero_value_selected_power_repeat + S (p) = S ((S (bpvi_i_pvs_zero_value_selected_power)) * bpvi_c_pvs_zero_value_selected_power)) /\ exists bpvi_q_pvs_zero_value_selected_power_repeat. bpvi_b_pvs_zero_value_selected_power = bpvi_q_pvs_zero_value_selected_power_repeat * S ((S (bpvi_i_pvs_zero_value_selected_power)) * bpvi_c_pvs_zero_value_selected_power) + (p)))) /\ (exists bpvi_u_pvs_zero_value_selected_power bpvi_v_pvs_zero_value_selected_power. ((((exists bpvi_h_pvs_zero_value_selected_power_start. bpvi_h_pvs_zero_value_selected_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_zero_value_selected_power)) /\ exists bpvi_q_pvs_zero_value_selected_power_start. bpvi_u_pvs_zero_value_selected_power = bpvi_q_pvs_zero_value_selected_power_start * S ((S (0)) * bpvi_v_pvs_zero_value_selected_power) + (1))) /\ ((((exists bpvi_h_pvs_zero_value_selected_power_terminal. bpvi_h_pvs_zero_value_selected_power_terminal + S (bpvi_result_pvs_zero_value_selected) = S ((S (0)) * bpvi_v_pvs_zero_value_selected_power)) /\ exists bpvi_q_pvs_zero_value_selected_power_terminal. bpvi_u_pvs_zero_value_selected_power = bpvi_q_pvs_zero_value_selected_power_terminal * S ((S (0)) * bpvi_v_pvs_zero_value_selected_power) + (bpvi_result_pvs_zero_value_selected))) /\ forall bpvi_j_pvs_zero_value_selected_power. (exists bpvi_product_gap_pvs_zero_value_selected_power. bpvi_product_gap_pvs_zero_value_selected_power + S bpvi_j_pvs_zero_value_selected_power = 0) -> exists bpvi_factor_pvs_zero_value_selected_power bpvi_partial_pvs_zero_value_selected_power bpvi_successor_pvs_zero_value_selected_power. ((((exists bpvi_h_pvs_zero_value_selected_power_factor. bpvi_h_pvs_zero_value_selected_power_factor + S (bpvi_factor_pvs_zero_value_selected_power) = S ((S (bpvi_j_pvs_zero_value_selected_power)) * bpvi_c_pvs_zero_value_selected_power)) /\ exists bpvi_q_pvs_zero_value_selected_power_factor. bpvi_b_pvs_zero_value_selected_power = bpvi_q_pvs_zero_value_selected_power_factor * S ((S (bpvi_j_pvs_zero_value_selected_power)) * bpvi_c_pvs_zero_value_selected_power) + (bpvi_factor_pvs_zero_value_selected_power))) /\ ((((exists bpvi_h_pvs_zero_value_selected_power_partial. bpvi_h_pvs_zero_value_selected_power_partial + S (bpvi_partial_pvs_zero_value_selected_power) = S ((S (bpvi_j_pvs_zero_value_selected_power)) * bpvi_v_pvs_zero_value_selected_power)) /\ exists bpvi_q_pvs_zero_value_selected_power_partial. bpvi_u_pvs_zero_value_selected_power = bpvi_q_pvs_zero_value_selected_power_partial * S ((S (bpvi_j_pvs_zero_value_selected_power)) * bpvi_v_pvs_zero_value_selected_power) + (bpvi_partial_pvs_zero_value_selected_power))) /\ ((((exists bpvi_h_pvs_zero_value_selected_power_successor. bpvi_h_pvs_zero_value_selected_power_successor + S (bpvi_successor_pvs_zero_value_selected_power) = S ((S (S bpvi_j_pvs_zero_value_selected_power)) * bpvi_v_pvs_zero_value_selected_power)) /\ exists bpvi_q_pvs_zero_value_selected_power_successor. bpvi_u_pvs_zero_value_selected_power = bpvi_q_pvs_zero_value_selected_power_successor * S ((S (S bpvi_j_pvs_zero_value_selected_power)) * bpvi_v_pvs_zero_value_selected_power) + (bpvi_successor_pvs_zero_value_selected_power))) /\ bpvi_successor_pvs_zero_value_selected_power = bpvi_partial_pvs_zero_value_selected_power * bpvi_factor_pvs_zero_value_selected_power)))))))) /\ exists bpvi_divisor_factor_pvs_zero_value_selected. n = bpvi_result_pvs_zero_value_selected * bpvi_divisor_factor_pvs_zero_value_selected))) /\ forall bpd_candidate_pvs_zero_value. (exists bpd_gap_pvs_zero_value_candidate_bound. bpd_gap_pvs_zero_value_candidate_bound + (bpd_candidate_pvs_zero_value) = (n)) -> (exists bpvi_result_pvs_zero_value_candidate. ((exists bpvi_b_pvs_zero_value_candidate_power bpvi_c_pvs_zero_value_candidate_power. ((forall bpvi_i_pvs_zero_value_candidate_power. (exists bpvi_repeat_gap_pvs_zero_value_candidate_power. bpvi_repeat_gap_pvs_zero_value_candidate_power + S bpvi_i_pvs_zero_value_candidate_power = bpd_candidate_pvs_zero_value) -> (((exists bpvi_h_pvs_zero_value_candidate_power_repeat. bpvi_h_pvs_zero_value_candidate_power_repeat + S (p) = S ((S (bpvi_i_pvs_zero_value_candidate_power)) * bpvi_c_pvs_zero_value_candidate_power)) /\ exists bpvi_q_pvs_zero_value_candidate_power_repeat. bpvi_b_pvs_zero_value_candidate_power = bpvi_q_pvs_zero_value_candidate_power_repeat * S ((S (bpvi_i_pvs_zero_value_candidate_power)) * bpvi_c_pvs_zero_value_candidate_power) + (p)))) /\ (exists bpvi_u_pvs_zero_value_candidate_power bpvi_v_pvs_zero_value_candidate_power. ((((exists bpvi_h_pvs_zero_value_candidate_power_start. bpvi_h_pvs_zero_value_candidate_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_zero_value_candidate_power)) /\ exists bpvi_q_pvs_zero_value_candidate_power_start. bpvi_u_pvs_zero_value_candidate_power = bpvi_q_pvs_zero_value_candidate_power_start * S ((S (0)) * bpvi_v_pvs_zero_value_candidate_power) + (1))) /\ ((((exists bpvi_h_pvs_zero_value_candidate_power_terminal. bpvi_h_pvs_zero_value_candidate_power_terminal + S (bpvi_result_pvs_zero_value_candidate) = S ((S (bpd_candidate_pvs_zero_value)) * bpvi_v_pvs_zero_value_candidate_power)) /\ exists bpvi_q_pvs_zero_value_candidate_power_terminal. bpvi_u_pvs_zero_value_candidate_power = bpvi_q_pvs_zero_value_candidate_power_terminal * S ((S (bpd_candidate_pvs_zero_value)) * bpvi_v_pvs_zero_value_candidate_power) + (bpvi_result_pvs_zero_value_candidate))) /\ forall bpvi_j_pvs_zero_value_candidate_power. (exists bpvi_product_gap_pvs_zero_value_candidate_power. bpvi_product_gap_pvs_zero_value_candidate_power + S bpvi_j_pvs_zero_value_candidate_power = bpd_candidate_pvs_zero_value) -> exists bpvi_factor_pvs_zero_value_candidate_power bpvi_partial_pvs_zero_value_candidate_power bpvi_successor_pvs_zero_value_candidate_power. ((((exists bpvi_h_pvs_zero_value_candidate_power_factor. bpvi_h_pvs_zero_value_candidate_power_factor + S (bpvi_factor_pvs_zero_value_candidate_power) = S ((S (bpvi_j_pvs_zero_value_candidate_power)) * bpvi_c_pvs_zero_value_candidate_power)) /\ exists bpvi_q_pvs_zero_value_candidate_power_factor. bpvi_b_pvs_zero_value_candidate_power = bpvi_q_pvs_zero_value_candidate_power_factor * S ((S (bpvi_j_pvs_zero_value_candidate_power)) * bpvi_c_pvs_zero_value_candidate_power) + (bpvi_factor_pvs_zero_value_candidate_power))) /\ ((((exists bpvi_h_pvs_zero_value_candidate_power_partial. bpvi_h_pvs_zero_value_candidate_power_partial + S (bpvi_partial_pvs_zero_value_candidate_power) = S ((S (bpvi_j_pvs_zero_value_candidate_power)) * bpvi_v_pvs_zero_value_candidate_power)) /\ exists bpvi_q_pvs_zero_value_candidate_power_partial. bpvi_u_pvs_zero_value_candidate_power = bpvi_q_pvs_zero_value_candidate_power_partial * S ((S (bpvi_j_pvs_zero_value_candidate_power)) * bpvi_v_pvs_zero_value_candidate_power) + (bpvi_partial_pvs_zero_value_candidate_power))) /\ ((((exists bpvi_h_pvs_zero_value_candidate_power_successor. bpvi_h_pvs_zero_value_candidate_power_successor + S (bpvi_successor_pvs_zero_value_candidate_power) = S ((S (S bpvi_j_pvs_zero_value_candidate_power)) * bpvi_v_pvs_zero_value_candidate_power)) /\ exists bpvi_q_pvs_zero_value_candidate_power_successor. bpvi_u_pvs_zero_value_candidate_power = bpvi_q_pvs_zero_value_candidate_power_successor * S ((S (S bpvi_j_pvs_zero_value_candidate_power)) * bpvi_v_pvs_zero_value_candidate_power) + (bpvi_successor_pvs_zero_value_candidate_power))) /\ bpvi_successor_pvs_zero_value_candidate_power = bpvi_partial_pvs_zero_value_candidate_power * bpvi_factor_pvs_zero_value_candidate_power)))))))) /\ exists bpvi_divisor_factor_pvs_zero_value_candidate. n = bpvi_result_pvs_zero_value_candidate * bpvi_divisor_factor_pvs_zero_value_candidate)) -> (exists bpd_gap_pvs_zero_value_maximal. bpd_gap_pvs_zero_value_maximal + (bpd_candidate_pvs_zero_value) = (0)))

Constructive proof overview

Generated structural guide

Construct valuation zero for a positive value not divisible by the actual prime.

The unchanged tactic script uses 3 declared prerequisites and contains 27 exact native proof lines.

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

Proof neighborhood

Direct dependencies

power_valuation_exists Alpha theorem; checked-use authorized prime_power_valuation_zero_iff_not_divides Alpha theorem; checked-use authorized PV0001 prime_valuation_exponent_eq_transport

Direct dependents

PV0007 prime_valuation_distinct_prime_power_zero

Formal native tactic body

Dependencies are introduced as named hypotheses before line 1. Local theorem links identify exact declared prerequisites. This exact body belongs to a complete independently kernel-checked constructive proof bundle and has Alpha checked-use authority; it does not imply Stable membership.

Read the argument

Proof checkpoints

27 script commands · 6 reading checkpoints · 2 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.

Named ingredients (1)
prime valuation exponent eq transport

Long local formulas use this family’s existing definitions. Each new abbreviation was expanded back to the identical native formula, including its free-variable context. The original edition is preserved below.

01Fix variables and assumptionsL1–5

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

  1. L1
    intro p
  2. L2
    intro n
  3. L3
    intro hp
  4. L4
    intro hn
  5. L5
    intro hnot
02Establish hexL6–9

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

  1. L6
    have hex : ∃ e. BoundedPowerValuation(p,n,n,e)Definitions: BoundedPowerValuation
  2. L7
    specialize power_valuation_exists (p)
  3. L8
    specialize power_valuation_exists (n)
  4. L9
    apply power_valuation_exists
03Separate the logical casesL10–10

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

  1. L10
    cases hex
04Establish hiffL11–18

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

  1. L11
    have hiff : (x = 0 -> ~(exists pvs_factor_zero_forward. (n) = (p) * pvs_factor_zero_forward)) /\ (~(exists pvs_factor_zero_reverse. (n) = (p) * pvs_factor_zero_reverse) -> x = 0)
  2. L12
    specialize prime_power_valuation_zero_iff_not_divides (p)
  3. L13
    specialize prime_power_valuation_zero_iff_not_divides (n)
  4. L14
    specialize prime_power_valuation_zero_iff_not_divides (x)
  5. L15
    apply prime_power_valuation_zero_iff_not_divides
  6. L16
    exact hp
  7. L17
    exact hn
  8. L18
    exact hex_witness
05Separate the logical casesL19–19

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

  1. L19
    cases hiff
06Use earlier factsL20–27

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

  1. L20
    specialize prime_valuation_exponent_eq_transport (p)
  2. L21
    specialize prime_valuation_exponent_eq_transport (n)
  3. L22
    specialize prime_valuation_exponent_eq_transport (x)
  4. L23
    specialize prime_valuation_exponent_eq_transport (0)
  5. L24
    apply prime_valuation_exponent_eq_transport
  6. L25
    apply hiff_right
  7. L26
    exact hnot
  8. L27
    exact hex_witness

Library-wide reading audit

Original exact command ledger · 27 lines
  1. 0001intro p
  2. 0002intro n
  3. 0003intro hp
  4. 0004intro hn
  5. 0005intro hnot
  6. 0006have hex : exists e. (((exists bpd_gap_pvs_zero_exists_selected_bound. bpd_gap_pvs_zero_exists_selected_bound + (e) = (n)) /\ (exists bpvi_result_pvs_zero_exists_selected. ((exists bpvi_b_pvs_zero_exists_selected_power bpvi_c_pvs_zero_exists_selected_power. ((forall bpvi_i_pvs_zero_exists_selected_power. (exists bpvi_repeat_gap_pvs_zero_exists_selected_power. bpvi_repeat_gap_pvs_zero_exists_selected_power + S bpvi_i_pvs_zero_exists_selected_power = e) -> (((exists bpvi_h_pvs_zero_exists_selected_power_repeat. bpvi_h_pvs_zero_exists_selected_power_repeat + S (p) = S ((S (bpvi_i_pvs_zero_exists_selected_power)) * bpvi_c_pvs_zero_exists_selected_power)) /\ exists bpvi_q_pvs_zero_exists_selected_power_repeat. bpvi_b_pvs_zero_exists_selected_power = bpvi_q_pvs_zero_exists_selected_power_repeat * S ((S (bpvi_i_pvs_zero_exists_selected_power)) * bpvi_c_pvs_zero_exists_selected_power) + (p)))) /\ (exists bpvi_u_pvs_zero_exists_selected_power bpvi_v_pvs_zero_exists_selected_power. ((((exists bpvi_h_pvs_zero_exists_selected_power_start. bpvi_h_pvs_zero_exists_selected_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_zero_exists_selected_power)) /\ exists bpvi_q_pvs_zero_exists_selected_power_start. bpvi_u_pvs_zero_exists_selected_power = bpvi_q_pvs_zero_exists_selected_power_start * S ((S (0)) * bpvi_v_pvs_zero_exists_selected_power) + (1))) /\ ((((exists bpvi_h_pvs_zero_exists_selected_power_terminal. bpvi_h_pvs_zero_exists_selected_power_terminal + S (bpvi_result_pvs_zero_exists_selected) = S ((S (e)) * bpvi_v_pvs_zero_exists_selected_power)) /\ exists bpvi_q_pvs_zero_exists_selected_power_terminal. bpvi_u_pvs_zero_exists_selected_power = bpvi_q_pvs_zero_exists_selected_power_terminal * S ((S (e)) * bpvi_v_pvs_zero_exists_selected_power) + (bpvi_result_pvs_zero_exists_selected))) /\ forall bpvi_j_pvs_zero_exists_selected_power. (exists bpvi_product_gap_pvs_zero_exists_selected_power. bpvi_product_gap_pvs_zero_exists_selected_power + S bpvi_j_pvs_zero_exists_selected_power = e) -> exists bpvi_factor_pvs_zero_exists_selected_power bpvi_partial_pvs_zero_exists_selected_power bpvi_successor_pvs_zero_exists_selected_power. ((((exists bpvi_h_pvs_zero_exists_selected_power_factor. bpvi_h_pvs_zero_exists_selected_power_factor + S (bpvi_factor_pvs_zero_exists_selected_power) = S ((S (bpvi_j_pvs_zero_exists_selected_power)) * bpvi_c_pvs_zero_exists_selected_power)) /\ exists bpvi_q_pvs_zero_exists_selected_power_factor. bpvi_b_pvs_zero_exists_selected_power = bpvi_q_pvs_zero_exists_selected_power_factor * S ((S (bpvi_j_pvs_zero_exists_selected_power)) * bpvi_c_pvs_zero_exists_selected_power) + (bpvi_factor_pvs_zero_exists_selected_power))) /\ ((((exists bpvi_h_pvs_zero_exists_selected_power_partial. bpvi_h_pvs_zero_exists_selected_power_partial + S (bpvi_partial_pvs_zero_exists_selected_power) = S ((S (bpvi_j_pvs_zero_exists_selected_power)) * bpvi_v_pvs_zero_exists_selected_power)) /\ exists bpvi_q_pvs_zero_exists_selected_power_partial. bpvi_u_pvs_zero_exists_selected_power = bpvi_q_pvs_zero_exists_selected_power_partial * S ((S (bpvi_j_pvs_zero_exists_selected_power)) * bpvi_v_pvs_zero_exists_selected_power) + (bpvi_partial_pvs_zero_exists_selected_power))) /\ ((((exists bpvi_h_pvs_zero_exists_selected_power_successor. bpvi_h_pvs_zero_exists_selected_power_successor + S (bpvi_successor_pvs_zero_exists_selected_power) = S ((S (S bpvi_j_pvs_zero_exists_selected_power)) * bpvi_v_pvs_zero_exists_selected_power)) /\ exists bpvi_q_pvs_zero_exists_selected_power_successor. bpvi_u_pvs_zero_exists_selected_power = bpvi_q_pvs_zero_exists_selected_power_successor * S ((S (S bpvi_j_pvs_zero_exists_selected_power)) * bpvi_v_pvs_zero_exists_selected_power) + (bpvi_successor_pvs_zero_exists_selected_power))) /\ bpvi_successor_pvs_zero_exists_selected_power = bpvi_partial_pvs_zero_exists_selected_power * bpvi_factor_pvs_zero_exists_selected_power)))))))) /\ exists bpvi_divisor_factor_pvs_zero_exists_selected. n = bpvi_result_pvs_zero_exists_selected * bpvi_divisor_factor_pvs_zero_exists_selected))) /\ forall bpd_candidate_pvs_zero_exists. (exists bpd_gap_pvs_zero_exists_candidate_bound. bpd_gap_pvs_zero_exists_candidate_bound + (bpd_candidate_pvs_zero_exists) = (n)) -> (exists bpvi_result_pvs_zero_exists_candidate. ((exists bpvi_b_pvs_zero_exists_candidate_power bpvi_c_pvs_zero_exists_candidate_power. ((forall bpvi_i_pvs_zero_exists_candidate_power. (exists bpvi_repeat_gap_pvs_zero_exists_candidate_power. bpvi_repeat_gap_pvs_zero_exists_candidate_power + S bpvi_i_pvs_zero_exists_candidate_power = bpd_candidate_pvs_zero_exists) -> (((exists bpvi_h_pvs_zero_exists_candidate_power_repeat. bpvi_h_pvs_zero_exists_candidate_power_repeat + S (p) = S ((S (bpvi_i_pvs_zero_exists_candidate_power)) * bpvi_c_pvs_zero_exists_candidate_power)) /\ exists bpvi_q_pvs_zero_exists_candidate_power_repeat. bpvi_b_pvs_zero_exists_candidate_power = bpvi_q_pvs_zero_exists_candidate_power_repeat * S ((S (bpvi_i_pvs_zero_exists_candidate_power)) * bpvi_c_pvs_zero_exists_candidate_power) + (p)))) /\ (exists bpvi_u_pvs_zero_exists_candidate_power bpvi_v_pvs_zero_exists_candidate_power. ((((exists bpvi_h_pvs_zero_exists_candidate_power_start. bpvi_h_pvs_zero_exists_candidate_power_start + S (1) = S ((S (0)) * bpvi_v_pvs_zero_exists_candidate_power)) /\ exists bpvi_q_pvs_zero_exists_candidate_power_start. bpvi_u_pvs_zero_exists_candidate_power = bpvi_q_pvs_zero_exists_candidate_power_start * S ((S (0)) * bpvi_v_pvs_zero_exists_candidate_power) + (1))) /\ ((((exists bpvi_h_pvs_zero_exists_candidate_power_terminal. bpvi_h_pvs_zero_exists_candidate_power_terminal + S (bpvi_result_pvs_zero_exists_candidate) = S ((S (bpd_candidate_pvs_zero_exists)) * bpvi_v_pvs_zero_exists_candidate_power)) /\ exists bpvi_q_pvs_zero_exists_candidate_power_terminal. bpvi_u_pvs_zero_exists_candidate_power = bpvi_q_pvs_zero_exists_candidate_power_terminal * S ((S (bpd_candidate_pvs_zero_exists)) * bpvi_v_pvs_zero_exists_candidate_power) + (bpvi_result_pvs_zero_exists_candidate))) /\ forall bpvi_j_pvs_zero_exists_candidate_power. (exists bpvi_product_gap_pvs_zero_exists_candidate_power. bpvi_product_gap_pvs_zero_exists_candidate_power + S bpvi_j_pvs_zero_exists_candidate_power = bpd_candidate_pvs_zero_exists) -> exists bpvi_factor_pvs_zero_exists_candidate_power bpvi_partial_pvs_zero_exists_candidate_power bpvi_successor_pvs_zero_exists_candidate_power. ((((exists bpvi_h_pvs_zero_exists_candidate_power_factor. bpvi_h_pvs_zero_exists_candidate_power_factor + S (bpvi_factor_pvs_zero_exists_candidate_power) = S ((S (bpvi_j_pvs_zero_exists_candidate_power)) * bpvi_c_pvs_zero_exists_candidate_power)) /\ exists bpvi_q_pvs_zero_exists_candidate_power_factor. bpvi_b_pvs_zero_exists_candidate_power = bpvi_q_pvs_zero_exists_candidate_power_factor * S ((S (bpvi_j_pvs_zero_exists_candidate_power)) * bpvi_c_pvs_zero_exists_candidate_power) + (bpvi_factor_pvs_zero_exists_candidate_power))) /\ ((((exists bpvi_h_pvs_zero_exists_candidate_power_partial. bpvi_h_pvs_zero_exists_candidate_power_partial + S (bpvi_partial_pvs_zero_exists_candidate_power) = S ((S (bpvi_j_pvs_zero_exists_candidate_power)) * bpvi_v_pvs_zero_exists_candidate_power)) /\ exists bpvi_q_pvs_zero_exists_candidate_power_partial. bpvi_u_pvs_zero_exists_candidate_power = bpvi_q_pvs_zero_exists_candidate_power_partial * S ((S (bpvi_j_pvs_zero_exists_candidate_power)) * bpvi_v_pvs_zero_exists_candidate_power) + (bpvi_partial_pvs_zero_exists_candidate_power))) /\ ((((exists bpvi_h_pvs_zero_exists_candidate_power_successor. bpvi_h_pvs_zero_exists_candidate_power_successor + S (bpvi_successor_pvs_zero_exists_candidate_power) = S ((S (S bpvi_j_pvs_zero_exists_candidate_power)) * bpvi_v_pvs_zero_exists_candidate_power)) /\ exists bpvi_q_pvs_zero_exists_candidate_power_successor. bpvi_u_pvs_zero_exists_candidate_power = bpvi_q_pvs_zero_exists_candidate_power_successor * S ((S (S bpvi_j_pvs_zero_exists_candidate_power)) * bpvi_v_pvs_zero_exists_candidate_power) + (bpvi_successor_pvs_zero_exists_candidate_power))) /\ bpvi_successor_pvs_zero_exists_candidate_power = bpvi_partial_pvs_zero_exists_candidate_power * bpvi_factor_pvs_zero_exists_candidate_power)))))))) /\ exists bpvi_divisor_factor_pvs_zero_exists_candidate. n = bpvi_result_pvs_zero_exists_candidate * bpvi_divisor_factor_pvs_zero_exists_candidate)) -> (exists bpd_gap_pvs_zero_exists_maximal. bpd_gap_pvs_zero_exists_maximal + (bpd_candidate_pvs_zero_exists) = (e)))
  7. 0007specialize power_valuation_exists (p)
  8. 0008specialize power_valuation_exists (n)
  9. 0009apply power_valuation_exists
  10. 0010cases hex
  11. 0011have hiff : (x = 0 -> ~(exists pvs_factor_zero_forward. (n) = (p) * pvs_factor_zero_forward)) /\ (~(exists pvs_factor_zero_reverse. (n) = (p) * pvs_factor_zero_reverse) -> x = 0)
  12. 0012specialize prime_power_valuation_zero_iff_not_divides (p)
  13. 0013specialize prime_power_valuation_zero_iff_not_divides (n)
  14. 0014specialize prime_power_valuation_zero_iff_not_divides (x)
  15. 0015apply prime_power_valuation_zero_iff_not_divides
  16. 0016exact hp
  17. 0017exact hn
  18. 0018exact hex_witness
  19. 0019cases hiff
  20. 0020specialize prime_valuation_exponent_eq_transport (p)
  21. 0021specialize prime_valuation_exponent_eq_transport (n)
  22. 0022specialize prime_valuation_exponent_eq_transport (x)
  23. 0023specialize prime_valuation_exponent_eq_transport (0)
  24. 0024apply prime_valuation_exponent_eq_transport
  25. 0025apply hiff_right
  26. 0026exact hnot
  27. 0027exact hex_witness