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 PA statement
forall b c i x. (exists h. h + S x = S ((S i) * c)) -> (exists u v. b + S ((S i) * c) * u = x + S ((S i) * c) * v) -> ((exists h. h + S x = S ((S i) * c)) /\ exists q. b = q * S ((S i) * c) + x)Structural proof guide
A bounded value congruent to a code is its expanded Gödel-beta value.
Direct prerequisites: beta_modulus_nonzero, mod_eq_to_remainder_decomposition. The authored body proceeds by direct introduction and elimination.
Proof neighborhood
Direct dependencies
Direct dependents
Formal native tactic body
Dependencies are hypotheses of the historical Alpha-v12 body receipt. The complete historical Alpha-v18 proof bundle independently checks every dependency; current Alpha v25 preserves that checked theorem use without changing 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 (2)
01Fix variables and assumptionsL1–6
02Separate the logical casesL7–7
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L7
split
03Use earlier factsL8–17
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L8
exact hx - L9
specialize mod_eq_to_remainder_decomposition (S ((S i) * c)) - L10
specialize mod_eq_to_remainder_decomposition b - L11
specialize mod_eq_to_remainder_decomposition x - L12
apply mod_eq_to_remainder_decomposition - L13
specialize beta_modulus_nonzero c - L14
specialize beta_modulus_nonzero i - L15
exact beta_modulus_nonzero - L16
exact hx - L17
exact hmod
Original exact command ledger · 17 lines
- 0001
intro b - 0002
intro c - 0003
intro i - 0004
intro x - 0005
intro hx - 0006
intro hmod - 0007
split - 0008
exact hx - 0009
specialize mod_eq_to_remainder_decomposition (S ((S i) * c)) - 0010
specialize mod_eq_to_remainder_decomposition b - 0011
specialize mod_eq_to_remainder_decomposition x - 0012
apply mod_eq_to_remainder_decomposition - 0013
specialize beta_modulus_nonzero c - 0014
specialize beta_modulus_nonzero i - 0015
exact beta_modulus_nonzero - 0016
exact hx - 0017
exact hmod