BT010L · Bertrand theorem

prime_contribution_interval_prefix_exists

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

Every number, offset, and length has a contribution prefix.

Current library: Alpha v34, 4,223 checked-use theorems; Stable remains 432. Historical first admissions, original proof editions, and non-admitted aliases are preserved. Exact original first-admission records.

Statement with defined notation

∀ n. ∀ a. ∀ l. ∃ b. ∃ c. ∀ x. Lt(x,l) → ∃ y. BetaAt(b,c,x,y) ∧ (Prime(S (a + x)) ∧ (∃ z. PowerValuation(S (a + x),n,z)Pow(S (a + x),z,y)) ∨ ¬Prime(S (a + x)) ∧ y = 1)

Every purple notation token opens its conservative definition. Expanding the displayed statement recovers the exact first-order Peano-arithmetic formula checked by the unchanged kernel.

Definitions used by this theorem

In the theorem statement

6 occurrences

In local proof propositions

12 occurrences

Exact expanded native-PA statement
forall n a l. exists b c. (forall bpr_index_bpcipx_result. (exists bpr_gap_bpcipx_result_bound. bpr_gap_bpcipx_result_bound + S (bpr_index_bpcipx_result) = l) -> exists bpr_value_bpcipx_result. ((((exists bpr_height_bpcipx_result_decoded. bpr_height_bpcipx_result_decoded + S (bpr_value_bpcipx_result) = S ((S (bpr_index_bpcipx_result)) * c)) /\ exists bpr_quotient_bpcipx_result_decoded. b = bpr_quotient_bpcipx_result_decoded * S ((S (bpr_index_bpcipx_result)) * c) + (bpr_value_bpcipx_result))) /\ (((((~(S (a + bpr_index_bpcipx_result) = 1) /\ forall bpr_left_bpcipx_result_choice_prime bpr_right_bpcipx_result_choice_prime. S (a + bpr_index_bpcipx_result) = bpr_left_bpcipx_result_choice_prime * bpr_right_bpcipx_result_choice_prime -> bpr_left_bpcipx_result_choice_prime = 1 \/ bpr_right_bpcipx_result_choice_prime = 1)) /\ exists bpr_choice_exponent_bpcipx_result_choice. ((((exists bpr_le_gap_bpcipx_result_choice_valuation_selected_bound. bpr_le_gap_bpcipx_result_choice_valuation_selected_bound + (bpr_choice_exponent_bpcipx_result_choice) = (n)) /\ (exists bpr_power_value_bpcipx_result_choice_valuation_selected. ((exists bpr_power_code_bpcipx_result_choice_valuation_selected_power bpr_power_scale_bpcipx_result_choice_valuation_selected_power. ((forall bpr_power_index_bpcipx_result_choice_valuation_selected_power. (exists bpr_gap_bpcipx_result_choice_valuation_selected_power_repeat_bound. bpr_gap_bpcipx_result_choice_valuation_selected_power_repeat_bound + S (bpr_power_index_bpcipx_result_choice_valuation_selected_power) = bpr_choice_exponent_bpcipx_result_choice) -> (((exists bpr_height_bpcipx_result_choice_valuation_selected_power_repeat_entry. bpr_height_bpcipx_result_choice_valuation_selected_power_repeat_entry + S (S (a + bpr_index_bpcipx_result)) = S ((S (bpr_power_index_bpcipx_result_choice_valuation_selected_power)) * bpr_power_scale_bpcipx_result_choice_valuation_selected_power)) /\ exists bpr_quotient_bpcipx_result_choice_valuation_selected_power_repeat_entry. bpr_power_code_bpcipx_result_choice_valuation_selected_power = bpr_quotient_bpcipx_result_choice_valuation_selected_power_repeat_entry * S ((S (bpr_power_index_bpcipx_result_choice_valuation_selected_power)) * bpr_power_scale_bpcipx_result_choice_valuation_selected_power) + (S (a + bpr_index_bpcipx_result))))) /\ (exists ff_u_bpcipx_result_choice_valuation_selected_power_product ff_v_bpcipx_result_choice_valuation_selected_power_product. ((((exists ff_h_bpcipx_result_choice_valuation_selected_power_product_start. ff_h_bpcipx_result_choice_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_bpcipx_result_choice_valuation_selected_power_product)) /\ exists ff_q_bpcipx_result_choice_valuation_selected_power_product_start. ff_u_bpcipx_result_choice_valuation_selected_power_product = ff_q_bpcipx_result_choice_valuation_selected_power_product_start * S ((S (0)) * ff_v_bpcipx_result_choice_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_bpcipx_result_choice_valuation_selected_power_product_terminal. ff_h_bpcipx_result_choice_valuation_selected_power_product_terminal + S (bpr_power_value_bpcipx_result_choice_valuation_selected) = S ((S (bpr_choice_exponent_bpcipx_result_choice)) * ff_v_bpcipx_result_choice_valuation_selected_power_product)) /\ exists ff_q_bpcipx_result_choice_valuation_selected_power_product_terminal. ff_u_bpcipx_result_choice_valuation_selected_power_product = ff_q_bpcipx_result_choice_valuation_selected_power_product_terminal * S ((S (bpr_choice_exponent_bpcipx_result_choice)) * ff_v_bpcipx_result_choice_valuation_selected_power_product) + (bpr_power_value_bpcipx_result_choice_valuation_selected))) /\ forall ff_i_bpcipx_result_choice_valuation_selected_power_product. (exists ff_lt_bpcipx_result_choice_valuation_selected_power_product_bound. ff_lt_bpcipx_result_choice_valuation_selected_power_product_bound + S ff_i_bpcipx_result_choice_valuation_selected_power_product = bpr_choice_exponent_bpcipx_result_choice) -> exists ff_p_bpcipx_result_choice_valuation_selected_power_product ff_r_bpcipx_result_choice_valuation_selected_power_product ff_s_bpcipx_result_choice_valuation_selected_power_product. ((((exists ff_h_bpcipx_result_choice_valuation_selected_power_product_factor. ff_h_bpcipx_result_choice_valuation_selected_power_product_factor + S (ff_p_bpcipx_result_choice_valuation_selected_power_product) = S ((S (ff_i_bpcipx_result_choice_valuation_selected_power_product)) * bpr_power_scale_bpcipx_result_choice_valuation_selected_power)) /\ exists ff_q_bpcipx_result_choice_valuation_selected_power_product_factor. bpr_power_code_bpcipx_result_choice_valuation_selected_power = ff_q_bpcipx_result_choice_valuation_selected_power_product_factor * S ((S (ff_i_bpcipx_result_choice_valuation_selected_power_product)) * bpr_power_scale_bpcipx_result_choice_valuation_selected_power) + (ff_p_bpcipx_result_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcipx_result_choice_valuation_selected_power_product_partial. ff_h_bpcipx_result_choice_valuation_selected_power_product_partial + S (ff_r_bpcipx_result_choice_valuation_selected_power_product) = S ((S (ff_i_bpcipx_result_choice_valuation_selected_power_product)) * ff_v_bpcipx_result_choice_valuation_selected_power_product)) /\ exists ff_q_bpcipx_result_choice_valuation_selected_power_product_partial. ff_u_bpcipx_result_choice_valuation_selected_power_product = ff_q_bpcipx_result_choice_valuation_selected_power_product_partial * S ((S (ff_i_bpcipx_result_choice_valuation_selected_power_product)) * ff_v_bpcipx_result_choice_valuation_selected_power_product) + (ff_r_bpcipx_result_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcipx_result_choice_valuation_selected_power_product_successor. ff_h_bpcipx_result_choice_valuation_selected_power_product_successor + S (ff_s_bpcipx_result_choice_valuation_selected_power_product) = S ((S (S ff_i_bpcipx_result_choice_valuation_selected_power_product)) * ff_v_bpcipx_result_choice_valuation_selected_power_product)) /\ exists ff_q_bpcipx_result_choice_valuation_selected_power_product_successor. ff_u_bpcipx_result_choice_valuation_selected_power_product = ff_q_bpcipx_result_choice_valuation_selected_power_product_successor * S ((S (S ff_i_bpcipx_result_choice_valuation_selected_power_product)) * ff_v_bpcipx_result_choice_valuation_selected_power_product) + (ff_s_bpcipx_result_choice_valuation_selected_power_product))) /\ ff_s_bpcipx_result_choice_valuation_selected_power_product = ff_r_bpcipx_result_choice_valuation_selected_power_product * ff_p_bpcipx_result_choice_valuation_selected_power_product)))))))) /\ (exists bpr_divides_quotient_bpcipx_result_choice_valuation_selected_divides. n = (bpr_power_value_bpcipx_result_choice_valuation_selected) * bpr_divides_quotient_bpcipx_result_choice_valuation_selected_divides)))) /\ forall bpr_valuation_candidate_bpcipx_result_choice_valuation. (exists bpr_le_gap_bpcipx_result_choice_valuation_candidate_bound. bpr_le_gap_bpcipx_result_choice_valuation_candidate_bound + (bpr_valuation_candidate_bpcipx_result_choice_valuation) = (n)) -> (exists bpr_power_value_bpcipx_result_choice_valuation_candidate. ((exists bpr_power_code_bpcipx_result_choice_valuation_candidate_power bpr_power_scale_bpcipx_result_choice_valuation_candidate_power. ((forall bpr_power_index_bpcipx_result_choice_valuation_candidate_power. (exists bpr_gap_bpcipx_result_choice_valuation_candidate_power_repeat_bound. bpr_gap_bpcipx_result_choice_valuation_candidate_power_repeat_bound + S (bpr_power_index_bpcipx_result_choice_valuation_candidate_power) = bpr_valuation_candidate_bpcipx_result_choice_valuation) -> (((exists bpr_height_bpcipx_result_choice_valuation_candidate_power_repeat_entry. bpr_height_bpcipx_result_choice_valuation_candidate_power_repeat_entry + S (S (a + bpr_index_bpcipx_result)) = S ((S (bpr_power_index_bpcipx_result_choice_valuation_candidate_power)) * bpr_power_scale_bpcipx_result_choice_valuation_candidate_power)) /\ exists bpr_quotient_bpcipx_result_choice_valuation_candidate_power_repeat_entry. bpr_power_code_bpcipx_result_choice_valuation_candidate_power = bpr_quotient_bpcipx_result_choice_valuation_candidate_power_repeat_entry * S ((S (bpr_power_index_bpcipx_result_choice_valuation_candidate_power)) * bpr_power_scale_bpcipx_result_choice_valuation_candidate_power) + (S (a + bpr_index_bpcipx_result))))) /\ (exists ff_u_bpcipx_result_choice_valuation_candidate_power_product ff_v_bpcipx_result_choice_valuation_candidate_power_product. ((((exists ff_h_bpcipx_result_choice_valuation_candidate_power_product_start. ff_h_bpcipx_result_choice_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_bpcipx_result_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcipx_result_choice_valuation_candidate_power_product_start. ff_u_bpcipx_result_choice_valuation_candidate_power_product = ff_q_bpcipx_result_choice_valuation_candidate_power_product_start * S ((S (0)) * ff_v_bpcipx_result_choice_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_bpcipx_result_choice_valuation_candidate_power_product_terminal. ff_h_bpcipx_result_choice_valuation_candidate_power_product_terminal + S (bpr_power_value_bpcipx_result_choice_valuation_candidate) = S ((S (bpr_valuation_candidate_bpcipx_result_choice_valuation)) * ff_v_bpcipx_result_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcipx_result_choice_valuation_candidate_power_product_terminal. ff_u_bpcipx_result_choice_valuation_candidate_power_product = ff_q_bpcipx_result_choice_valuation_candidate_power_product_terminal * S ((S (bpr_valuation_candidate_bpcipx_result_choice_valuation)) * ff_v_bpcipx_result_choice_valuation_candidate_power_product) + (bpr_power_value_bpcipx_result_choice_valuation_candidate))) /\ forall ff_i_bpcipx_result_choice_valuation_candidate_power_product. (exists ff_lt_bpcipx_result_choice_valuation_candidate_power_product_bound. ff_lt_bpcipx_result_choice_valuation_candidate_power_product_bound + S ff_i_bpcipx_result_choice_valuation_candidate_power_product = bpr_valuation_candidate_bpcipx_result_choice_valuation) -> exists ff_p_bpcipx_result_choice_valuation_candidate_power_product ff_r_bpcipx_result_choice_valuation_candidate_power_product ff_s_bpcipx_result_choice_valuation_candidate_power_product. ((((exists ff_h_bpcipx_result_choice_valuation_candidate_power_product_factor. ff_h_bpcipx_result_choice_valuation_candidate_power_product_factor + S (ff_p_bpcipx_result_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcipx_result_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcipx_result_choice_valuation_candidate_power)) /\ exists ff_q_bpcipx_result_choice_valuation_candidate_power_product_factor. bpr_power_code_bpcipx_result_choice_valuation_candidate_power = ff_q_bpcipx_result_choice_valuation_candidate_power_product_factor * S ((S (ff_i_bpcipx_result_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcipx_result_choice_valuation_candidate_power) + (ff_p_bpcipx_result_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcipx_result_choice_valuation_candidate_power_product_partial. ff_h_bpcipx_result_choice_valuation_candidate_power_product_partial + S (ff_r_bpcipx_result_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcipx_result_choice_valuation_candidate_power_product)) * ff_v_bpcipx_result_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcipx_result_choice_valuation_candidate_power_product_partial. ff_u_bpcipx_result_choice_valuation_candidate_power_product = ff_q_bpcipx_result_choice_valuation_candidate_power_product_partial * S ((S (ff_i_bpcipx_result_choice_valuation_candidate_power_product)) * ff_v_bpcipx_result_choice_valuation_candidate_power_product) + (ff_r_bpcipx_result_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcipx_result_choice_valuation_candidate_power_product_successor. ff_h_bpcipx_result_choice_valuation_candidate_power_product_successor + S (ff_s_bpcipx_result_choice_valuation_candidate_power_product) = S ((S (S ff_i_bpcipx_result_choice_valuation_candidate_power_product)) * ff_v_bpcipx_result_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcipx_result_choice_valuation_candidate_power_product_successor. ff_u_bpcipx_result_choice_valuation_candidate_power_product = ff_q_bpcipx_result_choice_valuation_candidate_power_product_successor * S ((S (S ff_i_bpcipx_result_choice_valuation_candidate_power_product)) * ff_v_bpcipx_result_choice_valuation_candidate_power_product) + (ff_s_bpcipx_result_choice_valuation_candidate_power_product))) /\ ff_s_bpcipx_result_choice_valuation_candidate_power_product = ff_r_bpcipx_result_choice_valuation_candidate_power_product * ff_p_bpcipx_result_choice_valuation_candidate_power_product)))))))) /\ (exists bpr_divides_quotient_bpcipx_result_choice_valuation_candidate_divides. n = (bpr_power_value_bpcipx_result_choice_valuation_candidate) * bpr_divides_quotient_bpcipx_result_choice_valuation_candidate_divides))) -> (exists bpr_le_gap_bpcipx_result_choice_valuation_candidate_below. bpr_le_gap_bpcipx_result_choice_valuation_candidate_below + (bpr_valuation_candidate_bpcipx_result_choice_valuation) = (bpr_choice_exponent_bpcipx_result_choice))) /\ (exists bpr_power_code_bpcipx_result_choice_power bpr_power_scale_bpcipx_result_choice_power. ((forall bpr_power_index_bpcipx_result_choice_power. (exists bpr_gap_bpcipx_result_choice_power_repeat_bound. bpr_gap_bpcipx_result_choice_power_repeat_bound + S (bpr_power_index_bpcipx_result_choice_power) = bpr_choice_exponent_bpcipx_result_choice) -> (((exists bpr_height_bpcipx_result_choice_power_repeat_entry. bpr_height_bpcipx_result_choice_power_repeat_entry + S (S (a + bpr_index_bpcipx_result)) = S ((S (bpr_power_index_bpcipx_result_choice_power)) * bpr_power_scale_bpcipx_result_choice_power)) /\ exists bpr_quotient_bpcipx_result_choice_power_repeat_entry. bpr_power_code_bpcipx_result_choice_power = bpr_quotient_bpcipx_result_choice_power_repeat_entry * S ((S (bpr_power_index_bpcipx_result_choice_power)) * bpr_power_scale_bpcipx_result_choice_power) + (S (a + bpr_index_bpcipx_result))))) /\ (exists ff_u_bpcipx_result_choice_power_product ff_v_bpcipx_result_choice_power_product. ((((exists ff_h_bpcipx_result_choice_power_product_start. ff_h_bpcipx_result_choice_power_product_start + S (1) = S ((S (0)) * ff_v_bpcipx_result_choice_power_product)) /\ exists ff_q_bpcipx_result_choice_power_product_start. ff_u_bpcipx_result_choice_power_product = ff_q_bpcipx_result_choice_power_product_start * S ((S (0)) * ff_v_bpcipx_result_choice_power_product) + (1))) /\ ((((exists ff_h_bpcipx_result_choice_power_product_terminal. ff_h_bpcipx_result_choice_power_product_terminal + S (bpr_value_bpcipx_result) = S ((S (bpr_choice_exponent_bpcipx_result_choice)) * ff_v_bpcipx_result_choice_power_product)) /\ exists ff_q_bpcipx_result_choice_power_product_terminal. ff_u_bpcipx_result_choice_power_product = ff_q_bpcipx_result_choice_power_product_terminal * S ((S (bpr_choice_exponent_bpcipx_result_choice)) * ff_v_bpcipx_result_choice_power_product) + (bpr_value_bpcipx_result))) /\ forall ff_i_bpcipx_result_choice_power_product. (exists ff_lt_bpcipx_result_choice_power_product_bound. ff_lt_bpcipx_result_choice_power_product_bound + S ff_i_bpcipx_result_choice_power_product = bpr_choice_exponent_bpcipx_result_choice) -> exists ff_p_bpcipx_result_choice_power_product ff_r_bpcipx_result_choice_power_product ff_s_bpcipx_result_choice_power_product. ((((exists ff_h_bpcipx_result_choice_power_product_factor. ff_h_bpcipx_result_choice_power_product_factor + S (ff_p_bpcipx_result_choice_power_product) = S ((S (ff_i_bpcipx_result_choice_power_product)) * bpr_power_scale_bpcipx_result_choice_power)) /\ exists ff_q_bpcipx_result_choice_power_product_factor. bpr_power_code_bpcipx_result_choice_power = ff_q_bpcipx_result_choice_power_product_factor * S ((S (ff_i_bpcipx_result_choice_power_product)) * bpr_power_scale_bpcipx_result_choice_power) + (ff_p_bpcipx_result_choice_power_product))) /\ ((((exists ff_h_bpcipx_result_choice_power_product_partial. ff_h_bpcipx_result_choice_power_product_partial + S (ff_r_bpcipx_result_choice_power_product) = S ((S (ff_i_bpcipx_result_choice_power_product)) * ff_v_bpcipx_result_choice_power_product)) /\ exists ff_q_bpcipx_result_choice_power_product_partial. ff_u_bpcipx_result_choice_power_product = ff_q_bpcipx_result_choice_power_product_partial * S ((S (ff_i_bpcipx_result_choice_power_product)) * ff_v_bpcipx_result_choice_power_product) + (ff_r_bpcipx_result_choice_power_product))) /\ ((((exists ff_h_bpcipx_result_choice_power_product_successor. ff_h_bpcipx_result_choice_power_product_successor + S (ff_s_bpcipx_result_choice_power_product) = S ((S (S ff_i_bpcipx_result_choice_power_product)) * ff_v_bpcipx_result_choice_power_product)) /\ exists ff_q_bpcipx_result_choice_power_product_successor. ff_u_bpcipx_result_choice_power_product = ff_q_bpcipx_result_choice_power_product_successor * S ((S (S ff_i_bpcipx_result_choice_power_product)) * ff_v_bpcipx_result_choice_power_product) + (ff_s_bpcipx_result_choice_power_product))) /\ ff_s_bpcipx_result_choice_power_product = ff_r_bpcipx_result_choice_power_product * ff_p_bpcipx_result_choice_power_product)))))))))) \/ (~((~(S (a + bpr_index_bpcipx_result) = 1) /\ forall bpr_left_bpcipx_result_choice_prime bpr_right_bpcipx_result_choice_prime. S (a + bpr_index_bpcipx_result) = bpr_left_bpcipx_result_choice_prime * bpr_right_bpcipx_result_choice_prime -> bpr_left_bpcipx_result_choice_prime = 1 \/ bpr_right_bpcipx_result_choice_prime = 1)) /\ bpr_value_bpcipx_result = 1)))))

Proof neighborhood

Direct theorem prerequisites

Direct theorem dependents

Definition-aware tactic body

Only local propositions introduced by have or suffices are compacted. Every changed line has an exact-AST conservative-expansion receipt; the kernel still receives the immutable original tactic script.

Read the argument

Proof checkpoints

22 script commands · 9 reading checkpoints · 3 local claims

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

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

Named ingredients (3)
01Fix variables and assumptionsL1–2

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

  1. L1
    intro n
  2. L2
    intro a
02Induction on lL3–3

Split the argument into the base and successor obligations. The induction hypothesis is available only in the successor branch.

  1. L3
    induction l
03Construct an explicit witnessL4–5

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

  1. L4
    exists 0
  2. L5
    exists 0
04Fix variables and assumptionsL6–7

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

  1. L6
    intro i
  2. L7
    intro hi
05Separate the logical casesL8–9

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

  1. L8
    exfalso
  2. L9
    cases hi
06Establish hsiL10–14

Establish this local claim before using it. It is not an additional assumption. The following proof commands apply add eq zero right.

  1. L10
    have hsi : S i = 0
  2. L11
    apply add_eq_zero_right
  3. L12
    exact hi_witness
  4. L13
    apply succ_ne_zero
  5. L14
    exact hsi
07Establish hpreviousL15–16

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

  1. L15
    have hprevious : ∃ b. ∃ c. ∀ x. Lt(x,l) → ∃ y. BetaAt(b,c,x,y) ∧ (Prime(S (a + x)) ∧ (∃ z. PowerValuation(S (a + x),n,z) ∧ Pow(S (a + x),z,y)) ∨ ¬Prime(S (a + x)) ∧ y = 1)Definitions: Lt(x,l)BetaAt(b,c,x,y)Prime(S (a + x))PowerValuation(S (a + x),n,z)Pow(S (a + x),z,y)Original native command in the exact edition
  2. L16
    exact IH
08Separate the logical casesL17–18

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

  1. L17
    cases hprevious
  2. L18
    cases hprevious_witness
09Establish hnextL19–22

Establish this local claim before using it. It is not an additional assumption. The following proof commands apply prime contribution interval prefix extend.

  1. L19
    have hnext : ∃ b. ∃ c. ∀ x. Lt(x,S l) → ∃ y. BetaAt(b,c,x,y) ∧ (Prime(S (a + x)) ∧ (∃ z. PowerValuation(S (a + x),n,z) ∧ Pow(S (a + x),z,y)) ∨ ¬Prime(S (a + x)) ∧ y = 1)Definitions: Lt(x,S l)BetaAt(b,c,x,y)Prime(S (a + x))PowerValuation(S (a + x),n,z)Pow(S (a + x),z,y)Original native command in the exact edition
  2. L20
    apply prime_contribution_interval_prefix_extend
  3. L21
    exact hprevious_witness_witness
  4. L22
    exact hnext

Library-wide reading audit

Original defined command ledger · 22 lines
  1. 0001intro n
  2. 0002intro a
  3. 0003induction l
  4. 0004exists 0
  5. 0005exists 0
  6. 0006intro i
  7. 0007intro hi
  8. 0008exfalso
  9. 0009cases hi
  10. 0010have hsi : S i = 0
  11. 0011apply add_eq_zero_right
  12. 0012exact hi_witness
  13. 0013apply succ_ne_zero
  14. 0014exact hsi
  15. 0015have hprevious : ∃ b. ∃ c. ∀ x. Lt(x,l) → ∃ y. BetaAt(b,c,x,y) ∧ (Prime(S (a + x)) ∧ (∃ z. PowerValuation(S (a + x),n,z)Pow(S (a + x),z,y)) ∨ ¬Prime(S (a + x)) ∧ y = 1)
    Exact native replay linehave hprevious : exists b c. (forall bpr_index_bpcipx_previous. (exists bpr_gap_bpcipx_previous_bound. bpr_gap_bpcipx_previous_bound + S (bpr_index_bpcipx_previous) = l) -> exists bpr_value_bpcipx_previous. ((((exists bpr_height_bpcipx_previous_decoded. bpr_height_bpcipx_previous_decoded + S (bpr_value_bpcipx_previous) = S ((S (bpr_index_bpcipx_previous)) * c)) /\ exists bpr_quotient_bpcipx_previous_decoded. b = bpr_quotient_bpcipx_previous_decoded * S ((S (bpr_index_bpcipx_previous)) * c) + (bpr_value_bpcipx_previous))) /\ (((((~(S (a + bpr_index_bpcipx_previous) = 1) /\ forall bpr_left_bpcipx_previous_choice_prime bpr_right_bpcipx_previous_choice_prime. S (a + bpr_index_bpcipx_previous) = bpr_left_bpcipx_previous_choice_prime * bpr_right_bpcipx_previous_choice_prime -> bpr_left_bpcipx_previous_choice_prime = 1 \/ bpr_right_bpcipx_previous_choice_prime = 1)) /\ exists bpr_choice_exponent_bpcipx_previous_choice. ((((exists bpr_le_gap_bpcipx_previous_choice_valuation_selected_bound. bpr_le_gap_bpcipx_previous_choice_valuation_selected_bound + (bpr_choice_exponent_bpcipx_previous_choice) = (n)) /\ (exists bpr_power_value_bpcipx_previous_choice_valuation_selected. ((exists bpr_power_code_bpcipx_previous_choice_valuation_selected_power bpr_power_scale_bpcipx_previous_choice_valuation_selected_power. ((forall bpr_power_index_bpcipx_previous_choice_valuation_selected_power. (exists bpr_gap_bpcipx_previous_choice_valuation_selected_power_repeat_bound. bpr_gap_bpcipx_previous_choice_valuation_selected_power_repeat_bound + S (bpr_power_index_bpcipx_previous_choice_valuation_selected_power) = bpr_choice_exponent_bpcipx_previous_choice) -> (((exists bpr_height_bpcipx_previous_choice_valuation_selected_power_repeat_entry. bpr_height_bpcipx_previous_choice_valuation_selected_power_repeat_entry + S (S (a + bpr_index_bpcipx_previous)) = S ((S (bpr_power_index_bpcipx_previous_choice_valuation_selected_power)) * bpr_power_scale_bpcipx_previous_choice_valuation_selected_power)) /\ exists bpr_quotient_bpcipx_previous_choice_valuation_selected_power_repeat_entry. bpr_power_code_bpcipx_previous_choice_valuation_selected_power = bpr_quotient_bpcipx_previous_choice_valuation_selected_power_repeat_entry * S ((S (bpr_power_index_bpcipx_previous_choice_valuation_selected_power)) * bpr_power_scale_bpcipx_previous_choice_valuation_selected_power) + (S (a + bpr_index_bpcipx_previous))))) /\ (exists ff_u_bpcipx_previous_choice_valuation_selected_power_product ff_v_bpcipx_previous_choice_valuation_selected_power_product. ((((exists ff_h_bpcipx_previous_choice_valuation_selected_power_product_start. ff_h_bpcipx_previous_choice_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_bpcipx_previous_choice_valuation_selected_power_product)) /\ exists ff_q_bpcipx_previous_choice_valuation_selected_power_product_start. ff_u_bpcipx_previous_choice_valuation_selected_power_product = ff_q_bpcipx_previous_choice_valuation_selected_power_product_start * S ((S (0)) * ff_v_bpcipx_previous_choice_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_bpcipx_previous_choice_valuation_selected_power_product_terminal. ff_h_bpcipx_previous_choice_valuation_selected_power_product_terminal + S (bpr_power_value_bpcipx_previous_choice_valuation_selected) = S ((S (bpr_choice_exponent_bpcipx_previous_choice)) * ff_v_bpcipx_previous_choice_valuation_selected_power_product)) /\ exists ff_q_bpcipx_previous_choice_valuation_selected_power_product_terminal. ff_u_bpcipx_previous_choice_valuation_selected_power_product = ff_q_bpcipx_previous_choice_valuation_selected_power_product_terminal * S ((S (bpr_choice_exponent_bpcipx_previous_choice)) * ff_v_bpcipx_previous_choice_valuation_selected_power_product) + (bpr_power_value_bpcipx_previous_choice_valuation_selected))) /\ forall ff_i_bpcipx_previous_choice_valuation_selected_power_product. (exists ff_lt_bpcipx_previous_choice_valuation_selected_power_product_bound. ff_lt_bpcipx_previous_choice_valuation_selected_power_product_bound + S ff_i_bpcipx_previous_choice_valuation_selected_power_product = bpr_choice_exponent_bpcipx_previous_choice) -> exists ff_p_bpcipx_previous_choice_valuation_selected_power_product ff_r_bpcipx_previous_choice_valuation_selected_power_product ff_s_bpcipx_previous_choice_valuation_selected_power_product. ((((exists ff_h_bpcipx_previous_choice_valuation_selected_power_product_factor. ff_h_bpcipx_previous_choice_valuation_selected_power_product_factor + S (ff_p_bpcipx_previous_choice_valuation_selected_power_product) = S ((S (ff_i_bpcipx_previous_choice_valuation_selected_power_product)) * bpr_power_scale_bpcipx_previous_choice_valuation_selected_power)) /\ exists ff_q_bpcipx_previous_choice_valuation_selected_power_product_factor. bpr_power_code_bpcipx_previous_choice_valuation_selected_power = ff_q_bpcipx_previous_choice_valuation_selected_power_product_factor * S ((S (ff_i_bpcipx_previous_choice_valuation_selected_power_product)) * bpr_power_scale_bpcipx_previous_choice_valuation_selected_power) + (ff_p_bpcipx_previous_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcipx_previous_choice_valuation_selected_power_product_partial. ff_h_bpcipx_previous_choice_valuation_selected_power_product_partial + S (ff_r_bpcipx_previous_choice_valuation_selected_power_product) = S ((S (ff_i_bpcipx_previous_choice_valuation_selected_power_product)) * ff_v_bpcipx_previous_choice_valuation_selected_power_product)) /\ exists ff_q_bpcipx_previous_choice_valuation_selected_power_product_partial. ff_u_bpcipx_previous_choice_valuation_selected_power_product = ff_q_bpcipx_previous_choice_valuation_selected_power_product_partial * S ((S (ff_i_bpcipx_previous_choice_valuation_selected_power_product)) * ff_v_bpcipx_previous_choice_valuation_selected_power_product) + (ff_r_bpcipx_previous_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcipx_previous_choice_valuation_selected_power_product_successor. ff_h_bpcipx_previous_choice_valuation_selected_power_product_successor + S (ff_s_bpcipx_previous_choice_valuation_selected_power_product) = S ((S (S ff_i_bpcipx_previous_choice_valuation_selected_power_product)) * ff_v_bpcipx_previous_choice_valuation_selected_power_product)) /\ exists ff_q_bpcipx_previous_choice_valuation_selected_power_product_successor. ff_u_bpcipx_previous_choice_valuation_selected_power_product = ff_q_bpcipx_previous_choice_valuation_selected_power_product_successor * S ((S (S ff_i_bpcipx_previous_choice_valuation_selected_power_product)) * ff_v_bpcipx_previous_choice_valuation_selected_power_product) + (ff_s_bpcipx_previous_choice_valuation_selected_power_product))) /\ ff_s_bpcipx_previous_choice_valuation_selected_power_product = ff_r_bpcipx_previous_choice_valuation_selected_power_product * ff_p_bpcipx_previous_choice_valuation_selected_power_product)))))))) /\ (exists bpr_divides_quotient_bpcipx_previous_choice_valuation_selected_divides. n = (bpr_power_value_bpcipx_previous_choice_valuation_selected) * bpr_divides_quotient_bpcipx_previous_choice_valuation_selected_divides)))) /\ forall bpr_valuation_candidate_bpcipx_previous_choice_valuation. (exists bpr_le_gap_bpcipx_previous_choice_valuation_candidate_bound. bpr_le_gap_bpcipx_previous_choice_valuation_candidate_bound + (bpr_valuation_candidate_bpcipx_previous_choice_valuation) = (n)) -> (exists bpr_power_value_bpcipx_previous_choice_valuation_candidate. ((exists bpr_power_code_bpcipx_previous_choice_valuation_candidate_power bpr_power_scale_bpcipx_previous_choice_valuation_candidate_power. ((forall bpr_power_index_bpcipx_previous_choice_valuation_candidate_power. (exists bpr_gap_bpcipx_previous_choice_valuation_candidate_power_repeat_bound. bpr_gap_bpcipx_previous_choice_valuation_candidate_power_repeat_bound + S (bpr_power_index_bpcipx_previous_choice_valuation_candidate_power) = bpr_valuation_candidate_bpcipx_previous_choice_valuation) -> (((exists bpr_height_bpcipx_previous_choice_valuation_candidate_power_repeat_entry. bpr_height_bpcipx_previous_choice_valuation_candidate_power_repeat_entry + S (S (a + bpr_index_bpcipx_previous)) = S ((S (bpr_power_index_bpcipx_previous_choice_valuation_candidate_power)) * bpr_power_scale_bpcipx_previous_choice_valuation_candidate_power)) /\ exists bpr_quotient_bpcipx_previous_choice_valuation_candidate_power_repeat_entry. bpr_power_code_bpcipx_previous_choice_valuation_candidate_power = bpr_quotient_bpcipx_previous_choice_valuation_candidate_power_repeat_entry * S ((S (bpr_power_index_bpcipx_previous_choice_valuation_candidate_power)) * bpr_power_scale_bpcipx_previous_choice_valuation_candidate_power) + (S (a + bpr_index_bpcipx_previous))))) /\ (exists ff_u_bpcipx_previous_choice_valuation_candidate_power_product ff_v_bpcipx_previous_choice_valuation_candidate_power_product. ((((exists ff_h_bpcipx_previous_choice_valuation_candidate_power_product_start. ff_h_bpcipx_previous_choice_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_bpcipx_previous_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcipx_previous_choice_valuation_candidate_power_product_start. ff_u_bpcipx_previous_choice_valuation_candidate_power_product = ff_q_bpcipx_previous_choice_valuation_candidate_power_product_start * S ((S (0)) * ff_v_bpcipx_previous_choice_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_bpcipx_previous_choice_valuation_candidate_power_product_terminal. ff_h_bpcipx_previous_choice_valuation_candidate_power_product_terminal + S (bpr_power_value_bpcipx_previous_choice_valuation_candidate) = S ((S (bpr_valuation_candidate_bpcipx_previous_choice_valuation)) * ff_v_bpcipx_previous_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcipx_previous_choice_valuation_candidate_power_product_terminal. ff_u_bpcipx_previous_choice_valuation_candidate_power_product = ff_q_bpcipx_previous_choice_valuation_candidate_power_product_terminal * S ((S (bpr_valuation_candidate_bpcipx_previous_choice_valuation)) * ff_v_bpcipx_previous_choice_valuation_candidate_power_product) + (bpr_power_value_bpcipx_previous_choice_valuation_candidate))) /\ forall ff_i_bpcipx_previous_choice_valuation_candidate_power_product. (exists ff_lt_bpcipx_previous_choice_valuation_candidate_power_product_bound. ff_lt_bpcipx_previous_choice_valuation_candidate_power_product_bound + S ff_i_bpcipx_previous_choice_valuation_candidate_power_product = bpr_valuation_candidate_bpcipx_previous_choice_valuation) -> exists ff_p_bpcipx_previous_choice_valuation_candidate_power_product ff_r_bpcipx_previous_choice_valuation_candidate_power_product ff_s_bpcipx_previous_choice_valuation_candidate_power_product. ((((exists ff_h_bpcipx_previous_choice_valuation_candidate_power_product_factor. ff_h_bpcipx_previous_choice_valuation_candidate_power_product_factor + S (ff_p_bpcipx_previous_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcipx_previous_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcipx_previous_choice_valuation_candidate_power)) /\ exists ff_q_bpcipx_previous_choice_valuation_candidate_power_product_factor. bpr_power_code_bpcipx_previous_choice_valuation_candidate_power = ff_q_bpcipx_previous_choice_valuation_candidate_power_product_factor * S ((S (ff_i_bpcipx_previous_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcipx_previous_choice_valuation_candidate_power) + (ff_p_bpcipx_previous_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcipx_previous_choice_valuation_candidate_power_product_partial. ff_h_bpcipx_previous_choice_valuation_candidate_power_product_partial + S (ff_r_bpcipx_previous_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcipx_previous_choice_valuation_candidate_power_product)) * ff_v_bpcipx_previous_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcipx_previous_choice_valuation_candidate_power_product_partial. ff_u_bpcipx_previous_choice_valuation_candidate_power_product = ff_q_bpcipx_previous_choice_valuation_candidate_power_product_partial * S ((S (ff_i_bpcipx_previous_choice_valuation_candidate_power_product)) * ff_v_bpcipx_previous_choice_valuation_candidate_power_product) + (ff_r_bpcipx_previous_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcipx_previous_choice_valuation_candidate_power_product_successor. ff_h_bpcipx_previous_choice_valuation_candidate_power_product_successor + S (ff_s_bpcipx_previous_choice_valuation_candidate_power_product) = S ((S (S ff_i_bpcipx_previous_choice_valuation_candidate_power_product)) * ff_v_bpcipx_previous_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcipx_previous_choice_valuation_candidate_power_product_successor. ff_u_bpcipx_previous_choice_valuation_candidate_power_product = ff_q_bpcipx_previous_choice_valuation_candidate_power_product_successor * S ((S (S ff_i_bpcipx_previous_choice_valuation_candidate_power_product)) * ff_v_bpcipx_previous_choice_valuation_candidate_power_product) + (ff_s_bpcipx_previous_choice_valuation_candidate_power_product))) /\ ff_s_bpcipx_previous_choice_valuation_candidate_power_product = ff_r_bpcipx_previous_choice_valuation_candidate_power_product * ff_p_bpcipx_previous_choice_valuation_candidate_power_product)))))))) /\ (exists bpr_divides_quotient_bpcipx_previous_choice_valuation_candidate_divides. n = (bpr_power_value_bpcipx_previous_choice_valuation_candidate) * bpr_divides_quotient_bpcipx_previous_choice_valuation_candidate_divides))) -> (exists bpr_le_gap_bpcipx_previous_choice_valuation_candidate_below. bpr_le_gap_bpcipx_previous_choice_valuation_candidate_below + (bpr_valuation_candidate_bpcipx_previous_choice_valuation) = (bpr_choice_exponent_bpcipx_previous_choice))) /\ (exists bpr_power_code_bpcipx_previous_choice_power bpr_power_scale_bpcipx_previous_choice_power. ((forall bpr_power_index_bpcipx_previous_choice_power. (exists bpr_gap_bpcipx_previous_choice_power_repeat_bound. bpr_gap_bpcipx_previous_choice_power_repeat_bound + S (bpr_power_index_bpcipx_previous_choice_power) = bpr_choice_exponent_bpcipx_previous_choice) -> (((exists bpr_height_bpcipx_previous_choice_power_repeat_entry. bpr_height_bpcipx_previous_choice_power_repeat_entry + S (S (a + bpr_index_bpcipx_previous)) = S ((S (bpr_power_index_bpcipx_previous_choice_power)) * bpr_power_scale_bpcipx_previous_choice_power)) /\ exists bpr_quotient_bpcipx_previous_choice_power_repeat_entry. bpr_power_code_bpcipx_previous_choice_power = bpr_quotient_bpcipx_previous_choice_power_repeat_entry * S ((S (bpr_power_index_bpcipx_previous_choice_power)) * bpr_power_scale_bpcipx_previous_choice_power) + (S (a + bpr_index_bpcipx_previous))))) /\ (exists ff_u_bpcipx_previous_choice_power_product ff_v_bpcipx_previous_choice_power_product. ((((exists ff_h_bpcipx_previous_choice_power_product_start. ff_h_bpcipx_previous_choice_power_product_start + S (1) = S ((S (0)) * ff_v_bpcipx_previous_choice_power_product)) /\ exists ff_q_bpcipx_previous_choice_power_product_start. ff_u_bpcipx_previous_choice_power_product = ff_q_bpcipx_previous_choice_power_product_start * S ((S (0)) * ff_v_bpcipx_previous_choice_power_product) + (1))) /\ ((((exists ff_h_bpcipx_previous_choice_power_product_terminal. ff_h_bpcipx_previous_choice_power_product_terminal + S (bpr_value_bpcipx_previous) = S ((S (bpr_choice_exponent_bpcipx_previous_choice)) * ff_v_bpcipx_previous_choice_power_product)) /\ exists ff_q_bpcipx_previous_choice_power_product_terminal. ff_u_bpcipx_previous_choice_power_product = ff_q_bpcipx_previous_choice_power_product_terminal * S ((S (bpr_choice_exponent_bpcipx_previous_choice)) * ff_v_bpcipx_previous_choice_power_product) + (bpr_value_bpcipx_previous))) /\ forall ff_i_bpcipx_previous_choice_power_product. (exists ff_lt_bpcipx_previous_choice_power_product_bound. ff_lt_bpcipx_previous_choice_power_product_bound + S ff_i_bpcipx_previous_choice_power_product = bpr_choice_exponent_bpcipx_previous_choice) -> exists ff_p_bpcipx_previous_choice_power_product ff_r_bpcipx_previous_choice_power_product ff_s_bpcipx_previous_choice_power_product. ((((exists ff_h_bpcipx_previous_choice_power_product_factor. ff_h_bpcipx_previous_choice_power_product_factor + S (ff_p_bpcipx_previous_choice_power_product) = S ((S (ff_i_bpcipx_previous_choice_power_product)) * bpr_power_scale_bpcipx_previous_choice_power)) /\ exists ff_q_bpcipx_previous_choice_power_product_factor. bpr_power_code_bpcipx_previous_choice_power = ff_q_bpcipx_previous_choice_power_product_factor * S ((S (ff_i_bpcipx_previous_choice_power_product)) * bpr_power_scale_bpcipx_previous_choice_power) + (ff_p_bpcipx_previous_choice_power_product))) /\ ((((exists ff_h_bpcipx_previous_choice_power_product_partial. ff_h_bpcipx_previous_choice_power_product_partial + S (ff_r_bpcipx_previous_choice_power_product) = S ((S (ff_i_bpcipx_previous_choice_power_product)) * ff_v_bpcipx_previous_choice_power_product)) /\ exists ff_q_bpcipx_previous_choice_power_product_partial. ff_u_bpcipx_previous_choice_power_product = ff_q_bpcipx_previous_choice_power_product_partial * S ((S (ff_i_bpcipx_previous_choice_power_product)) * ff_v_bpcipx_previous_choice_power_product) + (ff_r_bpcipx_previous_choice_power_product))) /\ ((((exists ff_h_bpcipx_previous_choice_power_product_successor. ff_h_bpcipx_previous_choice_power_product_successor + S (ff_s_bpcipx_previous_choice_power_product) = S ((S (S ff_i_bpcipx_previous_choice_power_product)) * ff_v_bpcipx_previous_choice_power_product)) /\ exists ff_q_bpcipx_previous_choice_power_product_successor. ff_u_bpcipx_previous_choice_power_product = ff_q_bpcipx_previous_choice_power_product_successor * S ((S (S ff_i_bpcipx_previous_choice_power_product)) * ff_v_bpcipx_previous_choice_power_product) + (ff_s_bpcipx_previous_choice_power_product))) /\ ff_s_bpcipx_previous_choice_power_product = ff_r_bpcipx_previous_choice_power_product * ff_p_bpcipx_previous_choice_power_product)))))))))) \/ (~((~(S (a + bpr_index_bpcipx_previous) = 1) /\ forall bpr_left_bpcipx_previous_choice_prime bpr_right_bpcipx_previous_choice_prime. S (a + bpr_index_bpcipx_previous) = bpr_left_bpcipx_previous_choice_prime * bpr_right_bpcipx_previous_choice_prime -> bpr_left_bpcipx_previous_choice_prime = 1 \/ bpr_right_bpcipx_previous_choice_prime = 1)) /\ bpr_value_bpcipx_previous = 1)))))
  16. 0016exact IH
  17. 0017cases hprevious
  18. 0018cases hprevious_witness
  19. 0019have hnext : ∃ b. ∃ c. ∀ x. Lt(x,S l) → ∃ y. BetaAt(b,c,x,y) ∧ (Prime(S (a + x)) ∧ (∃ z. PowerValuation(S (a + x),n,z)Pow(S (a + x),z,y)) ∨ ¬Prime(S (a + x)) ∧ y = 1)
    Exact native replay linehave hnext : exists b c. (forall bpr_index_bpcipx_successor. (exists bpr_gap_bpcipx_successor_bound. bpr_gap_bpcipx_successor_bound + S (bpr_index_bpcipx_successor) = S l) -> exists bpr_value_bpcipx_successor. ((((exists bpr_height_bpcipx_successor_decoded. bpr_height_bpcipx_successor_decoded + S (bpr_value_bpcipx_successor) = S ((S (bpr_index_bpcipx_successor)) * c)) /\ exists bpr_quotient_bpcipx_successor_decoded. b = bpr_quotient_bpcipx_successor_decoded * S ((S (bpr_index_bpcipx_successor)) * c) + (bpr_value_bpcipx_successor))) /\ (((((~(S (a + bpr_index_bpcipx_successor) = 1) /\ forall bpr_left_bpcipx_successor_choice_prime bpr_right_bpcipx_successor_choice_prime. S (a + bpr_index_bpcipx_successor) = bpr_left_bpcipx_successor_choice_prime * bpr_right_bpcipx_successor_choice_prime -> bpr_left_bpcipx_successor_choice_prime = 1 \/ bpr_right_bpcipx_successor_choice_prime = 1)) /\ exists bpr_choice_exponent_bpcipx_successor_choice. ((((exists bpr_le_gap_bpcipx_successor_choice_valuation_selected_bound. bpr_le_gap_bpcipx_successor_choice_valuation_selected_bound + (bpr_choice_exponent_bpcipx_successor_choice) = (n)) /\ (exists bpr_power_value_bpcipx_successor_choice_valuation_selected. ((exists bpr_power_code_bpcipx_successor_choice_valuation_selected_power bpr_power_scale_bpcipx_successor_choice_valuation_selected_power. ((forall bpr_power_index_bpcipx_successor_choice_valuation_selected_power. (exists bpr_gap_bpcipx_successor_choice_valuation_selected_power_repeat_bound. bpr_gap_bpcipx_successor_choice_valuation_selected_power_repeat_bound + S (bpr_power_index_bpcipx_successor_choice_valuation_selected_power) = bpr_choice_exponent_bpcipx_successor_choice) -> (((exists bpr_height_bpcipx_successor_choice_valuation_selected_power_repeat_entry. bpr_height_bpcipx_successor_choice_valuation_selected_power_repeat_entry + S (S (a + bpr_index_bpcipx_successor)) = S ((S (bpr_power_index_bpcipx_successor_choice_valuation_selected_power)) * bpr_power_scale_bpcipx_successor_choice_valuation_selected_power)) /\ exists bpr_quotient_bpcipx_successor_choice_valuation_selected_power_repeat_entry. bpr_power_code_bpcipx_successor_choice_valuation_selected_power = bpr_quotient_bpcipx_successor_choice_valuation_selected_power_repeat_entry * S ((S (bpr_power_index_bpcipx_successor_choice_valuation_selected_power)) * bpr_power_scale_bpcipx_successor_choice_valuation_selected_power) + (S (a + bpr_index_bpcipx_successor))))) /\ (exists ff_u_bpcipx_successor_choice_valuation_selected_power_product ff_v_bpcipx_successor_choice_valuation_selected_power_product. ((((exists ff_h_bpcipx_successor_choice_valuation_selected_power_product_start. ff_h_bpcipx_successor_choice_valuation_selected_power_product_start + S (1) = S ((S (0)) * ff_v_bpcipx_successor_choice_valuation_selected_power_product)) /\ exists ff_q_bpcipx_successor_choice_valuation_selected_power_product_start. ff_u_bpcipx_successor_choice_valuation_selected_power_product = ff_q_bpcipx_successor_choice_valuation_selected_power_product_start * S ((S (0)) * ff_v_bpcipx_successor_choice_valuation_selected_power_product) + (1))) /\ ((((exists ff_h_bpcipx_successor_choice_valuation_selected_power_product_terminal. ff_h_bpcipx_successor_choice_valuation_selected_power_product_terminal + S (bpr_power_value_bpcipx_successor_choice_valuation_selected) = S ((S (bpr_choice_exponent_bpcipx_successor_choice)) * ff_v_bpcipx_successor_choice_valuation_selected_power_product)) /\ exists ff_q_bpcipx_successor_choice_valuation_selected_power_product_terminal. ff_u_bpcipx_successor_choice_valuation_selected_power_product = ff_q_bpcipx_successor_choice_valuation_selected_power_product_terminal * S ((S (bpr_choice_exponent_bpcipx_successor_choice)) * ff_v_bpcipx_successor_choice_valuation_selected_power_product) + (bpr_power_value_bpcipx_successor_choice_valuation_selected))) /\ forall ff_i_bpcipx_successor_choice_valuation_selected_power_product. (exists ff_lt_bpcipx_successor_choice_valuation_selected_power_product_bound. ff_lt_bpcipx_successor_choice_valuation_selected_power_product_bound + S ff_i_bpcipx_successor_choice_valuation_selected_power_product = bpr_choice_exponent_bpcipx_successor_choice) -> exists ff_p_bpcipx_successor_choice_valuation_selected_power_product ff_r_bpcipx_successor_choice_valuation_selected_power_product ff_s_bpcipx_successor_choice_valuation_selected_power_product. ((((exists ff_h_bpcipx_successor_choice_valuation_selected_power_product_factor. ff_h_bpcipx_successor_choice_valuation_selected_power_product_factor + S (ff_p_bpcipx_successor_choice_valuation_selected_power_product) = S ((S (ff_i_bpcipx_successor_choice_valuation_selected_power_product)) * bpr_power_scale_bpcipx_successor_choice_valuation_selected_power)) /\ exists ff_q_bpcipx_successor_choice_valuation_selected_power_product_factor. bpr_power_code_bpcipx_successor_choice_valuation_selected_power = ff_q_bpcipx_successor_choice_valuation_selected_power_product_factor * S ((S (ff_i_bpcipx_successor_choice_valuation_selected_power_product)) * bpr_power_scale_bpcipx_successor_choice_valuation_selected_power) + (ff_p_bpcipx_successor_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcipx_successor_choice_valuation_selected_power_product_partial. ff_h_bpcipx_successor_choice_valuation_selected_power_product_partial + S (ff_r_bpcipx_successor_choice_valuation_selected_power_product) = S ((S (ff_i_bpcipx_successor_choice_valuation_selected_power_product)) * ff_v_bpcipx_successor_choice_valuation_selected_power_product)) /\ exists ff_q_bpcipx_successor_choice_valuation_selected_power_product_partial. ff_u_bpcipx_successor_choice_valuation_selected_power_product = ff_q_bpcipx_successor_choice_valuation_selected_power_product_partial * S ((S (ff_i_bpcipx_successor_choice_valuation_selected_power_product)) * ff_v_bpcipx_successor_choice_valuation_selected_power_product) + (ff_r_bpcipx_successor_choice_valuation_selected_power_product))) /\ ((((exists ff_h_bpcipx_successor_choice_valuation_selected_power_product_successor. ff_h_bpcipx_successor_choice_valuation_selected_power_product_successor + S (ff_s_bpcipx_successor_choice_valuation_selected_power_product) = S ((S (S ff_i_bpcipx_successor_choice_valuation_selected_power_product)) * ff_v_bpcipx_successor_choice_valuation_selected_power_product)) /\ exists ff_q_bpcipx_successor_choice_valuation_selected_power_product_successor. ff_u_bpcipx_successor_choice_valuation_selected_power_product = ff_q_bpcipx_successor_choice_valuation_selected_power_product_successor * S ((S (S ff_i_bpcipx_successor_choice_valuation_selected_power_product)) * ff_v_bpcipx_successor_choice_valuation_selected_power_product) + (ff_s_bpcipx_successor_choice_valuation_selected_power_product))) /\ ff_s_bpcipx_successor_choice_valuation_selected_power_product = ff_r_bpcipx_successor_choice_valuation_selected_power_product * ff_p_bpcipx_successor_choice_valuation_selected_power_product)))))))) /\ (exists bpr_divides_quotient_bpcipx_successor_choice_valuation_selected_divides. n = (bpr_power_value_bpcipx_successor_choice_valuation_selected) * bpr_divides_quotient_bpcipx_successor_choice_valuation_selected_divides)))) /\ forall bpr_valuation_candidate_bpcipx_successor_choice_valuation. (exists bpr_le_gap_bpcipx_successor_choice_valuation_candidate_bound. bpr_le_gap_bpcipx_successor_choice_valuation_candidate_bound + (bpr_valuation_candidate_bpcipx_successor_choice_valuation) = (n)) -> (exists bpr_power_value_bpcipx_successor_choice_valuation_candidate. ((exists bpr_power_code_bpcipx_successor_choice_valuation_candidate_power bpr_power_scale_bpcipx_successor_choice_valuation_candidate_power. ((forall bpr_power_index_bpcipx_successor_choice_valuation_candidate_power. (exists bpr_gap_bpcipx_successor_choice_valuation_candidate_power_repeat_bound. bpr_gap_bpcipx_successor_choice_valuation_candidate_power_repeat_bound + S (bpr_power_index_bpcipx_successor_choice_valuation_candidate_power) = bpr_valuation_candidate_bpcipx_successor_choice_valuation) -> (((exists bpr_height_bpcipx_successor_choice_valuation_candidate_power_repeat_entry. bpr_height_bpcipx_successor_choice_valuation_candidate_power_repeat_entry + S (S (a + bpr_index_bpcipx_successor)) = S ((S (bpr_power_index_bpcipx_successor_choice_valuation_candidate_power)) * bpr_power_scale_bpcipx_successor_choice_valuation_candidate_power)) /\ exists bpr_quotient_bpcipx_successor_choice_valuation_candidate_power_repeat_entry. bpr_power_code_bpcipx_successor_choice_valuation_candidate_power = bpr_quotient_bpcipx_successor_choice_valuation_candidate_power_repeat_entry * S ((S (bpr_power_index_bpcipx_successor_choice_valuation_candidate_power)) * bpr_power_scale_bpcipx_successor_choice_valuation_candidate_power) + (S (a + bpr_index_bpcipx_successor))))) /\ (exists ff_u_bpcipx_successor_choice_valuation_candidate_power_product ff_v_bpcipx_successor_choice_valuation_candidate_power_product. ((((exists ff_h_bpcipx_successor_choice_valuation_candidate_power_product_start. ff_h_bpcipx_successor_choice_valuation_candidate_power_product_start + S (1) = S ((S (0)) * ff_v_bpcipx_successor_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcipx_successor_choice_valuation_candidate_power_product_start. ff_u_bpcipx_successor_choice_valuation_candidate_power_product = ff_q_bpcipx_successor_choice_valuation_candidate_power_product_start * S ((S (0)) * ff_v_bpcipx_successor_choice_valuation_candidate_power_product) + (1))) /\ ((((exists ff_h_bpcipx_successor_choice_valuation_candidate_power_product_terminal. ff_h_bpcipx_successor_choice_valuation_candidate_power_product_terminal + S (bpr_power_value_bpcipx_successor_choice_valuation_candidate) = S ((S (bpr_valuation_candidate_bpcipx_successor_choice_valuation)) * ff_v_bpcipx_successor_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcipx_successor_choice_valuation_candidate_power_product_terminal. ff_u_bpcipx_successor_choice_valuation_candidate_power_product = ff_q_bpcipx_successor_choice_valuation_candidate_power_product_terminal * S ((S (bpr_valuation_candidate_bpcipx_successor_choice_valuation)) * ff_v_bpcipx_successor_choice_valuation_candidate_power_product) + (bpr_power_value_bpcipx_successor_choice_valuation_candidate))) /\ forall ff_i_bpcipx_successor_choice_valuation_candidate_power_product. (exists ff_lt_bpcipx_successor_choice_valuation_candidate_power_product_bound. ff_lt_bpcipx_successor_choice_valuation_candidate_power_product_bound + S ff_i_bpcipx_successor_choice_valuation_candidate_power_product = bpr_valuation_candidate_bpcipx_successor_choice_valuation) -> exists ff_p_bpcipx_successor_choice_valuation_candidate_power_product ff_r_bpcipx_successor_choice_valuation_candidate_power_product ff_s_bpcipx_successor_choice_valuation_candidate_power_product. ((((exists ff_h_bpcipx_successor_choice_valuation_candidate_power_product_factor. ff_h_bpcipx_successor_choice_valuation_candidate_power_product_factor + S (ff_p_bpcipx_successor_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcipx_successor_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcipx_successor_choice_valuation_candidate_power)) /\ exists ff_q_bpcipx_successor_choice_valuation_candidate_power_product_factor. bpr_power_code_bpcipx_successor_choice_valuation_candidate_power = ff_q_bpcipx_successor_choice_valuation_candidate_power_product_factor * S ((S (ff_i_bpcipx_successor_choice_valuation_candidate_power_product)) * bpr_power_scale_bpcipx_successor_choice_valuation_candidate_power) + (ff_p_bpcipx_successor_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcipx_successor_choice_valuation_candidate_power_product_partial. ff_h_bpcipx_successor_choice_valuation_candidate_power_product_partial + S (ff_r_bpcipx_successor_choice_valuation_candidate_power_product) = S ((S (ff_i_bpcipx_successor_choice_valuation_candidate_power_product)) * ff_v_bpcipx_successor_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcipx_successor_choice_valuation_candidate_power_product_partial. ff_u_bpcipx_successor_choice_valuation_candidate_power_product = ff_q_bpcipx_successor_choice_valuation_candidate_power_product_partial * S ((S (ff_i_bpcipx_successor_choice_valuation_candidate_power_product)) * ff_v_bpcipx_successor_choice_valuation_candidate_power_product) + (ff_r_bpcipx_successor_choice_valuation_candidate_power_product))) /\ ((((exists ff_h_bpcipx_successor_choice_valuation_candidate_power_product_successor. ff_h_bpcipx_successor_choice_valuation_candidate_power_product_successor + S (ff_s_bpcipx_successor_choice_valuation_candidate_power_product) = S ((S (S ff_i_bpcipx_successor_choice_valuation_candidate_power_product)) * ff_v_bpcipx_successor_choice_valuation_candidate_power_product)) /\ exists ff_q_bpcipx_successor_choice_valuation_candidate_power_product_successor. ff_u_bpcipx_successor_choice_valuation_candidate_power_product = ff_q_bpcipx_successor_choice_valuation_candidate_power_product_successor * S ((S (S ff_i_bpcipx_successor_choice_valuation_candidate_power_product)) * ff_v_bpcipx_successor_choice_valuation_candidate_power_product) + (ff_s_bpcipx_successor_choice_valuation_candidate_power_product))) /\ ff_s_bpcipx_successor_choice_valuation_candidate_power_product = ff_r_bpcipx_successor_choice_valuation_candidate_power_product * ff_p_bpcipx_successor_choice_valuation_candidate_power_product)))))))) /\ (exists bpr_divides_quotient_bpcipx_successor_choice_valuation_candidate_divides. n = (bpr_power_value_bpcipx_successor_choice_valuation_candidate) * bpr_divides_quotient_bpcipx_successor_choice_valuation_candidate_divides))) -> (exists bpr_le_gap_bpcipx_successor_choice_valuation_candidate_below. bpr_le_gap_bpcipx_successor_choice_valuation_candidate_below + (bpr_valuation_candidate_bpcipx_successor_choice_valuation) = (bpr_choice_exponent_bpcipx_successor_choice))) /\ (exists bpr_power_code_bpcipx_successor_choice_power bpr_power_scale_bpcipx_successor_choice_power. ((forall bpr_power_index_bpcipx_successor_choice_power. (exists bpr_gap_bpcipx_successor_choice_power_repeat_bound. bpr_gap_bpcipx_successor_choice_power_repeat_bound + S (bpr_power_index_bpcipx_successor_choice_power) = bpr_choice_exponent_bpcipx_successor_choice) -> (((exists bpr_height_bpcipx_successor_choice_power_repeat_entry. bpr_height_bpcipx_successor_choice_power_repeat_entry + S (S (a + bpr_index_bpcipx_successor)) = S ((S (bpr_power_index_bpcipx_successor_choice_power)) * bpr_power_scale_bpcipx_successor_choice_power)) /\ exists bpr_quotient_bpcipx_successor_choice_power_repeat_entry. bpr_power_code_bpcipx_successor_choice_power = bpr_quotient_bpcipx_successor_choice_power_repeat_entry * S ((S (bpr_power_index_bpcipx_successor_choice_power)) * bpr_power_scale_bpcipx_successor_choice_power) + (S (a + bpr_index_bpcipx_successor))))) /\ (exists ff_u_bpcipx_successor_choice_power_product ff_v_bpcipx_successor_choice_power_product. ((((exists ff_h_bpcipx_successor_choice_power_product_start. ff_h_bpcipx_successor_choice_power_product_start + S (1) = S ((S (0)) * ff_v_bpcipx_successor_choice_power_product)) /\ exists ff_q_bpcipx_successor_choice_power_product_start. ff_u_bpcipx_successor_choice_power_product = ff_q_bpcipx_successor_choice_power_product_start * S ((S (0)) * ff_v_bpcipx_successor_choice_power_product) + (1))) /\ ((((exists ff_h_bpcipx_successor_choice_power_product_terminal. ff_h_bpcipx_successor_choice_power_product_terminal + S (bpr_value_bpcipx_successor) = S ((S (bpr_choice_exponent_bpcipx_successor_choice)) * ff_v_bpcipx_successor_choice_power_product)) /\ exists ff_q_bpcipx_successor_choice_power_product_terminal. ff_u_bpcipx_successor_choice_power_product = ff_q_bpcipx_successor_choice_power_product_terminal * S ((S (bpr_choice_exponent_bpcipx_successor_choice)) * ff_v_bpcipx_successor_choice_power_product) + (bpr_value_bpcipx_successor))) /\ forall ff_i_bpcipx_successor_choice_power_product. (exists ff_lt_bpcipx_successor_choice_power_product_bound. ff_lt_bpcipx_successor_choice_power_product_bound + S ff_i_bpcipx_successor_choice_power_product = bpr_choice_exponent_bpcipx_successor_choice) -> exists ff_p_bpcipx_successor_choice_power_product ff_r_bpcipx_successor_choice_power_product ff_s_bpcipx_successor_choice_power_product. ((((exists ff_h_bpcipx_successor_choice_power_product_factor. ff_h_bpcipx_successor_choice_power_product_factor + S (ff_p_bpcipx_successor_choice_power_product) = S ((S (ff_i_bpcipx_successor_choice_power_product)) * bpr_power_scale_bpcipx_successor_choice_power)) /\ exists ff_q_bpcipx_successor_choice_power_product_factor. bpr_power_code_bpcipx_successor_choice_power = ff_q_bpcipx_successor_choice_power_product_factor * S ((S (ff_i_bpcipx_successor_choice_power_product)) * bpr_power_scale_bpcipx_successor_choice_power) + (ff_p_bpcipx_successor_choice_power_product))) /\ ((((exists ff_h_bpcipx_successor_choice_power_product_partial. ff_h_bpcipx_successor_choice_power_product_partial + S (ff_r_bpcipx_successor_choice_power_product) = S ((S (ff_i_bpcipx_successor_choice_power_product)) * ff_v_bpcipx_successor_choice_power_product)) /\ exists ff_q_bpcipx_successor_choice_power_product_partial. ff_u_bpcipx_successor_choice_power_product = ff_q_bpcipx_successor_choice_power_product_partial * S ((S (ff_i_bpcipx_successor_choice_power_product)) * ff_v_bpcipx_successor_choice_power_product) + (ff_r_bpcipx_successor_choice_power_product))) /\ ((((exists ff_h_bpcipx_successor_choice_power_product_successor. ff_h_bpcipx_successor_choice_power_product_successor + S (ff_s_bpcipx_successor_choice_power_product) = S ((S (S ff_i_bpcipx_successor_choice_power_product)) * ff_v_bpcipx_successor_choice_power_product)) /\ exists ff_q_bpcipx_successor_choice_power_product_successor. ff_u_bpcipx_successor_choice_power_product = ff_q_bpcipx_successor_choice_power_product_successor * S ((S (S ff_i_bpcipx_successor_choice_power_product)) * ff_v_bpcipx_successor_choice_power_product) + (ff_s_bpcipx_successor_choice_power_product))) /\ ff_s_bpcipx_successor_choice_power_product = ff_r_bpcipx_successor_choice_power_product * ff_p_bpcipx_successor_choice_power_product)))))))))) \/ (~((~(S (a + bpr_index_bpcipx_successor) = 1) /\ forall bpr_left_bpcipx_successor_choice_prime bpr_right_bpcipx_successor_choice_prime. S (a + bpr_index_bpcipx_successor) = bpr_left_bpcipx_successor_choice_prime * bpr_right_bpcipx_successor_choice_prime -> bpr_left_bpcipx_successor_choice_prime = 1 \/ bpr_right_bpcipx_successor_choice_prime = 1)) /\ bpr_value_bpcipx_successor = 1)))))
  20. 0020apply prime_contribution_interval_prefix_extend
  21. 0021exact hprevious_witness_witness
  22. 0022exact hnext