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 p t d a b. t+d=p -> (exists fms_u_mod fms_v_mod. (a+t) + (p) * fms_u_mod = (b) + (p) * fms_v_mod) -> (exists fms_u_mod fms_v_mod. (b+d) + (p) * fms_u_mod = (a) + (p) * fms_v_mod)Constructive proof overview
Generated structural guide
Opposite additive shifts invert one another in balanced modular arithmetic by explicit witnesses.
The unchanged tactic script uses 2 declared prerequisites and contains 22 exact native proof lines.
Alpha v34 checked-use · first admitted v27 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
add_assoc Stable theorem; checked-use authorized add_comm Stable 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–7
02Separate the logical casesL8–9
03Construct an explicit witnessL10–11
04Calculate and transport equalitiesL12–16
05Use earlier factsL17–17
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L17
exact hmod_witness_witness
Original exact command ledger · 22 lines
- 0001
intro p - 0002
intro t - 0003
intro d - 0004
intro a - 0005
intro b - 0006
intro htd - 0007
intro hmod - 0008
cases hmod - 0009
cases hmod_witness - 0010
exists x1 - 0011
exists S x - 0012
trans (b+p*x1)+d - 0013
simp [add_assoc, add_comm] - 0014
trans ((a+t)+p*x)+d - 0015
congr - 0016
symm - 0017
exact hmod_witness_witness - 0018
refl - 0019
trans (a+(t+d))+p*x - 0020
simp [add_assoc, add_comm] - 0021
rewrite htd - 0022
simp [add_assoc, add_comm]