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 first-order arithmetic statement
forall ac bc cc p n q m. (exists ge_balance_positive_bridge_elim_first_add ge_balance_negative_bridge_elim_first_add. (((((ac) = 2 * (ge_balance_positive_bridge_elim_first_add) /\ (ge_balance_negative_bridge_elim_first_add) = 0) \/ exists ge_signed_half_bridge_elim_first_adddecode. (((ac) = 2 * ge_signed_half_bridge_elim_first_adddecode + 1 /\ (ge_balance_positive_bridge_elim_first_add) = 0) /\ (ge_balance_negative_bridge_elim_first_add) = S ge_signed_half_bridge_elim_first_adddecode))) /\ ((p) + ge_balance_negative_bridge_elim_first_add = (n) + ge_balance_positive_bridge_elim_first_add))) -> (exists ge_balance_positive_bridge_elim_second_add ge_balance_negative_bridge_elim_second_add. (((((bc) = 2 * (ge_balance_positive_bridge_elim_second_add) /\ (ge_balance_negative_bridge_elim_second_add) = 0) \/ exists ge_signed_half_bridge_elim_second_adddecode. (((bc) = 2 * ge_signed_half_bridge_elim_second_adddecode + 1 /\ (ge_balance_positive_bridge_elim_second_add) = 0) /\ (ge_balance_negative_bridge_elim_second_add) = S ge_signed_half_bridge_elim_second_adddecode))) /\ ((q) + ge_balance_negative_bridge_elim_second_add = (m) + ge_balance_positive_bridge_elim_second_add))) -> (exists sa_lp_gaussian_bridge_elim_add sa_ln_gaussian_bridge_elim_add sa_rp_gaussian_bridge_elim_add sa_rn_gaussian_bridge_elim_add sa_op_gaussian_bridge_elim_add sa_on_gaussian_bridge_elim_add. (((ac = 2 * sa_lp_gaussian_bridge_elim_add /\ sa_ln_gaussian_bridge_elim_add = 0) \/ exists sd_half_gaussian_bridge_elim_add_left. ((ac = 2 * sd_half_gaussian_bridge_elim_add_left + 1 /\ sa_lp_gaussian_bridge_elim_add = 0) /\ sa_ln_gaussian_bridge_elim_add = S sd_half_gaussian_bridge_elim_add_left)) /\ (((bc = 2 * sa_rp_gaussian_bridge_elim_add /\ sa_rn_gaussian_bridge_elim_add = 0) \/ exists sd_half_gaussian_bridge_elim_add_right. ((bc = 2 * sd_half_gaussian_bridge_elim_add_right + 1 /\ sa_rp_gaussian_bridge_elim_add = 0) /\ sa_rn_gaussian_bridge_elim_add = S sd_half_gaussian_bridge_elim_add_right)) /\ (((cc = 2 * sa_op_gaussian_bridge_elim_add /\ sa_on_gaussian_bridge_elim_add = 0) \/ exists sd_half_gaussian_bridge_elim_add_output. ((cc = 2 * sd_half_gaussian_bridge_elim_add_output + 1 /\ sa_op_gaussian_bridge_elim_add = 0) /\ sa_on_gaussian_bridge_elim_add = S sd_half_gaussian_bridge_elim_add_output)) /\ (sa_lp_gaussian_bridge_elim_add + sa_rp_gaussian_bridge_elim_add) + sa_on_gaussian_bridge_elim_add = (sa_ln_gaussian_bridge_elim_add + sa_rn_gaussian_bridge_elim_add) + sa_op_gaussian_bridge_elim_add)))) -> (exists ge_balance_positive_signed_bridge_elimination_add ge_balance_negative_signed_bridge_elimination_add. (((((cc) = 2 * (ge_balance_positive_signed_bridge_elimination_add) /\ (ge_balance_negative_signed_bridge_elimination_add) = 0) \/ exists ge_signed_half_signed_bridge_elimination_adddecode. (((cc) = 2 * ge_signed_half_signed_bridge_elimination_adddecode + 1 /\ (ge_balance_positive_signed_bridge_elimination_add) = 0) /\ (ge_balance_negative_signed_bridge_elimination_add) = S ge_signed_half_signed_bridge_elimination_adddecode))) /\ ((((p) + (q))) + ge_balance_negative_signed_bridge_elimination_add = (((n) + (m))) + ge_balance_positive_signed_bridge_elimination_add)))Constructive proof overview
Generated structural guide
The unchanged historic signed-add graph has the exact arbitrary-representative contribution balance; this proves the converse rather than an unproved notation alias.
The unchanged tactic script uses 3 declared prerequisites and contains 36 exact native proof lines.
Alpha v34 checked-use · first admitted v28 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
signed_balance_total Alpha theorem; checked-use authorized signed_add_functional Alpha theorem; checked-use authorized GI0049 gaussian_signed_add_of_balancesDirect 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.
Named ingredients (1)
01Fix variables and assumptionsL1–10
02Establish houtputL11–14
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply signed balance total.
- L11
have houtput : ∃ output. SignedBalance(output,p + q,n + m)Definitions: SignedBalance - L12
specialize signed_balance_total ((p) + (q)) - L13
specialize signed_balance_total ((n) + (m)) - L14
apply signed_balance_total
03Separate the logical casesL15–15
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L15
cases houtput
04Establish hequalL16–25
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply signed add functional.
- L16
have hequal : cc = x - L17
specialize signed_add_functional ac - L18
specialize signed_add_functional bc - L19
specialize signed_add_functional cc - L20
specialize signed_add_functional x - L21
apply signed_add_functional - L22
exact hoperation - L23
specialize gaussian_signed_add_of_balances ac - L24
specialize gaussian_signed_add_of_balances bc - L25
specialize gaussian_signed_add_of_balances x
05Use earlier factsL26–33
Instantiate or apply named facts and discharge the corresponding proof obligations.
06Calculate and transport equalitiesL34–35
07Use earlier factsL36–36
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L36
exact houtput_witness
Original exact command ledger · 36 lines
- 0001
intro ac - 0002
intro bc - 0003
intro cc - 0004
intro p - 0005
intro n - 0006
intro q - 0007
intro m - 0008
intro hfirst - 0009
intro hsecond - 0010
intro hoperation - 0011
have houtput : exists output. (exists ge_balance_positive_signed_bridge_construct_add ge_balance_negative_signed_bridge_construct_add. (((((output) = 2 * (ge_balance_positive_signed_bridge_construct_add) /\ (ge_balance_negative_signed_bridge_construct_add) = 0) \/ exists ge_signed_half_signed_bridge_construct_adddecode. (((output) = 2 * ge_signed_half_signed_bridge_construct_adddecode + 1 /\ (ge_balance_positive_signed_bridge_construct_add) = 0) /\ (ge_balance_negative_signed_bridge_construct_add) = S ge_signed_half_signed_bridge_construct_adddecode))) /\ ((((p) + (q))) + ge_balance_negative_signed_bridge_construct_add = (((n) + (m))) + ge_balance_positive_signed_bridge_construct_add))) - 0012
specialize signed_balance_total ((p) + (q)) - 0013
specialize signed_balance_total ((n) + (m)) - 0014
apply signed_balance_total - 0015
cases houtput - 0016
have hequal : cc = x - 0017
specialize signed_add_functional ac - 0018
specialize signed_add_functional bc - 0019
specialize signed_add_functional cc - 0020
specialize signed_add_functional x - 0021
apply signed_add_functional - 0022
exact hoperation - 0023
specialize gaussian_signed_add_of_balances ac - 0024
specialize gaussian_signed_add_of_balances bc - 0025
specialize gaussian_signed_add_of_balances x - 0026
specialize gaussian_signed_add_of_balances p - 0027
specialize gaussian_signed_add_of_balances n - 0028
specialize gaussian_signed_add_of_balances q - 0029
specialize gaussian_signed_add_of_balances m - 0030
apply gaussian_signed_add_of_balances - 0031
exact hfirst - 0032
exact hsecond - 0033
exact houtput_witness - 0034
rewrite hequal - 0035
rewrite hequal - 0036
exact houtput_witness