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 m x a b r s. ((((b = 0) /\ (((exists ff_gap_binary_step_square. ff_gap_binary_step_square + S (r) = m) /\ (exists ff_left_binary_step_square_congruence ff_right_binary_step_square_congruence. (x * x) + m * ff_left_binary_step_square_congruence = (r) + m * ff_right_binary_step_square_congruence)))) \/ ((b = 1) /\ (((exists ff_gap_binary_step_multiply. ff_gap_binary_step_multiply + S (r) = m) /\ (exists ff_left_binary_step_multiply_congruence ff_right_binary_step_multiply_congruence. ((x * x) * a) + m * ff_left_binary_step_multiply_congruence = (r) + m * ff_right_binary_step_multiply_congruence)))))) -> ((((b = 0) /\ (((exists ff_gap_binary_step_other_square. ff_gap_binary_step_other_square + S (s) = m) /\ (exists ff_left_binary_step_other_square_congruence ff_right_binary_step_other_square_congruence. (x * x) + m * ff_left_binary_step_other_square_congruence = (s) + m * ff_right_binary_step_other_square_congruence)))) \/ ((b = 1) /\ (((exists ff_gap_binary_step_other_multiply. ff_gap_binary_step_other_multiply + S (s) = m) /\ (exists ff_left_binary_step_other_multiply_congruence ff_right_binary_step_other_multiply_congruence. ((x * x) * a) + m * ff_left_binary_step_other_multiply_congruence = (s) + m * ff_right_binary_step_other_multiply_congruence)))))) -> r = sConstructive proof overview
Generated structural guide
A fixed binary digit and state determine exactly one modular transition result.
The unchanged tactic script uses 1 declared prerequisite and contains 41 exact native proof lines.
Alpha v34 checked-use · first admitted v21 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
Direct 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–8
02Separate the logical casesL9–12
03Use earlier factsL13–19
Instantiate or apply named facts and discharge the corresponding proof obligations.
04Separate the logical casesL20–20
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L20
cases hs_right
05Calculate and transport equalitiesL21–21
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L21
rewrite hr_left_left at hs_right_left
06Separate the logical casesL22–22
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L22
exfalso
07Use earlier factsL23–23
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L23
apply PA1
08Calculate and transport equalitiesL24–24
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L24
symm
09Use earlier factsL25–25
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L25
exact hs_right_left
10Separate the logical casesL26–28
11Calculate and transport equalitiesL29–29
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L29
rewrite hs_left_left at hr_right_left
12Separate the logical casesL30–30
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L30
exfalso
13Use earlier factsL31–31
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L31
apply PA1
14Calculate and transport equalitiesL32–32
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L32
symm
15Use earlier factsL33–33
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L33
exact hr_right_left
16Separate the logical casesL34–34
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L34
cases hs_right
17Use earlier factsL35–41
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L35
specialize binary_canonical_residue_functional m - L36
specialize binary_canonical_residue_functional ((x * x) * a) - L37
specialize binary_canonical_residue_functional r - L38
specialize binary_canonical_residue_functional s - L39
apply binary_canonical_residue_functional - L40
exact hr_right_right - L41
exact hs_right_right
Original exact command ledger · 41 lines
- 0001
intro m - 0002
intro x - 0003
intro a - 0004
intro b - 0005
intro r - 0006
intro s - 0007
intro hr - 0008
intro hs - 0009
cases hr - 0010
cases hr_left - 0011
cases hs - 0012
cases hs_left - 0013
specialize binary_canonical_residue_functional m - 0014
specialize binary_canonical_residue_functional (x * x) - 0015
specialize binary_canonical_residue_functional r - 0016
specialize binary_canonical_residue_functional s - 0017
apply binary_canonical_residue_functional - 0018
exact hr_left_right - 0019
exact hs_left_right - 0020
cases hs_right - 0021
rewrite hr_left_left at hs_right_left - 0022
exfalso - 0023
apply PA1 - 0024
symm - 0025
exact hs_right_left - 0026
cases hr_right - 0027
cases hs - 0028
cases hs_left - 0029
rewrite hs_left_left at hr_right_left - 0030
exfalso - 0031
apply PA1 - 0032
symm - 0033
exact hr_right_left - 0034
cases hs_right - 0035
specialize binary_canonical_residue_functional m - 0036
specialize binary_canonical_residue_functional ((x * x) * a) - 0037
specialize binary_canonical_residue_functional r - 0038
specialize binary_canonical_residue_functional s - 0039
apply binary_canonical_residue_functional - 0040
exact hr_right_right - 0041
exact hs_right_right