Exact expanded first-order arithmetic statement
forall b c k i a. (forall jt_index_unit_tuple. (exists jt_gap_unit_tupleindex. jt_gap_unit_tupleindex+S (jt_index_unit_tuple)=(k)) -> exists jt_value_unit_tuple. ((((exists fs_h_jt_unit_tupleat. fs_h_jt_unit_tupleat + S (jt_value_unit_tuple) = S ((S (jt_index_unit_tuple)) * c)) /\ exists fs_q_jt_unit_tupleat. b = fs_q_jt_unit_tupleat * S ((S (jt_index_unit_tuple)) * c) + (jt_value_unit_tuple))) /\ (exists jt_gap_unit_tuplevalue. jt_gap_unit_tuplevalue+S (jt_value_unit_tuple)=(1)))) -> (exists jt_gap_unit_index. jt_gap_unit_index+S (i)=(k)) -> (((exists fs_h_jt_unit_entry. fs_h_jt_unit_entry + S (a) = S ((S (i)) * c)) /\ exists fs_q_jt_unit_entry. b = fs_q_jt_unit_entry * S ((S (i)) * c) + (a))) -> (a=0)Constructive proof overview
Generated structural guide
Every decoded coordinate in a tuple bounded by one equals zero.
The unchanged tactic script uses 3 declared prerequisites and contains 26 exact native proof lines.
Alpha v35 checked-use · first admitted v35 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
beta_at_unique Alpha theorem; checked-use authorized le_zero Alpha theorem; checked-use authorized le_of_succ_le_succ Alpha theorem; checked-use authorizedDirect dependents
Formal native tactic body
Dependencies are introduced as named hypotheses before line 1. Local theorem links identify exact declared prerequisites. This exact body belongs to a complete independently kernel-checked constructive proof bundle and has Alpha checked-use authority; it does not imply Stable membership.
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.
01Fix variables and assumptionsL1–8
02Establish hValueL9–12
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply hBound.
03Separate the logical casesL13–14
04Calculate and transport equalitiesL15–15
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L15
trans x
05Use earlier factsL16–25
Instantiate or apply named facts and discharge the corresponding proof obligations.
06Use earlier factsL26–26
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L26
exact hValue_witness_right
Original exact command ledger · 26 lines
- 0001
intro b - 0002
intro c - 0003
intro k - 0004
intro i - 0005
intro a - 0006
intro hBound - 0007
intro hi - 0008
intro ha - 0009
have hValue : exists z. ((((exists fs_h_jt_unit_value. fs_h_jt_unit_value + S (z) = S ((S (i)) * c)) /\ exists fs_q_jt_unit_value. b = fs_q_jt_unit_value * S ((S (i)) * c) + (z))) /\ (exists jt_gap_unit_bound. jt_gap_unit_bound+S (z)=(1))) - 0010
specialize hBound (i) - 0011
apply hBound - 0012
exact hi - 0013
cases hValue - 0014
cases hValue_witness - 0015
trans x - 0016
specialize beta_at_unique (b) - 0017
specialize beta_at_unique (c) - 0018
specialize beta_at_unique (i) - 0019
specialize beta_at_unique (a) - 0020
specialize beta_at_unique (x) - 0021
apply beta_at_unique - 0022
exact ha - 0023
exact hValue_witness_left - 0024
apply le_zero - 0025
apply le_of_succ_le_succ - 0026
exact hValue_witness_right