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. ∀ l. ∀ a. ∀ z. SignedZeroWindow(F,0,l) → ArithAt(F,l,a) → SignedPrefixSum(F,S l,z) → z = a
Every linked abbreviation expands hygienically to the identical original native formula.
Definition DAG
Actual proof prerequisites
Complete tactic proof in conservative notation
All 44 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
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–7
02Establish hdL8–13
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply divisor signed sum successor decompose.
- L8
have hd : ∃ u. ∃ v. SignedPrefixSum(F,l,u) ∧ (ArithAt(F,l,v) ∧ SignedAdd(u,v,z))Definitions: SignedPrefixSum(F,l,u)ArithAt(F,l,v)SignedAdd(u,v,z)Original native command in the exact edition - L9
specialize divisor_signed_sum_successor_decompose (F) - L10
specialize divisor_signed_sum_successor_decompose (l) - L11
specialize divisor_signed_sum_successor_decompose (z) - L12
apply divisor_signed_sum_successor_decompose - L13
exact hs
03Separate the logical casesL14–17
04Establish hpL18–24
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply signed prefix sum zero value.
05Establish heL25–34
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply divisor signed table at functional.
- L25
have he : x1=a - L26
specialize divisor_signed_table_at_functional (F) - L27
specialize divisor_signed_table_at_functional (l) - L28
specialize divisor_signed_table_at_functional (x1) - L29
specialize divisor_signed_table_at_functional (a) - L30
apply divisor_signed_table_at_functional - L31
exact hd_witness_witness_right_left - L32
exact ha - L33
rewrite hp at hd_witness_witness_right_right - L34
rewrite hp at hd_witness_witness_right_right
06Calculate and transport equalitiesL35–36
07Use earlier factsL37–44
Instantiate or apply named facts and discharge the corresponding proof obligations.
Original defined command ledger · 44 lines
- 0001
intro F - 0002
intro l - 0003
intro a - 0004
intro z - 0005
intro hz - 0006
intro ha - 0007
intro hs - 0008
have hd : ∃ u. ∃ v. SignedPrefixSum(F,l,u) ∧ (ArithAt(F,l,v) ∧ SignedAdd(u,v,z)) - 0009
specialize divisor_signed_sum_successor_decompose (F) - 0010
specialize divisor_signed_sum_successor_decompose (l) - 0011
specialize divisor_signed_sum_successor_decompose (z) - 0012
apply divisor_signed_sum_successor_decompose - 0013
exact hs - 0014
cases hd - 0015
cases hd_witness - 0016
cases hd_witness_witness - 0017
cases hd_witness_witness_right - 0018
have hp : x=0 - 0019
specialize signed_prefix_sum_zero_value (F) - 0020
specialize signed_prefix_sum_zero_value (l) - 0021
specialize signed_prefix_sum_zero_value (x) - 0022
apply signed_prefix_sum_zero_value - 0023
exact hz - 0024
exact hd_witness_witness_left - 0025
have he : x1=a - 0026
specialize divisor_signed_table_at_functional (F) - 0027
specialize divisor_signed_table_at_functional (l) - 0028
specialize divisor_signed_table_at_functional (x1) - 0029
specialize divisor_signed_table_at_functional (a) - 0030
apply divisor_signed_table_at_functional - 0031
exact hd_witness_witness_right_left - 0032
exact ha - 0033
rewrite hp at hd_witness_witness_right_right - 0034
rewrite hp at hd_witness_witness_right_right - 0035
rewrite he at hd_witness_witness_right_right - 0036
rewrite he at hd_witness_witness_right_right - 0037
specialize signed_add_functional (0) - 0038
specialize signed_add_functional (a) - 0039
specialize signed_add_functional (z) - 0040
specialize signed_add_functional (a) - 0041
apply signed_add_functional - 0042
exact hd_witness_witness_right_right - 0043
specialize signed_add_zero_left (a) - 0044
apply signed_add_zero_left