ZS0003

signed_zero_window_raise_lower

Raise the lower endpoint of a zero window, retaining its actual pointwise meaning.

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

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

The zero window is half-open and its order hypothesis is essential. All folds retain actual beta-coded traces. These are support lemmas for the separately verified full inversion endpoint.

Exact theorem in conservative defined notation

∀ F. ∀ k. ∀ K. ∀ l. Le(k,K) → SignedZeroWindow(F,k,l) → SignedZeroWindow(F,K,l)

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

Definition DAG

SignedZeroWindow(F,k,l) · 2Le(a,b) · 1

Actual proof prerequisites

le_trans · checked external prerequisite
Original expanded first-order statement 
forall F k K l. (exists pvs_le_gap_raise_bound. pvs_le_gap_raise_bound + (k) = (K)) -> (forall sfs_index_raise_source sfs_value_raise_source. (exists pvs_le_gap_raise_sourcelower. pvs_le_gap_raise_sourcelower + (k) = (sfs_index_raise_source)) -> (exists pvs_gap_raise_sourceupper. pvs_gap_raise_sourceupper + S (sfs_index_raise_source) = (l)) -> (exists dst_positive_code_raise_sourceentry dst_positive_scale_raise_sourceentry dst_negative_code_raise_sourceentry dst_negative_scale_raise_sourceentry dst_positive_raise_sourceentry dst_negative_raise_sourceentry. (((F) = (((((dst_positive_code_raise_sourceentry) + (dst_positive_scale_raise_sourceentry)) * S ((dst_positive_code_raise_sourceentry) + (dst_positive_scale_raise_sourceentry)) + ((dst_positive_scale_raise_sourceentry) + (dst_positive_scale_raise_sourceentry))) + (((dst_negative_code_raise_sourceentry) + (dst_negative_scale_raise_sourceentry)) * S ((dst_negative_code_raise_sourceentry) + (dst_negative_scale_raise_sourceentry)) + ((dst_negative_scale_raise_sourceentry) + (dst_negative_scale_raise_sourceentry)))) * S ((((dst_positive_code_raise_sourceentry) + (dst_positive_scale_raise_sourceentry)) * S ((dst_positive_code_raise_sourceentry) + (dst_positive_scale_raise_sourceentry)) + ((dst_positive_scale_raise_sourceentry) + (dst_positive_scale_raise_sourceentry))) + (((dst_negative_code_raise_sourceentry) + (dst_negative_scale_raise_sourceentry)) * S ((dst_negative_code_raise_sourceentry) + (dst_negative_scale_raise_sourceentry)) + ((dst_negative_scale_raise_sourceentry) + (dst_negative_scale_raise_sourceentry)))) + ((((dst_negative_code_raise_sourceentry) + (dst_negative_scale_raise_sourceentry)) * S ((dst_negative_code_raise_sourceentry) + (dst_negative_scale_raise_sourceentry)) + ((dst_negative_scale_raise_sourceentry) + (dst_negative_scale_raise_sourceentry))) + (((dst_negative_code_raise_sourceentry) + (dst_negative_scale_raise_sourceentry)) * S ((dst_negative_code_raise_sourceentry) + (dst_negative_scale_raise_sourceentry)) + ((dst_negative_scale_raise_sourceentry) + (dst_negative_scale_raise_sourceentry)))))) /\ (((((exists ff_h_pvs_raise_sourceentrypositive. ff_h_pvs_raise_sourceentrypositive + S (dst_positive_raise_sourceentry) = S ((S (sfs_index_raise_source)) * dst_positive_scale_raise_sourceentry)) /\ exists ff_q_pvs_raise_sourceentrypositive. dst_positive_code_raise_sourceentry = ff_q_pvs_raise_sourceentrypositive * S ((S (sfs_index_raise_source)) * dst_positive_scale_raise_sourceentry) + (dst_positive_raise_sourceentry))) /\ (((((exists ff_h_pvs_raise_sourceentrynegative. ff_h_pvs_raise_sourceentrynegative + S (dst_negative_raise_sourceentry) = S ((S (sfs_index_raise_source)) * dst_negative_scale_raise_sourceentry)) /\ exists ff_q_pvs_raise_sourceentrynegative. dst_negative_code_raise_sourceentry = ff_q_pvs_raise_sourceentrynegative * S ((S (sfs_index_raise_source)) * dst_negative_scale_raise_sourceentry) + (dst_negative_raise_sourceentry))) /\ (exists ge_balance_positive_raise_sourceentryvalue ge_balance_negative_raise_sourceentryvalue. (((((sfs_value_raise_source) = 2 * (ge_balance_positive_raise_sourceentryvalue) /\ (ge_balance_negative_raise_sourceentryvalue) = 0) \/ exists ge_signed_half_raise_sourceentryvaluedecode. (((sfs_value_raise_source) = 2 * ge_signed_half_raise_sourceentryvaluedecode + 1 /\ (ge_balance_positive_raise_sourceentryvalue) = 0) /\ (ge_balance_negative_raise_sourceentryvalue) = S ge_signed_half_raise_sourceentryvaluedecode))) /\ ((dst_positive_raise_sourceentry) + ge_balance_negative_raise_sourceentryvalue = (dst_negative_raise_sourceentry) + ge_balance_positive_raise_sourceentryvalue))))))))) -> sfs_value_raise_source=0) -> (forall sfs_index_raise_result sfs_value_raise_result. (exists pvs_le_gap_raise_resultlower. pvs_le_gap_raise_resultlower + (K) = (sfs_index_raise_result)) -> (exists pvs_gap_raise_resultupper. pvs_gap_raise_resultupper + S (sfs_index_raise_result) = (l)) -> (exists dst_positive_code_raise_resultentry dst_positive_scale_raise_resultentry dst_negative_code_raise_resultentry dst_negative_scale_raise_resultentry dst_positive_raise_resultentry dst_negative_raise_resultentry. (((F) = (((((dst_positive_code_raise_resultentry) + (dst_positive_scale_raise_resultentry)) * S ((dst_positive_code_raise_resultentry) + (dst_positive_scale_raise_resultentry)) + ((dst_positive_scale_raise_resultentry) + (dst_positive_scale_raise_resultentry))) + (((dst_negative_code_raise_resultentry) + (dst_negative_scale_raise_resultentry)) * S ((dst_negative_code_raise_resultentry) + (dst_negative_scale_raise_resultentry)) + ((dst_negative_scale_raise_resultentry) + (dst_negative_scale_raise_resultentry)))) * S ((((dst_positive_code_raise_resultentry) + (dst_positive_scale_raise_resultentry)) * S ((dst_positive_code_raise_resultentry) + (dst_positive_scale_raise_resultentry)) + ((dst_positive_scale_raise_resultentry) + (dst_positive_scale_raise_resultentry))) + (((dst_negative_code_raise_resultentry) + (dst_negative_scale_raise_resultentry)) * S ((dst_negative_code_raise_resultentry) + (dst_negative_scale_raise_resultentry)) + ((dst_negative_scale_raise_resultentry) + (dst_negative_scale_raise_resultentry)))) + ((((dst_negative_code_raise_resultentry) + (dst_negative_scale_raise_resultentry)) * S ((dst_negative_code_raise_resultentry) + (dst_negative_scale_raise_resultentry)) + ((dst_negative_scale_raise_resultentry) + (dst_negative_scale_raise_resultentry))) + (((dst_negative_code_raise_resultentry) + (dst_negative_scale_raise_resultentry)) * S ((dst_negative_code_raise_resultentry) + (dst_negative_scale_raise_resultentry)) + ((dst_negative_scale_raise_resultentry) + (dst_negative_scale_raise_resultentry)))))) /\ (((((exists ff_h_pvs_raise_resultentrypositive. ff_h_pvs_raise_resultentrypositive + S (dst_positive_raise_resultentry) = S ((S (sfs_index_raise_result)) * dst_positive_scale_raise_resultentry)) /\ exists ff_q_pvs_raise_resultentrypositive. dst_positive_code_raise_resultentry = ff_q_pvs_raise_resultentrypositive * S ((S (sfs_index_raise_result)) * dst_positive_scale_raise_resultentry) + (dst_positive_raise_resultentry))) /\ (((((exists ff_h_pvs_raise_resultentrynegative. ff_h_pvs_raise_resultentrynegative + S (dst_negative_raise_resultentry) = S ((S (sfs_index_raise_result)) * dst_negative_scale_raise_resultentry)) /\ exists ff_q_pvs_raise_resultentrynegative. dst_negative_code_raise_resultentry = ff_q_pvs_raise_resultentrynegative * S ((S (sfs_index_raise_result)) * dst_negative_scale_raise_resultentry) + (dst_negative_raise_resultentry))) /\ (exists ge_balance_positive_raise_resultentryvalue ge_balance_negative_raise_resultentryvalue. (((((sfs_value_raise_result) = 2 * (ge_balance_positive_raise_resultentryvalue) /\ (ge_balance_negative_raise_resultentryvalue) = 0) \/ exists ge_signed_half_raise_resultentryvaluedecode. (((sfs_value_raise_result) = 2 * ge_signed_half_raise_resultentryvaluedecode + 1 /\ (ge_balance_positive_raise_resultentryvalue) = 0) /\ (ge_balance_negative_raise_resultentryvalue) = S ge_signed_half_raise_resultentryvaluedecode))) /\ ((dst_positive_raise_resultentry) + ge_balance_negative_raise_resultentryvalue = (dst_negative_raise_resultentry) + ge_balance_positive_raise_resultentryvalue))))))))) -> sfs_value_raise_result=0)

Complete tactic proof in conservative notation

All 22 original proof lines are preserved. Only local proposition formulas are abbreviated; every abbreviation has an exact binder-safe expansion check. The linked exact edition contains the unchanged replay script.

Read the argument

Proof checkpoints

22 script commands · 4 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.

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

01Fix variables and assumptionsL1–10

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

  1. L1
    intro F
  2. L2
    intro k
  3. L3
    intro K
  4. L4
    intro l
  5. L5
    intro hk
  6. L6
    intro hz
  7. L7
    intro i
  8. L8
    intro z
  9. L9
    intro hKi
  10. L10
    intro hil
02Fix variables and assumptionsL11–11

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

  1. L11
    intro hi
03Use earlier factsL12–21

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

  1. L12
    specialize hz (i)
  2. L13
    specialize hz (z)
  3. L14
    apply hz
  4. L15
    specialize le_trans (k)
  5. L16
    specialize le_trans (K)
  6. L17
    specialize le_trans (i)
  7. L18
    apply le_trans
  8. L19
    exact hk
  9. L20
    exact hKi
  10. L21
    exact hil
04Use earlier factsL22–22

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

  1. L22
    exact hi

Library-wide reading audit

Original defined command ledger · 22 lines
  1. 0001intro F
  2. 0002intro k
  3. 0003intro K
  4. 0004intro l
  5. 0005intro hk
  6. 0006intro hz
  7. 0007intro i
  8. 0008intro z
  9. 0009intro hKi
  10. 0010intro hil
  11. 0011intro hi
  12. 0012specialize hz (i)
  13. 0013specialize hz (z)
  14. 0014apply hz
  15. 0015specialize le_trans (k)
  16. 0016specialize le_trans (K)
  17. 0017specialize le_trans (i)
  18. 0018apply le_trans
  19. 0019exact hk
  20. 0020exact hKi
  21. 0021exact hil
  22. 0022exact hi