PA007H

beta_sign_factor_prefix_drop_last

Alpha v34 checked-use theorem · independently closed; not Stable

Dropping the final position preserves the bit-to-sign-factor relation.

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 sb sc fb fc r l. (forall gspf_index_drop_successor gspf_bit_drop_successor. (exists gsp_lt_gap_drop_successor_bound. gsp_lt_gap_drop_successor_bound + S gspf_index_drop_successor = S l) -> (((exists ff_h_gspf_drop_successor_bit. ff_h_gspf_drop_successor_bit + S (gspf_bit_drop_successor) = S ((S (gspf_index_drop_successor)) * sc)) /\ exists ff_q_gspf_drop_successor_bit. sb = ff_q_gspf_drop_successor_bit * S ((S (gspf_index_drop_successor)) * sc) + (gspf_bit_drop_successor))) -> (((gspf_bit_drop_successor = 0) /\ (((exists gsp_beta_height_gspf_drop_successor_one. gsp_beta_height_gspf_drop_successor_one + S (1) = S ((S (gspf_index_drop_successor)) * fc)) /\ exists gsp_beta_quotient_gspf_drop_successor_one. fb = gsp_beta_quotient_gspf_drop_successor_one * S ((S (gspf_index_drop_successor)) * fc) + (1)))) \/ ((gspf_bit_drop_successor = 1) /\ (((exists ff_h_gspf_drop_successor_predecessor. ff_h_gspf_drop_successor_predecessor + S (r) = S ((S (gspf_index_drop_successor)) * fc)) /\ exists ff_q_gspf_drop_successor_predecessor. fb = ff_q_gspf_drop_successor_predecessor * S ((S (gspf_index_drop_successor)) * fc) + (r)))))) -> (forall gspf_index_drop_prefix gspf_bit_drop_prefix. (exists gsp_lt_gap_drop_prefix_bound. gsp_lt_gap_drop_prefix_bound + S gspf_index_drop_prefix = l) -> (((exists ff_h_gspf_drop_prefix_bit. ff_h_gspf_drop_prefix_bit + S (gspf_bit_drop_prefix) = S ((S (gspf_index_drop_prefix)) * sc)) /\ exists ff_q_gspf_drop_prefix_bit. sb = ff_q_gspf_drop_prefix_bit * S ((S (gspf_index_drop_prefix)) * sc) + (gspf_bit_drop_prefix))) -> (((gspf_bit_drop_prefix = 0) /\ (((exists gsp_beta_height_gspf_drop_prefix_one. gsp_beta_height_gspf_drop_prefix_one + S (1) = S ((S (gspf_index_drop_prefix)) * fc)) /\ exists gsp_beta_quotient_gspf_drop_prefix_one. fb = gsp_beta_quotient_gspf_drop_prefix_one * S ((S (gspf_index_drop_prefix)) * fc) + (1)))) \/ ((gspf_bit_drop_prefix = 1) /\ (((exists ff_h_gspf_drop_prefix_predecessor. ff_h_gspf_drop_prefix_predecessor + S (r) = S ((S (gspf_index_drop_prefix)) * fc)) /\ exists ff_q_gspf_drop_prefix_predecessor. fb = ff_q_gspf_drop_prefix_predecessor * S ((S (gspf_index_drop_prefix)) * fc) + (r))))))

Structural proof guide

Generated structural guide

Dropping the final position preserves the bit-to-sign-factor relation.

Use the direct prerequisites le_succ as previously established PA formulas.

The proof proceeds by direct introduction and elimination.

Referenced ingredients

Proof neighborhood

Direct dependencies

Direct dependents

Formal native tactic body

Dependencies are introduced as named hypotheses before line 1. Linked names are exact direct references. This Alpha-v25 checked-use theorem is independently kernel-checked when replayed; it is not a Stable theorem.

Read the argument

Proof checkpoints

19 script commands · 3 reading checkpoints · 0 local claims

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

Named ingredients (1)
01Fix variables and assumptionsL1–10

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

  1. L1
    intro sb
  2. L2
    intro sc
  3. L3
    intro fb
  4. L4
    intro fc
  5. L5
    intro r
  6. L6
    intro l
  7. L7
    intro hsigns
  8. L8
    intro i
  9. L9
    intro a
  10. L10
    intro hi
02Fix variables and assumptionsL11–11

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

  1. L11
    intro ha
03Use earlier factsL12–19

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

  1. L12
    specialize hsigns i
  2. L13
    specialize hsigns a
  3. L14
    apply hsigns
  4. L15
    specialize le_succ (S i)
  5. L16
    specialize le_succ l
  6. L17
    apply le_succ
  7. L18
    exact hi
  8. L19
    exact ha

Library-wide reading audit

Original exact command ledger · 19 lines
  1. 0001intro sb
  2. 0002intro sc
  3. 0003intro fb
  4. 0004intro fc
  5. 0005intro r
  6. 0006intro l
  7. 0007intro hsigns
  8. 0008intro i
  9. 0009intro a
  10. 0010intro hi
  11. 0011intro ha
  12. 0012specialize hsigns i
  13. 0013specialize hsigns a
  14. 0014apply hsigns
  15. 0015specialize le_succ (S i)
  16. 0016specialize le_succ l
  17. 0017apply le_succ
  18. 0018exact hi
  19. 0019exact ha