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 ap an bp bn N M. (exists ee_real_square_first ee_imag_square_first. (((((ap) * (ap))) + (((an) * (an)))) = ((ee_real_square_first) + (((((ap) * (an))) + (((an) * (ap))))))) /\ ((((((bp) * (bp))) + (((bn) * (bn)))) = ((ee_imag_square_first) + (((((bp) * (bn))) + (((bn) * (bp))))))) /\ (N) = ee_real_square_first + 3 * ee_imag_square_first)) -> (exists ee_real_square_second ee_imag_square_second. (((((ap) * (ap))) + (((an) * (an)))) = ((ee_real_square_second) + (((((ap) * (an))) + (((an) * (ap))))))) /\ ((((((bp) * (bp))) + (((bn) * (bn)))) = ((ee_imag_square_second) + (((((bp) * (bn))) + (((bn) * (bp))))))) /\ (M) = ee_real_square_second + 3 * ee_imag_square_second)) -> N = MConstructive proof overview
Generated structural guide
The weighted norm is a genuine functional arithmetic relation, independent of chosen square witnesses.
The unchanged tactic script uses 1 declared prerequisite and contains 38 exact native proof lines.
Alpha v34 checked-use · first admitted v28 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
gaussian_signed_square_functional Alpha 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.
01Fix variables and assumptionsL1–8
02Separate the logical casesL9–16
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
03Establish heqL17–24
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply gaussian signed square functional.
- L17
have heq : x = x2 - L18
specialize gaussian_signed_square_functional ap - L19
specialize gaussian_signed_square_functional an - L20
specialize gaussian_signed_square_functional x - L21
specialize gaussian_signed_square_functional x2 - L22
apply gaussian_signed_square_functional - L23
exact hfirst_witness_witness_left - L24
exact hsecond_witness_witness_left
04Establish heq2L25–34
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply gaussian signed square functional.
- L25
have heq2 : x1 = x3 - L26
specialize gaussian_signed_square_functional bp - L27
specialize gaussian_signed_square_functional bn - L28
specialize gaussian_signed_square_functional x1 - L29
specialize gaussian_signed_square_functional x3 - L30
apply gaussian_signed_square_functional - L31
exact hfirst_witness_witness_right_left - L32
exact hsecond_witness_witness_right_left - L33
trans x + 3 * x1 - L34
exact hfirst_witness_witness_right_right
05Calculate and transport equalitiesL35–37
06Use earlier factsL38–38
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L38
exact hsecond_witness_witness_right_right
Original exact command ledger · 38 lines
- 0001
intro ap - 0002
intro an - 0003
intro bp - 0004
intro bn - 0005
intro N - 0006
intro M - 0007
intro hfirst - 0008
intro hsecond - 0009
cases hfirst - 0010
cases hfirst_witness - 0011
cases hfirst_witness_witness - 0012
cases hfirst_witness_witness_right - 0013
cases hsecond - 0014
cases hsecond_witness - 0015
cases hsecond_witness_witness - 0016
cases hsecond_witness_witness_right - 0017
have heq : x = x2 - 0018
specialize gaussian_signed_square_functional ap - 0019
specialize gaussian_signed_square_functional an - 0020
specialize gaussian_signed_square_functional x - 0021
specialize gaussian_signed_square_functional x2 - 0022
apply gaussian_signed_square_functional - 0023
exact hfirst_witness_witness_left - 0024
exact hsecond_witness_witness_left - 0025
have heq2 : x1 = x3 - 0026
specialize gaussian_signed_square_functional bp - 0027
specialize gaussian_signed_square_functional bn - 0028
specialize gaussian_signed_square_functional x1 - 0029
specialize gaussian_signed_square_functional x3 - 0030
apply gaussian_signed_square_functional - 0031
exact hfirst_witness_witness_right_left - 0032
exact hsecond_witness_witness_right_left - 0033
trans x + 3 * x1 - 0034
exact hfirst_witness_witness_right_right - 0035
rewrite heq - 0036
rewrite heq2 - 0037
symm - 0038
exact hsecond_witness_witness_right_right