BT00SO

pow_two_seed_bundle_from_total

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

One totality premise yields the exact seeds 2^2=4 and 2^7=128.

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 PA statement

(forall bpt_a_seed bpt_e_seed. exists bpt_x_seed. (exists ff_b_bpt_value_seed ff_c_bpt_value_seed. ((forall ff_i_bpt_value_seed_repeat. (exists ff_lt_bpt_value_seed_repeat_bound. ff_lt_bpt_value_seed_repeat_bound + S ff_i_bpt_value_seed_repeat = bpt_e_seed) -> (((exists ff_h_bpt_value_seed_repeat_decoded. ff_h_bpt_value_seed_repeat_decoded + S (bpt_a_seed) = S ((S (ff_i_bpt_value_seed_repeat)) * ff_c_bpt_value_seed)) /\ exists ff_q_bpt_value_seed_repeat_decoded. ff_b_bpt_value_seed = ff_q_bpt_value_seed_repeat_decoded * S ((S (ff_i_bpt_value_seed_repeat)) * ff_c_bpt_value_seed) + (bpt_a_seed)))) /\ (exists ff_u_bpt_value_seed_product ff_v_bpt_value_seed_product. ((((exists ff_h_bpt_value_seed_product_start. ff_h_bpt_value_seed_product_start + S (1) = S ((S (0)) * ff_v_bpt_value_seed_product)) /\ exists ff_q_bpt_value_seed_product_start. ff_u_bpt_value_seed_product = ff_q_bpt_value_seed_product_start * S ((S (0)) * ff_v_bpt_value_seed_product) + (1))) /\ ((((exists ff_h_bpt_value_seed_product_terminal. ff_h_bpt_value_seed_product_terminal + S (bpt_x_seed) = S ((S (bpt_e_seed)) * ff_v_bpt_value_seed_product)) /\ exists ff_q_bpt_value_seed_product_terminal. ff_u_bpt_value_seed_product = ff_q_bpt_value_seed_product_terminal * S ((S (bpt_e_seed)) * ff_v_bpt_value_seed_product) + (bpt_x_seed))) /\ forall ff_i_bpt_value_seed_product. (exists ff_lt_bpt_value_seed_product_bound. ff_lt_bpt_value_seed_product_bound + S ff_i_bpt_value_seed_product = bpt_e_seed) -> exists ff_p_bpt_value_seed_product ff_r_bpt_value_seed_product ff_s_bpt_value_seed_product. ((((exists ff_h_bpt_value_seed_product_factor. ff_h_bpt_value_seed_product_factor + S (ff_p_bpt_value_seed_product) = S ((S (ff_i_bpt_value_seed_product)) * ff_c_bpt_value_seed)) /\ exists ff_q_bpt_value_seed_product_factor. ff_b_bpt_value_seed = ff_q_bpt_value_seed_product_factor * S ((S (ff_i_bpt_value_seed_product)) * ff_c_bpt_value_seed) + (ff_p_bpt_value_seed_product))) /\ ((((exists ff_h_bpt_value_seed_product_partial. ff_h_bpt_value_seed_product_partial + S (ff_r_bpt_value_seed_product) = S ((S (ff_i_bpt_value_seed_product)) * ff_v_bpt_value_seed_product)) /\ exists ff_q_bpt_value_seed_product_partial. ff_u_bpt_value_seed_product = ff_q_bpt_value_seed_product_partial * S ((S (ff_i_bpt_value_seed_product)) * ff_v_bpt_value_seed_product) + (ff_r_bpt_value_seed_product))) /\ ((((exists ff_h_bpt_value_seed_product_successor. ff_h_bpt_value_seed_product_successor + S (ff_s_bpt_value_seed_product) = S ((S (S ff_i_bpt_value_seed_product)) * ff_v_bpt_value_seed_product)) /\ exists ff_q_bpt_value_seed_product_successor. ff_u_bpt_value_seed_product = ff_q_bpt_value_seed_product_successor * S ((S (S ff_i_bpt_value_seed_product)) * ff_v_bpt_value_seed_product) + (ff_s_bpt_value_seed_product))) /\ ff_s_bpt_value_seed_product = ff_r_bpt_value_seed_product * ff_p_bpt_value_seed_product))))))))) -> ((exists pa_b_bpt_seed_two pa_c_bpt_seed_two. ((forall pa_i_bpt_seed_two_repeat. (exists pa_lt_bpt_seed_two_repeat_bound. pa_lt_bpt_seed_two_repeat_bound + S pa_i_bpt_seed_two_repeat = 2) -> (((exists pa_h_bpt_seed_two_repeat_decoded. pa_h_bpt_seed_two_repeat_decoded + S (2) = S ((S (pa_i_bpt_seed_two_repeat)) * pa_c_bpt_seed_two)) /\ exists pa_q_bpt_seed_two_repeat_decoded. pa_b_bpt_seed_two = pa_q_bpt_seed_two_repeat_decoded * S ((S (pa_i_bpt_seed_two_repeat)) * pa_c_bpt_seed_two) + (2)))) /\ (exists pa_u_bpt_seed_two_product pa_v_bpt_seed_two_product. ((((exists pa_h_bpt_seed_two_product_start. pa_h_bpt_seed_two_product_start + S (1) = S ((S (0)) * pa_v_bpt_seed_two_product)) /\ exists pa_q_bpt_seed_two_product_start. pa_u_bpt_seed_two_product = pa_q_bpt_seed_two_product_start * S ((S (0)) * pa_v_bpt_seed_two_product) + (1))) /\ ((((exists pa_h_bpt_seed_two_product_terminal. pa_h_bpt_seed_two_product_terminal + S (4) = S ((S (2)) * pa_v_bpt_seed_two_product)) /\ exists pa_q_bpt_seed_two_product_terminal. pa_u_bpt_seed_two_product = pa_q_bpt_seed_two_product_terminal * S ((S (2)) * pa_v_bpt_seed_two_product) + (4))) /\ forall pa_i_bpt_seed_two_product. (exists pa_lt_bpt_seed_two_product_bound. pa_lt_bpt_seed_two_product_bound + S pa_i_bpt_seed_two_product = 2) -> exists pa_p_bpt_seed_two_product pa_r_bpt_seed_two_product pa_s_bpt_seed_two_product. ((((exists pa_h_bpt_seed_two_product_factor. pa_h_bpt_seed_two_product_factor + S (pa_p_bpt_seed_two_product) = S ((S (pa_i_bpt_seed_two_product)) * pa_c_bpt_seed_two)) /\ exists pa_q_bpt_seed_two_product_factor. pa_b_bpt_seed_two = pa_q_bpt_seed_two_product_factor * S ((S (pa_i_bpt_seed_two_product)) * pa_c_bpt_seed_two) + (pa_p_bpt_seed_two_product))) /\ ((((exists pa_h_bpt_seed_two_product_partial. pa_h_bpt_seed_two_product_partial + S (pa_r_bpt_seed_two_product) = S ((S (pa_i_bpt_seed_two_product)) * pa_v_bpt_seed_two_product)) /\ exists pa_q_bpt_seed_two_product_partial. pa_u_bpt_seed_two_product = pa_q_bpt_seed_two_product_partial * S ((S (pa_i_bpt_seed_two_product)) * pa_v_bpt_seed_two_product) + (pa_r_bpt_seed_two_product))) /\ ((((exists pa_h_bpt_seed_two_product_successor. pa_h_bpt_seed_two_product_successor + S (pa_s_bpt_seed_two_product) = S ((S (S pa_i_bpt_seed_two_product)) * pa_v_bpt_seed_two_product)) /\ exists pa_q_bpt_seed_two_product_successor. pa_u_bpt_seed_two_product = pa_q_bpt_seed_two_product_successor * S ((S (S pa_i_bpt_seed_two_product)) * pa_v_bpt_seed_two_product) + (pa_s_bpt_seed_two_product))) /\ pa_s_bpt_seed_two_product = pa_r_bpt_seed_two_product * pa_p_bpt_seed_two_product)))))))) /\ (exists pa_b_bpt_seed_seven pa_c_bpt_seed_seven. ((forall pa_i_bpt_seed_seven_repeat. (exists pa_lt_bpt_seed_seven_repeat_bound. pa_lt_bpt_seed_seven_repeat_bound + S pa_i_bpt_seed_seven_repeat = 7) -> (((exists pa_h_bpt_seed_seven_repeat_decoded. pa_h_bpt_seed_seven_repeat_decoded + S (2) = S ((S (pa_i_bpt_seed_seven_repeat)) * pa_c_bpt_seed_seven)) /\ exists pa_q_bpt_seed_seven_repeat_decoded. pa_b_bpt_seed_seven = pa_q_bpt_seed_seven_repeat_decoded * S ((S (pa_i_bpt_seed_seven_repeat)) * pa_c_bpt_seed_seven) + (2)))) /\ (exists pa_u_bpt_seed_seven_product pa_v_bpt_seed_seven_product. ((((exists pa_h_bpt_seed_seven_product_start. pa_h_bpt_seed_seven_product_start + S (1) = S ((S (0)) * pa_v_bpt_seed_seven_product)) /\ exists pa_q_bpt_seed_seven_product_start. pa_u_bpt_seed_seven_product = pa_q_bpt_seed_seven_product_start * S ((S (0)) * pa_v_bpt_seed_seven_product) + (1))) /\ ((((exists pa_h_bpt_seed_seven_product_terminal. pa_h_bpt_seed_seven_product_terminal + S (128) = S ((S (7)) * pa_v_bpt_seed_seven_product)) /\ exists pa_q_bpt_seed_seven_product_terminal. pa_u_bpt_seed_seven_product = pa_q_bpt_seed_seven_product_terminal * S ((S (7)) * pa_v_bpt_seed_seven_product) + (128))) /\ forall pa_i_bpt_seed_seven_product. (exists pa_lt_bpt_seed_seven_product_bound. pa_lt_bpt_seed_seven_product_bound + S pa_i_bpt_seed_seven_product = 7) -> exists pa_p_bpt_seed_seven_product pa_r_bpt_seed_seven_product pa_s_bpt_seed_seven_product. ((((exists pa_h_bpt_seed_seven_product_factor. pa_h_bpt_seed_seven_product_factor + S (pa_p_bpt_seed_seven_product) = S ((S (pa_i_bpt_seed_seven_product)) * pa_c_bpt_seed_seven)) /\ exists pa_q_bpt_seed_seven_product_factor. pa_b_bpt_seed_seven = pa_q_bpt_seed_seven_product_factor * S ((S (pa_i_bpt_seed_seven_product)) * pa_c_bpt_seed_seven) + (pa_p_bpt_seed_seven_product))) /\ ((((exists pa_h_bpt_seed_seven_product_partial. pa_h_bpt_seed_seven_product_partial + S (pa_r_bpt_seed_seven_product) = S ((S (pa_i_bpt_seed_seven_product)) * pa_v_bpt_seed_seven_product)) /\ exists pa_q_bpt_seed_seven_product_partial. pa_u_bpt_seed_seven_product = pa_q_bpt_seed_seven_product_partial * S ((S (pa_i_bpt_seed_seven_product)) * pa_v_bpt_seed_seven_product) + (pa_r_bpt_seed_seven_product))) /\ ((((exists pa_h_bpt_seed_seven_product_successor. pa_h_bpt_seed_seven_product_successor + S (pa_s_bpt_seed_seven_product) = S ((S (S pa_i_bpt_seed_seven_product)) * pa_v_bpt_seed_seven_product)) /\ exists pa_q_bpt_seed_seven_product_successor. pa_u_bpt_seed_seven_product = pa_q_bpt_seed_seven_product_successor * S ((S (S pa_i_bpt_seed_seven_product)) * pa_v_bpt_seed_seven_product) + (pa_s_bpt_seed_seven_product))) /\ pa_s_bpt_seed_seven_product = pa_r_bpt_seed_seven_product * pa_p_bpt_seed_seven_product)))))))))

Structural proof guide

One totality premise yields the exact seeds 2^2=4 and 2^7=128.

Direct prerequisites: pow_successor_compose_from_total, pow_two_base_two_value_four. The authored body proceeds by case analysis (1), intermediate claims (8), equality transport (204), closed numeral normalization (3).

Proof neighborhood

Direct dependencies

Direct dependents

Formal native tactic body

Dependencies are hypotheses of the historical Alpha-v12 body receipt. The complete historical Alpha-v18 proof bundle independently checks every dependency; current Alpha v25 preserves that checked theorem use without changing Stable membership.

Read the argument

Proof checkpoints

266 script commands · 33 reading checkpoints · 8 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 (2)

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–1

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

  1. L1
    intro htotal
02Establish htwo_existsL2–5

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

  1. L2
    have htwo_exists : ∃ x. Pow(2,2,x)Definitions: Pow
  2. L3
    specialize htotal 2
  3. L4
    specialize htotal 2
  4. L5
    exact htotal
03Separate the logical casesL6–6

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

  1. L6
    cases htwo_exists
04Establish htwo_valueL7–10

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

  1. L7
    have htwo_value : x = 4
  2. L8
    specialize pow_two_base_two_value_four x
  3. L9
    apply pow_two_base_two_value_four
  4. L10
    exact htwo_exists_witness
05Establish htwoL11–14

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

  1. L11
    have htwo : Pow(2,2,4)Definitions: Pow
  2. L12
    rewrite <- htwo_value
  3. L13
    rewrite <- htwo_value
  4. L14
    exact htwo_exists_witness
06Establish hthreeL15–23

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

  1. L15
    have hthree : Pow(2,3,8)Definitions: Pow
  2. L16
    specialize pow_successor_compose_from_total 2
  3. L17
    specialize pow_successor_compose_from_total 2
  4. L18
    specialize pow_successor_compose_from_total 4
  5. L19
    specialize pow_successor_compose_from_total 8
  6. L20
    apply pow_successor_compose_from_total
  7. L21
    exact htotal
  8. L22
    exact htwo
  9. L23
    norm_num
07Establish hfourL24–32

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

  1. L24
    have hfour : Pow(2,4,16)Definitions: Pow
  2. L25
    specialize pow_successor_compose_from_total 2
  3. L26
    specialize pow_successor_compose_from_total 3
  4. L27
    specialize pow_successor_compose_from_total 8
  5. L28
    specialize pow_successor_compose_from_total 16
  6. L29
    apply pow_successor_compose_from_total
  7. L30
    exact htotal
  8. L31
    exact hthree
  9. L32
    norm_num
08Establish hfiveL33–41

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

  1. L33
    have hfive : Pow(2,5,32)Definitions: Pow
  2. L34
    specialize pow_successor_compose_from_total 2
  3. L35
    specialize pow_successor_compose_from_total 4
  4. L36
    specialize pow_successor_compose_from_total 16
  5. L37
    specialize pow_successor_compose_from_total 32
  6. L38
    apply pow_successor_compose_from_total
  7. L39
    exact htotal
  8. L40
    exact hfour
  9. L41
    norm_num
09Establish hsixL42–51

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

  1. L42
    have hsix : Pow(2,6,64)Definitions: Pow
  2. L43
    specialize pow_successor_compose_from_total 2
  3. L44
    specialize pow_successor_compose_from_total 5
  4. L45
    specialize pow_successor_compose_from_total 32
  5. L46
    specialize pow_successor_compose_from_total 64
  6. L47
    apply pow_successor_compose_from_total
  7. L48
    exact htotal
  8. L49
    exact hfive
  9. L50
    symm
  10. L51
    rewrite PA6
10Calculate and transport equalitiesL52–61

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

  1. L52
    rewrite PA6
  2. L53
    rewrite PA5
  3. L54
    rewrite PA4
  4. L55
    rewrite PA4
  5. L56
    rewrite PA4
  6. L57
    rewrite PA4
  7. L58
    rewrite PA4
  8. L59
    rewrite PA4
  9. L60
    rewrite PA4
  10. L61
    rewrite PA4
11Calculate and transport equalitiesL62–71

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

  1. L62
    rewrite PA4
  2. L63
    rewrite PA4
  3. L64
    rewrite PA4
  4. L65
    rewrite PA4
  5. L66
    rewrite PA4
  6. L67
    rewrite PA4
  7. L68
    rewrite PA4
  8. L69
    rewrite PA4
  9. L70
    rewrite PA4
  10. L71
    rewrite PA4
12Calculate and transport equalitiesL72–81

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

  1. L72
    rewrite PA4
  2. L73
    rewrite PA4
  3. L74
    rewrite PA4
  4. L75
    rewrite PA4
  5. L76
    rewrite PA4
  6. L77
    rewrite PA4
  7. L78
    rewrite PA4
  8. L79
    rewrite PA4
  9. L80
    rewrite PA4
  10. L81
    rewrite PA4
13Calculate and transport equalitiesL82–91

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

  1. L82
    rewrite PA4
  2. L83
    rewrite PA4
  3. L84
    rewrite PA4
  4. L85
    rewrite PA4
  5. L86
    rewrite PA3
  6. L87
    rewrite PA4
  7. L88
    rewrite PA4
  8. L89
    rewrite PA4
  9. L90
    rewrite PA4
  10. L91
    rewrite PA4
14Calculate and transport equalitiesL92–101

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

  1. L92
    rewrite PA4
  2. L93
    rewrite PA4
  3. L94
    rewrite PA4
  4. L95
    rewrite PA4
  5. L96
    rewrite PA4
  6. L97
    rewrite PA4
  7. L98
    rewrite PA4
  8. L99
    rewrite PA4
  9. L100
    rewrite PA4
  10. L101
    rewrite PA4
15Calculate and transport equalitiesL102–111

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

  1. L102
    rewrite PA4
  2. L103
    rewrite PA4
  3. L104
    rewrite PA4
  4. L105
    rewrite PA4
  5. L106
    rewrite PA4
  6. L107
    rewrite PA4
  7. L108
    rewrite PA4
  8. L109
    rewrite PA4
  9. L110
    rewrite PA4
  10. L111
    rewrite PA4
16Calculate and transport equalitiesL112–120

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

  1. L112
    rewrite PA4
  2. L113
    rewrite PA4
  3. L114
    rewrite PA4
  4. L115
    rewrite PA4
  5. L116
    rewrite PA4
  6. L117
    rewrite PA4
  7. L118
    rewrite PA4
  8. L119
    rewrite PA3
  9. L120
    refl
17Establish hsevenL121–130

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

  1. L121
    have hseven : Pow(2,7,128)Definitions: Pow
  2. L122
    specialize pow_successor_compose_from_total 2
  3. L123
    specialize pow_successor_compose_from_total 6
  4. L124
    specialize pow_successor_compose_from_total 64
  5. L125
    specialize pow_successor_compose_from_total 128
  6. L126
    apply pow_successor_compose_from_total
  7. L127
    exact htotal
  8. L128
    exact hsix
  9. L129
    symm
  10. L130
    rewrite PA6
18Calculate and transport equalitiesL131–140

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

  1. L131
    rewrite PA6
  2. L132
    rewrite PA5
  3. L133
    rewrite PA4
  4. L134
    rewrite PA4
  5. L135
    rewrite PA4
  6. L136
    rewrite PA4
  7. L137
    rewrite PA4
  8. L138
    rewrite PA4
  9. L139
    rewrite PA4
  10. L140
    rewrite PA4
19Calculate and transport equalitiesL141–150

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

  1. L141
    rewrite PA4
  2. L142
    rewrite PA4
  3. L143
    rewrite PA4
  4. L144
    rewrite PA4
  5. L145
    rewrite PA4
  6. L146
    rewrite PA4
  7. L147
    rewrite PA4
  8. L148
    rewrite PA4
  9. L149
    rewrite PA4
  10. L150
    rewrite PA4
20Calculate and transport equalitiesL151–160

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

  1. L151
    rewrite PA4
  2. L152
    rewrite PA4
  3. L153
    rewrite PA4
  4. L154
    rewrite PA4
  5. L155
    rewrite PA4
  6. L156
    rewrite PA4
  7. L157
    rewrite PA4
  8. L158
    rewrite PA4
  9. L159
    rewrite PA4
  10. L160
    rewrite PA4
21Calculate and transport equalitiesL161–170

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

  1. L161
    rewrite PA4
  2. L162
    rewrite PA4
  3. L163
    rewrite PA4
  4. L164
    rewrite PA4
  5. L165
    rewrite PA4
  6. L166
    rewrite PA4
  7. L167
    rewrite PA4
  8. L168
    rewrite PA4
  9. L169
    rewrite PA4
  10. L170
    rewrite PA4
22Calculate and transport equalitiesL171–180

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

  1. L171
    rewrite PA4
  2. L172
    rewrite PA4
  3. L173
    rewrite PA4
  4. L174
    rewrite PA4
  5. L175
    rewrite PA4
  6. L176
    rewrite PA4
  7. L177
    rewrite PA4
  8. L178
    rewrite PA4
  9. L179
    rewrite PA4
  10. L180
    rewrite PA4
23Calculate and transport equalitiesL181–190

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

  1. L181
    rewrite PA4
  2. L182
    rewrite PA4
  3. L183
    rewrite PA4
  4. L184
    rewrite PA4
  5. L185
    rewrite PA4
  6. L186
    rewrite PA4
  7. L187
    rewrite PA4
  8. L188
    rewrite PA4
  9. L189
    rewrite PA4
  10. L190
    rewrite PA4
24Calculate and transport equalitiesL191–200

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

  1. L191
    rewrite PA4
  2. L192
    rewrite PA4
  3. L193
    rewrite PA4
  4. L194
    rewrite PA4
  5. L195
    rewrite PA4
  6. L196
    rewrite PA4
  7. L197
    rewrite PA3
  8. L198
    rewrite PA4
  9. L199
    rewrite PA4
  10. L200
    rewrite PA4
25Calculate and transport equalitiesL201–210

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

  1. L201
    rewrite PA4
  2. L202
    rewrite PA4
  3. L203
    rewrite PA4
  4. L204
    rewrite PA4
  5. L205
    rewrite PA4
  6. L206
    rewrite PA4
  7. L207
    rewrite PA4
  8. L208
    rewrite PA4
  9. L209
    rewrite PA4
  10. L210
    rewrite PA4
26Calculate and transport equalitiesL211–220

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

  1. L211
    rewrite PA4
  2. L212
    rewrite PA4
  3. L213
    rewrite PA4
  4. L214
    rewrite PA4
  5. L215
    rewrite PA4
  6. L216
    rewrite PA4
  7. L217
    rewrite PA4
  8. L218
    rewrite PA4
  9. L219
    rewrite PA4
  10. L220
    rewrite PA4
27Calculate and transport equalitiesL221–230

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

  1. L221
    rewrite PA4
  2. L222
    rewrite PA4
  3. L223
    rewrite PA4
  4. L224
    rewrite PA4
  5. L225
    rewrite PA4
  6. L226
    rewrite PA4
  7. L227
    rewrite PA4
  8. L228
    rewrite PA4
  9. L229
    rewrite PA4
  10. L230
    rewrite PA4
28Calculate and transport equalitiesL231–240

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

  1. L231
    rewrite PA4
  2. L232
    rewrite PA4
  3. L233
    rewrite PA4
  4. L234
    rewrite PA4
  5. L235
    rewrite PA4
  6. L236
    rewrite PA4
  7. L237
    rewrite PA4
  8. L238
    rewrite PA4
  9. L239
    rewrite PA4
  10. L240
    rewrite PA4
29Calculate and transport equalitiesL241–250

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

  1. L241
    rewrite PA4
  2. L242
    rewrite PA4
  3. L243
    rewrite PA4
  4. L244
    rewrite PA4
  5. L245
    rewrite PA4
  6. L246
    rewrite PA4
  7. L247
    rewrite PA4
  8. L248
    rewrite PA4
  9. L249
    rewrite PA4
  10. L250
    rewrite PA4
30Calculate and transport equalitiesL251–260

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

  1. L251
    rewrite PA4
  2. L252
    rewrite PA4
  3. L253
    rewrite PA4
  4. L254
    rewrite PA4
  5. L255
    rewrite PA4
  6. L256
    rewrite PA4
  7. L257
    rewrite PA4
  8. L258
    rewrite PA4
  9. L259
    rewrite PA4
  10. L260
    rewrite PA4
31Calculate and transport equalitiesL261–263

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

  1. L261
    rewrite PA4
  2. L262
    rewrite PA3
  3. L263
    refl
32Separate the logical casesL264–264

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

  1. L264
    split
33Use earlier factsL265–266

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

  1. L265
    exact htwo
  2. L266
    exact hseven

Library-wide reading audit

Original exact command ledger · 266 lines
  1. 0001intro htotal
  2. 0002have htwo_exists : exists x. (exists pa_b_bpt_seed_two_any pa_c_bpt_seed_two_any. ((forall pa_i_bpt_seed_two_any_repeat. (exists pa_lt_bpt_seed_two_any_repeat_bound. pa_lt_bpt_seed_two_any_repeat_bound + S pa_i_bpt_seed_two_any_repeat = 2) -> (((exists pa_h_bpt_seed_two_any_repeat_decoded. pa_h_bpt_seed_two_any_repeat_decoded + S (2) = S ((S (pa_i_bpt_seed_two_any_repeat)) * pa_c_bpt_seed_two_any)) /\ exists pa_q_bpt_seed_two_any_repeat_decoded. pa_b_bpt_seed_two_any = pa_q_bpt_seed_two_any_repeat_decoded * S ((S (pa_i_bpt_seed_two_any_repeat)) * pa_c_bpt_seed_two_any) + (2)))) /\ (exists pa_u_bpt_seed_two_any_product pa_v_bpt_seed_two_any_product. ((((exists pa_h_bpt_seed_two_any_product_start. pa_h_bpt_seed_two_any_product_start + S (1) = S ((S (0)) * pa_v_bpt_seed_two_any_product)) /\ exists pa_q_bpt_seed_two_any_product_start. pa_u_bpt_seed_two_any_product = pa_q_bpt_seed_two_any_product_start * S ((S (0)) * pa_v_bpt_seed_two_any_product) + (1))) /\ ((((exists pa_h_bpt_seed_two_any_product_terminal. pa_h_bpt_seed_two_any_product_terminal + S (x) = S ((S (2)) * pa_v_bpt_seed_two_any_product)) /\ exists pa_q_bpt_seed_two_any_product_terminal. pa_u_bpt_seed_two_any_product = pa_q_bpt_seed_two_any_product_terminal * S ((S (2)) * pa_v_bpt_seed_two_any_product) + (x))) /\ forall pa_i_bpt_seed_two_any_product. (exists pa_lt_bpt_seed_two_any_product_bound. pa_lt_bpt_seed_two_any_product_bound + S pa_i_bpt_seed_two_any_product = 2) -> exists pa_p_bpt_seed_two_any_product pa_r_bpt_seed_two_any_product pa_s_bpt_seed_two_any_product. ((((exists pa_h_bpt_seed_two_any_product_factor. pa_h_bpt_seed_two_any_product_factor + S (pa_p_bpt_seed_two_any_product) = S ((S (pa_i_bpt_seed_two_any_product)) * pa_c_bpt_seed_two_any)) /\ exists pa_q_bpt_seed_two_any_product_factor. pa_b_bpt_seed_two_any = pa_q_bpt_seed_two_any_product_factor * S ((S (pa_i_bpt_seed_two_any_product)) * pa_c_bpt_seed_two_any) + (pa_p_bpt_seed_two_any_product))) /\ ((((exists pa_h_bpt_seed_two_any_product_partial. pa_h_bpt_seed_two_any_product_partial + S (pa_r_bpt_seed_two_any_product) = S ((S (pa_i_bpt_seed_two_any_product)) * pa_v_bpt_seed_two_any_product)) /\ exists pa_q_bpt_seed_two_any_product_partial. pa_u_bpt_seed_two_any_product = pa_q_bpt_seed_two_any_product_partial * S ((S (pa_i_bpt_seed_two_any_product)) * pa_v_bpt_seed_two_any_product) + (pa_r_bpt_seed_two_any_product))) /\ ((((exists pa_h_bpt_seed_two_any_product_successor. pa_h_bpt_seed_two_any_product_successor + S (pa_s_bpt_seed_two_any_product) = S ((S (S pa_i_bpt_seed_two_any_product)) * pa_v_bpt_seed_two_any_product)) /\ exists pa_q_bpt_seed_two_any_product_successor. pa_u_bpt_seed_two_any_product = pa_q_bpt_seed_two_any_product_successor * S ((S (S pa_i_bpt_seed_two_any_product)) * pa_v_bpt_seed_two_any_product) + (pa_s_bpt_seed_two_any_product))) /\ pa_s_bpt_seed_two_any_product = pa_r_bpt_seed_two_any_product * pa_p_bpt_seed_two_any_product))))))))
  3. 0003specialize htotal 2
  4. 0004specialize htotal 2
  5. 0005exact htotal
  6. 0006cases htwo_exists
  7. 0007have htwo_value : x = 4
  8. 0008specialize pow_two_base_two_value_four x
  9. 0009apply pow_two_base_two_value_four
  10. 0010exact htwo_exists_witness
  11. 0011have htwo : exists pa_b_bpt_seed_two pa_c_bpt_seed_two. ((forall pa_i_bpt_seed_two_repeat. (exists pa_lt_bpt_seed_two_repeat_bound. pa_lt_bpt_seed_two_repeat_bound + S pa_i_bpt_seed_two_repeat = 2) -> (((exists pa_h_bpt_seed_two_repeat_decoded. pa_h_bpt_seed_two_repeat_decoded + S (2) = S ((S (pa_i_bpt_seed_two_repeat)) * pa_c_bpt_seed_two)) /\ exists pa_q_bpt_seed_two_repeat_decoded. pa_b_bpt_seed_two = pa_q_bpt_seed_two_repeat_decoded * S ((S (pa_i_bpt_seed_two_repeat)) * pa_c_bpt_seed_two) + (2)))) /\ (exists pa_u_bpt_seed_two_product pa_v_bpt_seed_two_product. ((((exists pa_h_bpt_seed_two_product_start. pa_h_bpt_seed_two_product_start + S (1) = S ((S (0)) * pa_v_bpt_seed_two_product)) /\ exists pa_q_bpt_seed_two_product_start. pa_u_bpt_seed_two_product = pa_q_bpt_seed_two_product_start * S ((S (0)) * pa_v_bpt_seed_two_product) + (1))) /\ ((((exists pa_h_bpt_seed_two_product_terminal. pa_h_bpt_seed_two_product_terminal + S (4) = S ((S (2)) * pa_v_bpt_seed_two_product)) /\ exists pa_q_bpt_seed_two_product_terminal. pa_u_bpt_seed_two_product = pa_q_bpt_seed_two_product_terminal * S ((S (2)) * pa_v_bpt_seed_two_product) + (4))) /\ forall pa_i_bpt_seed_two_product. (exists pa_lt_bpt_seed_two_product_bound. pa_lt_bpt_seed_two_product_bound + S pa_i_bpt_seed_two_product = 2) -> exists pa_p_bpt_seed_two_product pa_r_bpt_seed_two_product pa_s_bpt_seed_two_product. ((((exists pa_h_bpt_seed_two_product_factor. pa_h_bpt_seed_two_product_factor + S (pa_p_bpt_seed_two_product) = S ((S (pa_i_bpt_seed_two_product)) * pa_c_bpt_seed_two)) /\ exists pa_q_bpt_seed_two_product_factor. pa_b_bpt_seed_two = pa_q_bpt_seed_two_product_factor * S ((S (pa_i_bpt_seed_two_product)) * pa_c_bpt_seed_two) + (pa_p_bpt_seed_two_product))) /\ ((((exists pa_h_bpt_seed_two_product_partial. pa_h_bpt_seed_two_product_partial + S (pa_r_bpt_seed_two_product) = S ((S (pa_i_bpt_seed_two_product)) * pa_v_bpt_seed_two_product)) /\ exists pa_q_bpt_seed_two_product_partial. pa_u_bpt_seed_two_product = pa_q_bpt_seed_two_product_partial * S ((S (pa_i_bpt_seed_two_product)) * pa_v_bpt_seed_two_product) + (pa_r_bpt_seed_two_product))) /\ ((((exists pa_h_bpt_seed_two_product_successor. pa_h_bpt_seed_two_product_successor + S (pa_s_bpt_seed_two_product) = S ((S (S pa_i_bpt_seed_two_product)) * pa_v_bpt_seed_two_product)) /\ exists pa_q_bpt_seed_two_product_successor. pa_u_bpt_seed_two_product = pa_q_bpt_seed_two_product_successor * S ((S (S pa_i_bpt_seed_two_product)) * pa_v_bpt_seed_two_product) + (pa_s_bpt_seed_two_product))) /\ pa_s_bpt_seed_two_product = pa_r_bpt_seed_two_product * pa_p_bpt_seed_two_product)))))))
  12. 0012rewrite <- htwo_value
  13. 0013rewrite <- htwo_value
  14. 0014exact htwo_exists_witness
  15. 0015have hthree : exists pa_b_bpt_seed_three pa_c_bpt_seed_three. ((forall pa_i_bpt_seed_three_repeat. (exists pa_lt_bpt_seed_three_repeat_bound. pa_lt_bpt_seed_three_repeat_bound + S pa_i_bpt_seed_three_repeat = 3) -> (((exists pa_h_bpt_seed_three_repeat_decoded. pa_h_bpt_seed_three_repeat_decoded + S (2) = S ((S (pa_i_bpt_seed_three_repeat)) * pa_c_bpt_seed_three)) /\ exists pa_q_bpt_seed_three_repeat_decoded. pa_b_bpt_seed_three = pa_q_bpt_seed_three_repeat_decoded * S ((S (pa_i_bpt_seed_three_repeat)) * pa_c_bpt_seed_three) + (2)))) /\ (exists pa_u_bpt_seed_three_product pa_v_bpt_seed_three_product. ((((exists pa_h_bpt_seed_three_product_start. pa_h_bpt_seed_three_product_start + S (1) = S ((S (0)) * pa_v_bpt_seed_three_product)) /\ exists pa_q_bpt_seed_three_product_start. pa_u_bpt_seed_three_product = pa_q_bpt_seed_three_product_start * S ((S (0)) * pa_v_bpt_seed_three_product) + (1))) /\ ((((exists pa_h_bpt_seed_three_product_terminal. pa_h_bpt_seed_three_product_terminal + S (8) = S ((S (3)) * pa_v_bpt_seed_three_product)) /\ exists pa_q_bpt_seed_three_product_terminal. pa_u_bpt_seed_three_product = pa_q_bpt_seed_three_product_terminal * S ((S (3)) * pa_v_bpt_seed_three_product) + (8))) /\ forall pa_i_bpt_seed_three_product. (exists pa_lt_bpt_seed_three_product_bound. pa_lt_bpt_seed_three_product_bound + S pa_i_bpt_seed_three_product = 3) -> exists pa_p_bpt_seed_three_product pa_r_bpt_seed_three_product pa_s_bpt_seed_three_product. ((((exists pa_h_bpt_seed_three_product_factor. pa_h_bpt_seed_three_product_factor + S (pa_p_bpt_seed_three_product) = S ((S (pa_i_bpt_seed_three_product)) * pa_c_bpt_seed_three)) /\ exists pa_q_bpt_seed_three_product_factor. pa_b_bpt_seed_three = pa_q_bpt_seed_three_product_factor * S ((S (pa_i_bpt_seed_three_product)) * pa_c_bpt_seed_three) + (pa_p_bpt_seed_three_product))) /\ ((((exists pa_h_bpt_seed_three_product_partial. pa_h_bpt_seed_three_product_partial + S (pa_r_bpt_seed_three_product) = S ((S (pa_i_bpt_seed_three_product)) * pa_v_bpt_seed_three_product)) /\ exists pa_q_bpt_seed_three_product_partial. pa_u_bpt_seed_three_product = pa_q_bpt_seed_three_product_partial * S ((S (pa_i_bpt_seed_three_product)) * pa_v_bpt_seed_three_product) + (pa_r_bpt_seed_three_product))) /\ ((((exists pa_h_bpt_seed_three_product_successor. pa_h_bpt_seed_three_product_successor + S (pa_s_bpt_seed_three_product) = S ((S (S pa_i_bpt_seed_three_product)) * pa_v_bpt_seed_three_product)) /\ exists pa_q_bpt_seed_three_product_successor. pa_u_bpt_seed_three_product = pa_q_bpt_seed_three_product_successor * S ((S (S pa_i_bpt_seed_three_product)) * pa_v_bpt_seed_three_product) + (pa_s_bpt_seed_three_product))) /\ pa_s_bpt_seed_three_product = pa_r_bpt_seed_three_product * pa_p_bpt_seed_three_product)))))))
  16. 0016specialize pow_successor_compose_from_total 2
  17. 0017specialize pow_successor_compose_from_total 2
  18. 0018specialize pow_successor_compose_from_total 4
  19. 0019specialize pow_successor_compose_from_total 8
  20. 0020apply pow_successor_compose_from_total
  21. 0021exact htotal
  22. 0022exact htwo
  23. 0023norm_num
  24. 0024have hfour : exists pa_b_bpt_seed_four pa_c_bpt_seed_four. ((forall pa_i_bpt_seed_four_repeat. (exists pa_lt_bpt_seed_four_repeat_bound. pa_lt_bpt_seed_four_repeat_bound + S pa_i_bpt_seed_four_repeat = 4) -> (((exists pa_h_bpt_seed_four_repeat_decoded. pa_h_bpt_seed_four_repeat_decoded + S (2) = S ((S (pa_i_bpt_seed_four_repeat)) * pa_c_bpt_seed_four)) /\ exists pa_q_bpt_seed_four_repeat_decoded. pa_b_bpt_seed_four = pa_q_bpt_seed_four_repeat_decoded * S ((S (pa_i_bpt_seed_four_repeat)) * pa_c_bpt_seed_four) + (2)))) /\ (exists pa_u_bpt_seed_four_product pa_v_bpt_seed_four_product. ((((exists pa_h_bpt_seed_four_product_start. pa_h_bpt_seed_four_product_start + S (1) = S ((S (0)) * pa_v_bpt_seed_four_product)) /\ exists pa_q_bpt_seed_four_product_start. pa_u_bpt_seed_four_product = pa_q_bpt_seed_four_product_start * S ((S (0)) * pa_v_bpt_seed_four_product) + (1))) /\ ((((exists pa_h_bpt_seed_four_product_terminal. pa_h_bpt_seed_four_product_terminal + S (16) = S ((S (4)) * pa_v_bpt_seed_four_product)) /\ exists pa_q_bpt_seed_four_product_terminal. pa_u_bpt_seed_four_product = pa_q_bpt_seed_four_product_terminal * S ((S (4)) * pa_v_bpt_seed_four_product) + (16))) /\ forall pa_i_bpt_seed_four_product. (exists pa_lt_bpt_seed_four_product_bound. pa_lt_bpt_seed_four_product_bound + S pa_i_bpt_seed_four_product = 4) -> exists pa_p_bpt_seed_four_product pa_r_bpt_seed_four_product pa_s_bpt_seed_four_product. ((((exists pa_h_bpt_seed_four_product_factor. pa_h_bpt_seed_four_product_factor + S (pa_p_bpt_seed_four_product) = S ((S (pa_i_bpt_seed_four_product)) * pa_c_bpt_seed_four)) /\ exists pa_q_bpt_seed_four_product_factor. pa_b_bpt_seed_four = pa_q_bpt_seed_four_product_factor * S ((S (pa_i_bpt_seed_four_product)) * pa_c_bpt_seed_four) + (pa_p_bpt_seed_four_product))) /\ ((((exists pa_h_bpt_seed_four_product_partial. pa_h_bpt_seed_four_product_partial + S (pa_r_bpt_seed_four_product) = S ((S (pa_i_bpt_seed_four_product)) * pa_v_bpt_seed_four_product)) /\ exists pa_q_bpt_seed_four_product_partial. pa_u_bpt_seed_four_product = pa_q_bpt_seed_four_product_partial * S ((S (pa_i_bpt_seed_four_product)) * pa_v_bpt_seed_four_product) + (pa_r_bpt_seed_four_product))) /\ ((((exists pa_h_bpt_seed_four_product_successor. pa_h_bpt_seed_four_product_successor + S (pa_s_bpt_seed_four_product) = S ((S (S pa_i_bpt_seed_four_product)) * pa_v_bpt_seed_four_product)) /\ exists pa_q_bpt_seed_four_product_successor. pa_u_bpt_seed_four_product = pa_q_bpt_seed_four_product_successor * S ((S (S pa_i_bpt_seed_four_product)) * pa_v_bpt_seed_four_product) + (pa_s_bpt_seed_four_product))) /\ pa_s_bpt_seed_four_product = pa_r_bpt_seed_four_product * pa_p_bpt_seed_four_product)))))))
  25. 0025specialize pow_successor_compose_from_total 2
  26. 0026specialize pow_successor_compose_from_total 3
  27. 0027specialize pow_successor_compose_from_total 8
  28. 0028specialize pow_successor_compose_from_total 16
  29. 0029apply pow_successor_compose_from_total
  30. 0030exact htotal
  31. 0031exact hthree
  32. 0032norm_num
  33. 0033have hfive : exists pa_b_bpt_seed_five pa_c_bpt_seed_five. ((forall pa_i_bpt_seed_five_repeat. (exists pa_lt_bpt_seed_five_repeat_bound. pa_lt_bpt_seed_five_repeat_bound + S pa_i_bpt_seed_five_repeat = 5) -> (((exists pa_h_bpt_seed_five_repeat_decoded. pa_h_bpt_seed_five_repeat_decoded + S (2) = S ((S (pa_i_bpt_seed_five_repeat)) * pa_c_bpt_seed_five)) /\ exists pa_q_bpt_seed_five_repeat_decoded. pa_b_bpt_seed_five = pa_q_bpt_seed_five_repeat_decoded * S ((S (pa_i_bpt_seed_five_repeat)) * pa_c_bpt_seed_five) + (2)))) /\ (exists pa_u_bpt_seed_five_product pa_v_bpt_seed_five_product. ((((exists pa_h_bpt_seed_five_product_start. pa_h_bpt_seed_five_product_start + S (1) = S ((S (0)) * pa_v_bpt_seed_five_product)) /\ exists pa_q_bpt_seed_five_product_start. pa_u_bpt_seed_five_product = pa_q_bpt_seed_five_product_start * S ((S (0)) * pa_v_bpt_seed_five_product) + (1))) /\ ((((exists pa_h_bpt_seed_five_product_terminal. pa_h_bpt_seed_five_product_terminal + S (32) = S ((S (5)) * pa_v_bpt_seed_five_product)) /\ exists pa_q_bpt_seed_five_product_terminal. pa_u_bpt_seed_five_product = pa_q_bpt_seed_five_product_terminal * S ((S (5)) * pa_v_bpt_seed_five_product) + (32))) /\ forall pa_i_bpt_seed_five_product. (exists pa_lt_bpt_seed_five_product_bound. pa_lt_bpt_seed_five_product_bound + S pa_i_bpt_seed_five_product = 5) -> exists pa_p_bpt_seed_five_product pa_r_bpt_seed_five_product pa_s_bpt_seed_five_product. ((((exists pa_h_bpt_seed_five_product_factor. pa_h_bpt_seed_five_product_factor + S (pa_p_bpt_seed_five_product) = S ((S (pa_i_bpt_seed_five_product)) * pa_c_bpt_seed_five)) /\ exists pa_q_bpt_seed_five_product_factor. pa_b_bpt_seed_five = pa_q_bpt_seed_five_product_factor * S ((S (pa_i_bpt_seed_five_product)) * pa_c_bpt_seed_five) + (pa_p_bpt_seed_five_product))) /\ ((((exists pa_h_bpt_seed_five_product_partial. pa_h_bpt_seed_five_product_partial + S (pa_r_bpt_seed_five_product) = S ((S (pa_i_bpt_seed_five_product)) * pa_v_bpt_seed_five_product)) /\ exists pa_q_bpt_seed_five_product_partial. pa_u_bpt_seed_five_product = pa_q_bpt_seed_five_product_partial * S ((S (pa_i_bpt_seed_five_product)) * pa_v_bpt_seed_five_product) + (pa_r_bpt_seed_five_product))) /\ ((((exists pa_h_bpt_seed_five_product_successor. pa_h_bpt_seed_five_product_successor + S (pa_s_bpt_seed_five_product) = S ((S (S pa_i_bpt_seed_five_product)) * pa_v_bpt_seed_five_product)) /\ exists pa_q_bpt_seed_five_product_successor. pa_u_bpt_seed_five_product = pa_q_bpt_seed_five_product_successor * S ((S (S pa_i_bpt_seed_five_product)) * pa_v_bpt_seed_five_product) + (pa_s_bpt_seed_five_product))) /\ pa_s_bpt_seed_five_product = pa_r_bpt_seed_five_product * pa_p_bpt_seed_five_product)))))))
  34. 0034specialize pow_successor_compose_from_total 2
  35. 0035specialize pow_successor_compose_from_total 4
  36. 0036specialize pow_successor_compose_from_total 16
  37. 0037specialize pow_successor_compose_from_total 32
  38. 0038apply pow_successor_compose_from_total
  39. 0039exact htotal
  40. 0040exact hfour
  41. 0041norm_num
  42. 0042have hsix : exists pa_b_bpt_seed_six pa_c_bpt_seed_six. ((forall pa_i_bpt_seed_six_repeat. (exists pa_lt_bpt_seed_six_repeat_bound. pa_lt_bpt_seed_six_repeat_bound + S pa_i_bpt_seed_six_repeat = 6) -> (((exists pa_h_bpt_seed_six_repeat_decoded. pa_h_bpt_seed_six_repeat_decoded + S (2) = S ((S (pa_i_bpt_seed_six_repeat)) * pa_c_bpt_seed_six)) /\ exists pa_q_bpt_seed_six_repeat_decoded. pa_b_bpt_seed_six = pa_q_bpt_seed_six_repeat_decoded * S ((S (pa_i_bpt_seed_six_repeat)) * pa_c_bpt_seed_six) + (2)))) /\ (exists pa_u_bpt_seed_six_product pa_v_bpt_seed_six_product. ((((exists pa_h_bpt_seed_six_product_start. pa_h_bpt_seed_six_product_start + S (1) = S ((S (0)) * pa_v_bpt_seed_six_product)) /\ exists pa_q_bpt_seed_six_product_start. pa_u_bpt_seed_six_product = pa_q_bpt_seed_six_product_start * S ((S (0)) * pa_v_bpt_seed_six_product) + (1))) /\ ((((exists pa_h_bpt_seed_six_product_terminal. pa_h_bpt_seed_six_product_terminal + S (64) = S ((S (6)) * pa_v_bpt_seed_six_product)) /\ exists pa_q_bpt_seed_six_product_terminal. pa_u_bpt_seed_six_product = pa_q_bpt_seed_six_product_terminal * S ((S (6)) * pa_v_bpt_seed_six_product) + (64))) /\ forall pa_i_bpt_seed_six_product. (exists pa_lt_bpt_seed_six_product_bound. pa_lt_bpt_seed_six_product_bound + S pa_i_bpt_seed_six_product = 6) -> exists pa_p_bpt_seed_six_product pa_r_bpt_seed_six_product pa_s_bpt_seed_six_product. ((((exists pa_h_bpt_seed_six_product_factor. pa_h_bpt_seed_six_product_factor + S (pa_p_bpt_seed_six_product) = S ((S (pa_i_bpt_seed_six_product)) * pa_c_bpt_seed_six)) /\ exists pa_q_bpt_seed_six_product_factor. pa_b_bpt_seed_six = pa_q_bpt_seed_six_product_factor * S ((S (pa_i_bpt_seed_six_product)) * pa_c_bpt_seed_six) + (pa_p_bpt_seed_six_product))) /\ ((((exists pa_h_bpt_seed_six_product_partial. pa_h_bpt_seed_six_product_partial + S (pa_r_bpt_seed_six_product) = S ((S (pa_i_bpt_seed_six_product)) * pa_v_bpt_seed_six_product)) /\ exists pa_q_bpt_seed_six_product_partial. pa_u_bpt_seed_six_product = pa_q_bpt_seed_six_product_partial * S ((S (pa_i_bpt_seed_six_product)) * pa_v_bpt_seed_six_product) + (pa_r_bpt_seed_six_product))) /\ ((((exists pa_h_bpt_seed_six_product_successor. pa_h_bpt_seed_six_product_successor + S (pa_s_bpt_seed_six_product) = S ((S (S pa_i_bpt_seed_six_product)) * pa_v_bpt_seed_six_product)) /\ exists pa_q_bpt_seed_six_product_successor. pa_u_bpt_seed_six_product = pa_q_bpt_seed_six_product_successor * S ((S (S pa_i_bpt_seed_six_product)) * pa_v_bpt_seed_six_product) + (pa_s_bpt_seed_six_product))) /\ pa_s_bpt_seed_six_product = pa_r_bpt_seed_six_product * pa_p_bpt_seed_six_product)))))))
  43. 0043specialize pow_successor_compose_from_total 2
  44. 0044specialize pow_successor_compose_from_total 5
  45. 0045specialize pow_successor_compose_from_total 32
  46. 0046specialize pow_successor_compose_from_total 64
  47. 0047apply pow_successor_compose_from_total
  48. 0048exact htotal
  49. 0049exact hfive
  50. 0050symm
  51. 0051rewrite PA6
  52. 0052rewrite PA6
  53. 0053rewrite PA5
  54. 0054rewrite PA4
  55. 0055rewrite PA4
  56. 0056rewrite PA4
  57. 0057rewrite PA4
  58. 0058rewrite PA4
  59. 0059rewrite PA4
  60. 0060rewrite PA4
  61. 0061rewrite PA4
  62. 0062rewrite PA4
  63. 0063rewrite PA4
  64. 0064rewrite PA4
  65. 0065rewrite PA4
  66. 0066rewrite PA4
  67. 0067rewrite PA4
  68. 0068rewrite PA4
  69. 0069rewrite PA4
  70. 0070rewrite PA4
  71. 0071rewrite PA4
  72. 0072rewrite PA4
  73. 0073rewrite PA4
  74. 0074rewrite PA4
  75. 0075rewrite PA4
  76. 0076rewrite PA4
  77. 0077rewrite PA4
  78. 0078rewrite PA4
  79. 0079rewrite PA4
  80. 0080rewrite PA4
  81. 0081rewrite PA4
  82. 0082rewrite PA4
  83. 0083rewrite PA4
  84. 0084rewrite PA4
  85. 0085rewrite PA4
  86. 0086rewrite PA3
  87. 0087rewrite PA4
  88. 0088rewrite PA4
  89. 0089rewrite PA4
  90. 0090rewrite PA4
  91. 0091rewrite PA4
  92. 0092rewrite PA4
  93. 0093rewrite PA4
  94. 0094rewrite PA4
  95. 0095rewrite PA4
  96. 0096rewrite PA4
  97. 0097rewrite PA4
  98. 0098rewrite PA4
  99. 0099rewrite PA4
  100. 0100rewrite PA4
  101. 0101rewrite PA4
  102. 0102rewrite PA4
  103. 0103rewrite PA4
  104. 0104rewrite PA4
  105. 0105rewrite PA4
  106. 0106rewrite PA4
  107. 0107rewrite PA4
  108. 0108rewrite PA4
  109. 0109rewrite PA4
  110. 0110rewrite PA4
  111. 0111rewrite PA4
  112. 0112rewrite PA4
  113. 0113rewrite PA4
  114. 0114rewrite PA4
  115. 0115rewrite PA4
  116. 0116rewrite PA4
  117. 0117rewrite PA4
  118. 0118rewrite PA4
  119. 0119rewrite PA3
  120. 0120refl
  121. 0121have hseven : exists pa_b_bpt_seed_seven pa_c_bpt_seed_seven. ((forall pa_i_bpt_seed_seven_repeat. (exists pa_lt_bpt_seed_seven_repeat_bound. pa_lt_bpt_seed_seven_repeat_bound + S pa_i_bpt_seed_seven_repeat = 7) -> (((exists pa_h_bpt_seed_seven_repeat_decoded. pa_h_bpt_seed_seven_repeat_decoded + S (2) = S ((S (pa_i_bpt_seed_seven_repeat)) * pa_c_bpt_seed_seven)) /\ exists pa_q_bpt_seed_seven_repeat_decoded. pa_b_bpt_seed_seven = pa_q_bpt_seed_seven_repeat_decoded * S ((S (pa_i_bpt_seed_seven_repeat)) * pa_c_bpt_seed_seven) + (2)))) /\ (exists pa_u_bpt_seed_seven_product pa_v_bpt_seed_seven_product. ((((exists pa_h_bpt_seed_seven_product_start. pa_h_bpt_seed_seven_product_start + S (1) = S ((S (0)) * pa_v_bpt_seed_seven_product)) /\ exists pa_q_bpt_seed_seven_product_start. pa_u_bpt_seed_seven_product = pa_q_bpt_seed_seven_product_start * S ((S (0)) * pa_v_bpt_seed_seven_product) + (1))) /\ ((((exists pa_h_bpt_seed_seven_product_terminal. pa_h_bpt_seed_seven_product_terminal + S (128) = S ((S (7)) * pa_v_bpt_seed_seven_product)) /\ exists pa_q_bpt_seed_seven_product_terminal. pa_u_bpt_seed_seven_product = pa_q_bpt_seed_seven_product_terminal * S ((S (7)) * pa_v_bpt_seed_seven_product) + (128))) /\ forall pa_i_bpt_seed_seven_product. (exists pa_lt_bpt_seed_seven_product_bound. pa_lt_bpt_seed_seven_product_bound + S pa_i_bpt_seed_seven_product = 7) -> exists pa_p_bpt_seed_seven_product pa_r_bpt_seed_seven_product pa_s_bpt_seed_seven_product. ((((exists pa_h_bpt_seed_seven_product_factor. pa_h_bpt_seed_seven_product_factor + S (pa_p_bpt_seed_seven_product) = S ((S (pa_i_bpt_seed_seven_product)) * pa_c_bpt_seed_seven)) /\ exists pa_q_bpt_seed_seven_product_factor. pa_b_bpt_seed_seven = pa_q_bpt_seed_seven_product_factor * S ((S (pa_i_bpt_seed_seven_product)) * pa_c_bpt_seed_seven) + (pa_p_bpt_seed_seven_product))) /\ ((((exists pa_h_bpt_seed_seven_product_partial. pa_h_bpt_seed_seven_product_partial + S (pa_r_bpt_seed_seven_product) = S ((S (pa_i_bpt_seed_seven_product)) * pa_v_bpt_seed_seven_product)) /\ exists pa_q_bpt_seed_seven_product_partial. pa_u_bpt_seed_seven_product = pa_q_bpt_seed_seven_product_partial * S ((S (pa_i_bpt_seed_seven_product)) * pa_v_bpt_seed_seven_product) + (pa_r_bpt_seed_seven_product))) /\ ((((exists pa_h_bpt_seed_seven_product_successor. pa_h_bpt_seed_seven_product_successor + S (pa_s_bpt_seed_seven_product) = S ((S (S pa_i_bpt_seed_seven_product)) * pa_v_bpt_seed_seven_product)) /\ exists pa_q_bpt_seed_seven_product_successor. pa_u_bpt_seed_seven_product = pa_q_bpt_seed_seven_product_successor * S ((S (S pa_i_bpt_seed_seven_product)) * pa_v_bpt_seed_seven_product) + (pa_s_bpt_seed_seven_product))) /\ pa_s_bpt_seed_seven_product = pa_r_bpt_seed_seven_product * pa_p_bpt_seed_seven_product)))))))
  122. 0122specialize pow_successor_compose_from_total 2
  123. 0123specialize pow_successor_compose_from_total 6
  124. 0124specialize pow_successor_compose_from_total 64
  125. 0125specialize pow_successor_compose_from_total 128
  126. 0126apply pow_successor_compose_from_total
  127. 0127exact htotal
  128. 0128exact hsix
  129. 0129symm
  130. 0130rewrite PA6
  131. 0131rewrite PA6
  132. 0132rewrite PA5
  133. 0133rewrite PA4
  134. 0134rewrite PA4
  135. 0135rewrite PA4
  136. 0136rewrite PA4
  137. 0137rewrite PA4
  138. 0138rewrite PA4
  139. 0139rewrite PA4
  140. 0140rewrite PA4
  141. 0141rewrite PA4
  142. 0142rewrite PA4
  143. 0143rewrite PA4
  144. 0144rewrite PA4
  145. 0145rewrite PA4
  146. 0146rewrite PA4
  147. 0147rewrite PA4
  148. 0148rewrite PA4
  149. 0149rewrite PA4
  150. 0150rewrite PA4
  151. 0151rewrite PA4
  152. 0152rewrite PA4
  153. 0153rewrite PA4
  154. 0154rewrite PA4
  155. 0155rewrite PA4
  156. 0156rewrite PA4
  157. 0157rewrite PA4
  158. 0158rewrite PA4
  159. 0159rewrite PA4
  160. 0160rewrite PA4
  161. 0161rewrite PA4
  162. 0162rewrite PA4
  163. 0163rewrite PA4
  164. 0164rewrite PA4
  165. 0165rewrite PA4
  166. 0166rewrite PA4
  167. 0167rewrite PA4
  168. 0168rewrite PA4
  169. 0169rewrite PA4
  170. 0170rewrite PA4
  171. 0171rewrite PA4
  172. 0172rewrite PA4
  173. 0173rewrite PA4
  174. 0174rewrite PA4
  175. 0175rewrite PA4
  176. 0176rewrite PA4
  177. 0177rewrite PA4
  178. 0178rewrite PA4
  179. 0179rewrite PA4
  180. 0180rewrite PA4
  181. 0181rewrite PA4
  182. 0182rewrite PA4
  183. 0183rewrite PA4
  184. 0184rewrite PA4
  185. 0185rewrite PA4
  186. 0186rewrite PA4
  187. 0187rewrite PA4
  188. 0188rewrite PA4
  189. 0189rewrite PA4
  190. 0190rewrite PA4
  191. 0191rewrite PA4
  192. 0192rewrite PA4
  193. 0193rewrite PA4
  194. 0194rewrite PA4
  195. 0195rewrite PA4
  196. 0196rewrite PA4
  197. 0197rewrite PA3
  198. 0198rewrite PA4
  199. 0199rewrite PA4
  200. 0200rewrite PA4
  201. 0201rewrite PA4
  202. 0202rewrite PA4
  203. 0203rewrite PA4
  204. 0204rewrite PA4
  205. 0205rewrite PA4
  206. 0206rewrite PA4
  207. 0207rewrite PA4
  208. 0208rewrite PA4
  209. 0209rewrite PA4
  210. 0210rewrite PA4
  211. 0211rewrite PA4
  212. 0212rewrite PA4
  213. 0213rewrite PA4
  214. 0214rewrite PA4
  215. 0215rewrite PA4
  216. 0216rewrite PA4
  217. 0217rewrite PA4
  218. 0218rewrite PA4
  219. 0219rewrite PA4
  220. 0220rewrite PA4
  221. 0221rewrite PA4
  222. 0222rewrite PA4
  223. 0223rewrite PA4
  224. 0224rewrite PA4
  225. 0225rewrite PA4
  226. 0226rewrite PA4
  227. 0227rewrite PA4
  228. 0228rewrite PA4
  229. 0229rewrite PA4
  230. 0230rewrite PA4
  231. 0231rewrite PA4
  232. 0232rewrite PA4
  233. 0233rewrite PA4
  234. 0234rewrite PA4
  235. 0235rewrite PA4
  236. 0236rewrite PA4
  237. 0237rewrite PA4
  238. 0238rewrite PA4
  239. 0239rewrite PA4
  240. 0240rewrite PA4
  241. 0241rewrite PA4
  242. 0242rewrite PA4
  243. 0243rewrite PA4
  244. 0244rewrite PA4
  245. 0245rewrite PA4
  246. 0246rewrite PA4
  247. 0247rewrite PA4
  248. 0248rewrite PA4
  249. 0249rewrite PA4
  250. 0250rewrite PA4
  251. 0251rewrite PA4
  252. 0252rewrite PA4
  253. 0253rewrite PA4
  254. 0254rewrite PA4
  255. 0255rewrite PA4
  256. 0256rewrite PA4
  257. 0257rewrite PA4
  258. 0258rewrite PA4
  259. 0259rewrite PA4
  260. 0260rewrite PA4
  261. 0261rewrite PA4
  262. 0262rewrite PA3
  263. 0263refl
  264. 0264split
  265. 0265exact htwo
  266. 0266exact hseven