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 n. (forall fom_index_wpoi_zero_bounded. (exists fom_gap_wpoi_zero_bounded_index_bound. fom_gap_wpoi_zero_bounded_index_bound + S (fom_index_wpoi_zero_bounded) = 0) -> exists fom_value_wpoi_zero_bounded. ((((exists fom_beta_height_wpoi_zero_bounded_entry. fom_beta_height_wpoi_zero_bounded_entry + S (fom_value_wpoi_zero_bounded) = S ((S (fom_index_wpoi_zero_bounded)) * c)) /\ exists fom_beta_quotient_wpoi_zero_bounded_entry. b = fom_beta_quotient_wpoi_zero_bounded_entry * S ((S (fom_index_wpoi_zero_bounded)) * c) + (fom_value_wpoi_zero_bounded))) /\ (exists fom_gap_wpoi_zero_bounded_value_bound. fom_gap_wpoi_zero_bounded_value_bound + S (fom_value_wpoi_zero_bounded) = n)))Structural proof guide
Generated structural guide
Every empty beta prefix is bounded into every codomain.
Use the direct prerequisites add_eq_zero_right, succ_ne_zero as previously established PA formulas.
The proof proceeds by case analysis (1), intermediate claims (1).
Referenced ingredients
Proof neighborhood
Direct dependencies
Direct dependents
Formal native tactic body
Dependencies are introduced as named hypotheses before line 1. Linked names are exact direct references. This Alpha-v25 checked-use theorem is independently kernel-checked when replayed; it is not a Stable theorem.
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–5
02Separate the logical casesL6–7
03Establish hsqL8–15
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply add eq zero right.
Original exact command ledger · 15 lines
- 0001
intro b - 0002
intro c - 0003
intro n - 0004
intro q - 0005
intro hq - 0006
exfalso - 0007
cases hq - 0008
have hsq : S q = 0 - 0009
specialize add_eq_zero_right x - 0010
specialize add_eq_zero_right (S q) - 0011
apply add_eq_zero_right - 0012
exact hq_witness - 0013
specialize succ_ne_zero q - 0014
apply succ_ne_zero - 0015
exact hsq