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 b c k i j p q. ((k = 0 \/ exists pen_last_index_list_order_source. k = S pen_last_index_list_order_source /\ ((((exists fs_h_pen_list_order_source_chain_initial. fs_h_pen_list_order_source_chain_initial + S (2) = S ((S (0)) * c)) /\ exists fs_q_pen_list_order_source_chain_initial. b = fs_q_pen_list_order_source_chain_initial * S ((S (0)) * c) + (2))) /\ forall pen_index_list_order_source_chain. (exists pc_lt_pen_list_order_source_chain_bound. pc_lt_pen_list_order_source_chain_bound + S (pen_index_list_order_source_chain) = (pen_last_index_list_order_source)) -> exists pen_previous_list_order_source_chain pen_following_list_order_source_chain. (((exists fs_h_pen_list_order_source_chain_previous. fs_h_pen_list_order_source_chain_previous + S (pen_previous_list_order_source_chain) = S ((S (pen_index_list_order_source_chain)) * c)) /\ exists fs_q_pen_list_order_source_chain_previous. b = fs_q_pen_list_order_source_chain_previous * S ((S (pen_index_list_order_source_chain)) * c) + (pen_previous_list_order_source_chain))) /\ ((((exists fs_h_pen_list_order_source_chain_following. fs_h_pen_list_order_source_chain_following + S (pen_following_list_order_source_chain) = S ((S (S pen_index_list_order_source_chain)) * c)) /\ exists fs_q_pen_list_order_source_chain_following. b = fs_q_pen_list_order_source_chain_following * S ((S (S pen_index_list_order_source_chain)) * c) + (pen_following_list_order_source_chain))) /\ (((~(pen_following_list_order_source_chain = 1) /\ forall bpr_left_pc_pen_list_order_source_chain_next_prime bpr_right_pc_pen_list_order_source_chain_next_prime. pen_following_list_order_source_chain = bpr_left_pc_pen_list_order_source_chain_next_prime * bpr_right_pc_pen_list_order_source_chain_next_prime -> bpr_left_pc_pen_list_order_source_chain_next_prime = 1 \/ bpr_right_pc_pen_list_order_source_chain_next_prime = 1)) /\ ((exists pc_lt_pen_list_order_source_chain_next_greater. pc_lt_pen_list_order_source_chain_next_greater + S (pen_previous_list_order_source_chain) = (pen_following_list_order_source_chain)) /\ forall pen_comparison_list_order_source_chain_next. ((~(pen_comparison_list_order_source_chain_next = 1) /\ forall bpr_left_pc_pen_list_order_source_chain_next_comparison bpr_right_pc_pen_list_order_source_chain_next_comparison. pen_comparison_list_order_source_chain_next = bpr_left_pc_pen_list_order_source_chain_next_comparison * bpr_right_pc_pen_list_order_source_chain_next_comparison -> bpr_left_pc_pen_list_order_source_chain_next_comparison = 1 \/ bpr_right_pc_pen_list_order_source_chain_next_comparison = 1)) -> (exists pc_lt_pen_list_order_source_chain_next_above. pc_lt_pen_list_order_source_chain_next_above + S (pen_previous_list_order_source_chain) = (pen_comparison_list_order_source_chain_next)) -> (exists pc_le_pen_list_order_source_chain_next_minimal. pc_le_pen_list_order_source_chain_next_minimal + (pen_following_list_order_source_chain) = (pen_comparison_list_order_source_chain_next)))))))) -> (exists pc_lt_pen_list_order_indices. pc_lt_pen_list_order_indices + S (i) = (j)) -> (exists pc_lt_pen_list_order_bound. pc_lt_pen_list_order_bound + S (j) = (k)) -> (((exists fs_h_pen_list_order_first. fs_h_pen_list_order_first + S (p) = S ((S (i)) * c)) /\ exists fs_q_pen_list_order_first. b = fs_q_pen_list_order_first * S ((S (i)) * c) + (p))) -> (((exists fs_h_pen_list_order_last. fs_h_pen_list_order_last + S (q) = S ((S (j)) * c)) /\ exists fs_q_pen_list_order_last. b = fs_q_pen_list_order_last * S ((S (j)) * c) + (q))) -> (exists pc_lt_pen_list_order_values. pc_lt_pen_list_order_values + S (p) = (q))Constructive proof overview
Generated structural guide
Every first-prime list is strictly increasing at all valid index pairs, not merely at its last transition.
The unchanged tactic script uses 5 declared prerequisites and contains 44 exact native proof lines.
Alpha v34 checked-use · first admitted v28 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
lt_not_le Stable theorem; checked-use authorized zero_le Stable theorem; checked-use authorized le_of_succ_le_succ Stable theorem; checked-use authorized PE0009 initial_prime_chain_prefix_restrict PE000D initial_prime_chain_strict_orderDirect 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 (2)
01Fix variables and assumptionsL1–10
02Fix variables and assumptionsL11–12
03Separate the logical casesL13–14
04Calculate and transport equalitiesL15–15
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L15
rewrite hl_left at hj
05Use earlier factsL16–21
06Separate the logical casesL22–23
07Use earlier factsL24–33
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L24
specialize initial_prime_chain_strict_order b - L25
specialize initial_prime_chain_strict_order c - L26
specialize initial_prime_chain_strict_order j - L27
specialize initial_prime_chain_strict_order i - L28
specialize initial_prime_chain_strict_order p - L29
specialize initial_prime_chain_strict_order q - L30
apply initial_prime_chain_strict_order - L31
specialize initial_prime_chain_prefix_restrict b - L32
specialize initial_prime_chain_prefix_restrict c - L33
specialize initial_prime_chain_prefix_restrict x
08Use earlier factsL34–38
09Calculate and transport equalitiesL39–39
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L39
rewrite hl_right_witness_left at hj
Original exact command ledger · 44 lines
- 0001
intro b - 0002
intro c - 0003
intro k - 0004
intro i - 0005
intro j - 0006
intro p - 0007
intro q - 0008
intro hl - 0009
intro hij - 0010
intro hj - 0011
intro hp - 0012
intro hq - 0013
cases hl - 0014
exfalso - 0015
rewrite hl_left at hj - 0016
specialize lt_not_le j - 0017
specialize lt_not_le 0 - 0018
apply lt_not_le - 0019
exact hj - 0020
specialize zero_le j - 0021
apply zero_le - 0022
cases hl_right - 0023
cases hl_right_witness - 0024
specialize initial_prime_chain_strict_order b - 0025
specialize initial_prime_chain_strict_order c - 0026
specialize initial_prime_chain_strict_order j - 0027
specialize initial_prime_chain_strict_order i - 0028
specialize initial_prime_chain_strict_order p - 0029
specialize initial_prime_chain_strict_order q - 0030
apply initial_prime_chain_strict_order - 0031
specialize initial_prime_chain_prefix_restrict b - 0032
specialize initial_prime_chain_prefix_restrict c - 0033
specialize initial_prime_chain_prefix_restrict x - 0034
specialize initial_prime_chain_prefix_restrict j - 0035
apply initial_prime_chain_prefix_restrict - 0036
specialize le_of_succ_le_succ j - 0037
specialize le_of_succ_le_succ x - 0038
apply le_of_succ_le_succ - 0039
rewrite hl_right_witness_left at hj - 0040
exact hj - 0041
exact hl_right_witness_right - 0042
exact hij - 0043
exact hp - 0044
exact hq