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
exists b c. (((exists fs_h_pen_singleton_initial. fs_h_pen_singleton_initial + S (2) = S ((S (0)) * c)) /\ exists fs_q_pen_singleton_initial. b = fs_q_pen_singleton_initial * S ((S (0)) * c) + (2))) /\ forall pen_index_singleton. (exists pc_lt_pen_singleton_bound. pc_lt_pen_singleton_bound + S (pen_index_singleton) = (0)) -> exists pen_previous_singleton pen_following_singleton. (((exists fs_h_pen_singleton_previous. fs_h_pen_singleton_previous + S (pen_previous_singleton) = S ((S (pen_index_singleton)) * c)) /\ exists fs_q_pen_singleton_previous. b = fs_q_pen_singleton_previous * S ((S (pen_index_singleton)) * c) + (pen_previous_singleton))) /\ ((((exists fs_h_pen_singleton_following. fs_h_pen_singleton_following + S (pen_following_singleton) = S ((S (S pen_index_singleton)) * c)) /\ exists fs_q_pen_singleton_following. b = fs_q_pen_singleton_following * S ((S (S pen_index_singleton)) * c) + (pen_following_singleton))) /\ (((~(pen_following_singleton = 1) /\ forall bpr_left_pc_pen_singleton_next_prime bpr_right_pc_pen_singleton_next_prime. pen_following_singleton = bpr_left_pc_pen_singleton_next_prime * bpr_right_pc_pen_singleton_next_prime -> bpr_left_pc_pen_singleton_next_prime = 1 \/ bpr_right_pc_pen_singleton_next_prime = 1)) /\ ((exists pc_lt_pen_singleton_next_greater. pc_lt_pen_singleton_next_greater + S (pen_previous_singleton) = (pen_following_singleton)) /\ forall pen_comparison_singleton_next. ((~(pen_comparison_singleton_next = 1) /\ forall bpr_left_pc_pen_singleton_next_comparison bpr_right_pc_pen_singleton_next_comparison. pen_comparison_singleton_next = bpr_left_pc_pen_singleton_next_comparison * bpr_right_pc_pen_singleton_next_comparison -> bpr_left_pc_pen_singleton_next_comparison = 1 \/ bpr_right_pc_pen_singleton_next_comparison = 1)) -> (exists pc_lt_pen_singleton_next_above. pc_lt_pen_singleton_next_above + S (pen_previous_singleton) = (pen_comparison_singleton_next)) -> (exists pc_le_pen_singleton_next_minimal. pc_le_pen_singleton_next_minimal + (pen_following_singleton) = (pen_comparison_singleton_next)))))Constructive proof overview
Generated structural guide
The one-entry initial prime chain is an actual beta code of the prime two.
The unchanged tactic script uses 3 declared prerequisites and contains 16 exact native proof lines.
Alpha v34 checked-use · first admitted v28 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
bertrand_chain_singleton_code_exists Alpha theorem; checked-use authorized lt_not_le Stable theorem; checked-use authorized zero_le 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.
01Use earlier factsL1–1
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L1
specialize bertrand_chain_singleton_code_exists 2
02Separate the logical casesL2–3
03Construct an explicit witnessL4–5
04Separate the logical casesL6–6
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L6
split
05Use earlier factsL7–7
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L7
exact bertrand_chain_singleton_code_exists_witness_witness
06Fix variables and assumptionsL8–9
07Separate the logical casesL10–10
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L10
exfalso
Original exact command ledger · 16 lines
- 0001
specialize bertrand_chain_singleton_code_exists 2 - 0002
cases bertrand_chain_singleton_code_exists - 0003
cases bertrand_chain_singleton_code_exists_witness - 0004
exists x - 0005
exists x1 - 0006
split - 0007
exact bertrand_chain_singleton_code_exists_witness_witness - 0008
intro i - 0009
intro hi - 0010
exfalso - 0011
specialize lt_not_le i - 0012
specialize lt_not_le 0 - 0013
apply lt_not_le - 0014
exact hi - 0015
specialize zero_le i - 0016
apply zero_le