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 i d pb pc nb nc p n e ab ac bb bc r s. (exists mdr_z_record_first. ((exists mdr_a_record_firstc mdr_b_record_firstc mdr_c_record_firstc mdr_e_record_firstc mdr_f_record_firstc. ((mdr_a_record_firstc = ((d) + (pb)) * S ((d) + (pb)) + ((pb) + (pb))) /\ ((mdr_b_record_firstc = ((pc) + (nb)) * S ((pc) + (nb)) + ((nb) + (nb))) /\ ((mdr_c_record_firstc = ((mdr_a_record_firstc) + (mdr_b_record_firstc)) * S ((mdr_a_record_firstc) + (mdr_b_record_firstc)) + ((mdr_b_record_firstc) + (mdr_b_record_firstc))) /\ ((mdr_e_record_firstc = ((p) + (n)) * S ((p) + (n)) + ((n) + (n))) /\ ((mdr_f_record_firstc = ((nc) + (mdr_e_record_firstc)) * S ((nc) + (mdr_e_record_firstc)) + ((mdr_e_record_firstc) + (mdr_e_record_firstc))) /\ ((mdr_z_record_first) = ((mdr_c_record_firstc) + (mdr_f_record_firstc)) * S ((mdr_c_record_firstc) + (mdr_f_record_firstc)) + ((mdr_f_record_firstc) + (mdr_f_record_firstc))))))))) /\ (((exists ff_h_mdr_record_firstb. ff_h_mdr_record_firstb + S (mdr_z_record_first) = S ((S (i)) * c)) /\ exists ff_q_mdr_record_firstb. b = ff_q_mdr_record_firstb * S ((S (i)) * c) + (mdr_z_record_first))))) -> (exists mdr_z_record_second. ((exists mdr_a_record_secondc mdr_b_record_secondc mdr_c_record_secondc mdr_e_record_secondc mdr_f_record_secondc. ((mdr_a_record_secondc = ((e) + (ab)) * S ((e) + (ab)) + ((ab) + (ab))) /\ ((mdr_b_record_secondc = ((ac) + (bb)) * S ((ac) + (bb)) + ((bb) + (bb))) /\ ((mdr_c_record_secondc = ((mdr_a_record_secondc) + (mdr_b_record_secondc)) * S ((mdr_a_record_secondc) + (mdr_b_record_secondc)) + ((mdr_b_record_secondc) + (mdr_b_record_secondc))) /\ ((mdr_e_record_secondc = ((r) + (s)) * S ((r) + (s)) + ((s) + (s))) /\ ((mdr_f_record_secondc = ((bc) + (mdr_e_record_secondc)) * S ((bc) + (mdr_e_record_secondc)) + ((mdr_e_record_secondc) + (mdr_e_record_secondc))) /\ ((mdr_z_record_second) = ((mdr_c_record_secondc) + (mdr_f_record_secondc)) * S ((mdr_c_record_secondc) + (mdr_f_record_secondc)) + ((mdr_f_record_secondc) + (mdr_f_record_secondc))))))))) /\ (((exists ff_h_mdr_record_secondb. ff_h_mdr_record_secondb + S (mdr_z_record_second) = S ((S (i)) * c)) /\ exists ff_q_mdr_record_secondb. b = ff_q_mdr_record_secondb * S ((S (i)) * c) + (mdr_z_record_second))))) -> ((d = e) /\ ((pb = ab) /\ ((pc = ac) /\ ((nb = bb) /\ ((nc = bc) /\ ((p = r) /\ (n = s)))))))Constructive proof overview
Generated structural guide
A single actual beta entry cannot be interpreted as two different matrix evaluation records.
The unchanged tactic script uses 2 declared prerequisites and contains 51 exact native proof lines.
Alpha v34 checked-use · first admitted v27 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
beta_at_unique Stable theorem; checked-use authorized DL0014 matrix_recursive_node_code_injectiveDirect 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 (1)
01Fix variables and assumptionsL1–10
02Fix variables and assumptionsL11–19
03Separate the logical casesL20–23
04Establish hequalL24–33
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply beta at unique.
- L24
have hequal : x = x1 - L25
specialize beta_at_unique (b) - L26
specialize beta_at_unique (c) - L27
specialize beta_at_unique (i) - L28
specialize beta_at_unique (x) - L29
specialize beta_at_unique (x1) - L30
apply beta_at_unique - L31
exact hfirst_witness_right - L32
exact hsecond_witness_right - L33
specialize matrix_recursive_node_code_injective (x)
05Use earlier factsL34–43
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L34
specialize matrix_recursive_node_code_injective (d) - L35
specialize matrix_recursive_node_code_injective (pb) - L36
specialize matrix_recursive_node_code_injective (pc) - L37
specialize matrix_recursive_node_code_injective (nb) - L38
specialize matrix_recursive_node_code_injective (nc) - L39
specialize matrix_recursive_node_code_injective (p) - L40
specialize matrix_recursive_node_code_injective (n) - L41
specialize matrix_recursive_node_code_injective (e) - L42
specialize matrix_recursive_node_code_injective (ab) - L43
specialize matrix_recursive_node_code_injective (ac)
06Use earlier factsL44–49
Instantiate or apply named facts and discharge the corresponding proof obligations.
07Calculate and transport equalitiesL50–50
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L50
rewrite hequal
08Use earlier factsL51–51
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L51
exact hsecond_witness_left
Original exact command ledger · 51 lines
- 0001
intro b - 0002
intro c - 0003
intro i - 0004
intro d - 0005
intro pb - 0006
intro pc - 0007
intro nb - 0008
intro nc - 0009
intro p - 0010
intro n - 0011
intro e - 0012
intro ab - 0013
intro ac - 0014
intro bb - 0015
intro bc - 0016
intro r - 0017
intro s - 0018
intro hfirst - 0019
intro hsecond - 0020
cases hfirst - 0021
cases hfirst_witness - 0022
cases hsecond - 0023
cases hsecond_witness - 0024
have hequal : x = x1 - 0025
specialize beta_at_unique (b) - 0026
specialize beta_at_unique (c) - 0027
specialize beta_at_unique (i) - 0028
specialize beta_at_unique (x) - 0029
specialize beta_at_unique (x1) - 0030
apply beta_at_unique - 0031
exact hfirst_witness_right - 0032
exact hsecond_witness_right - 0033
specialize matrix_recursive_node_code_injective (x) - 0034
specialize matrix_recursive_node_code_injective (d) - 0035
specialize matrix_recursive_node_code_injective (pb) - 0036
specialize matrix_recursive_node_code_injective (pc) - 0037
specialize matrix_recursive_node_code_injective (nb) - 0038
specialize matrix_recursive_node_code_injective (nc) - 0039
specialize matrix_recursive_node_code_injective (p) - 0040
specialize matrix_recursive_node_code_injective (n) - 0041
specialize matrix_recursive_node_code_injective (e) - 0042
specialize matrix_recursive_node_code_injective (ab) - 0043
specialize matrix_recursive_node_code_injective (ac) - 0044
specialize matrix_recursive_node_code_injective (bb) - 0045
specialize matrix_recursive_node_code_injective (bc) - 0046
specialize matrix_recursive_node_code_injective (r) - 0047
specialize matrix_recursive_node_code_injective (s) - 0048
apply matrix_recursive_node_code_injective - 0049
exact hfirst_witness_left - 0050
rewrite hequal - 0051
exact hsecond_witness_left