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 z a b c d N. (exists ge_representation_real_code_norm_fixed_rep ge_representation_imaginary_code_norm_fixed_rep. (((z) = ((ge_representation_real_code_norm_fixed_rep) + (ge_representation_imaginary_code_norm_fixed_rep)) * S ((ge_representation_real_code_norm_fixed_rep) + (ge_representation_imaginary_code_norm_fixed_rep)) + ((ge_representation_imaginary_code_norm_fixed_rep) + (ge_representation_imaginary_code_norm_fixed_rep))) /\ ((exists ge_balance_positive_norm_fixed_repreal ge_balance_negative_norm_fixed_repreal. (((((ge_representation_real_code_norm_fixed_rep) = 2 * (ge_balance_positive_norm_fixed_repreal) /\ (ge_balance_negative_norm_fixed_repreal) = 0) \/ exists ge_signed_half_norm_fixed_reprealdecode. (((ge_representation_real_code_norm_fixed_rep) = 2 * ge_signed_half_norm_fixed_reprealdecode + 1 /\ (ge_balance_positive_norm_fixed_repreal) = 0) /\ (ge_balance_negative_norm_fixed_repreal) = S ge_signed_half_norm_fixed_reprealdecode))) /\ ((a) + ge_balance_negative_norm_fixed_repreal = (b) + ge_balance_positive_norm_fixed_repreal))) /\ (exists ge_balance_positive_norm_fixed_repimaginary ge_balance_negative_norm_fixed_repimaginary. (((((ge_representation_imaginary_code_norm_fixed_rep) = 2 * (ge_balance_positive_norm_fixed_repimaginary) /\ (ge_balance_negative_norm_fixed_repimaginary) = 0) \/ exists ge_signed_half_norm_fixed_repimaginarydecode. (((ge_representation_imaginary_code_norm_fixed_rep) = 2 * ge_signed_half_norm_fixed_repimaginarydecode + 1 /\ (ge_balance_positive_norm_fixed_repimaginary) = 0) /\ (ge_balance_negative_norm_fixed_repimaginary) = S ge_signed_half_norm_fixed_repimaginarydecode))) /\ ((c) + ge_balance_negative_norm_fixed_repimaginary = (d) + ge_balance_positive_norm_fixed_repimaginary)))))) -> (exists ge_norm_rp_norm_fixed_code ge_norm_rn_norm_fixed_code ge_norm_ip_norm_fixed_code ge_norm_in_norm_fixed_code. ((exists ge_representation_real_code_norm_fixed_coderepresentation ge_representation_imaginary_code_norm_fixed_coderepresentation. (((z) = ((ge_representation_real_code_norm_fixed_coderepresentation) + (ge_representation_imaginary_code_norm_fixed_coderepresentation)) * S ((ge_representation_real_code_norm_fixed_coderepresentation) + (ge_representation_imaginary_code_norm_fixed_coderepresentation)) + ((ge_representation_imaginary_code_norm_fixed_coderepresentation) + (ge_representation_imaginary_code_norm_fixed_coderepresentation))) /\ ((exists ge_balance_positive_norm_fixed_coderepresentationreal ge_balance_negative_norm_fixed_coderepresentationreal. (((((ge_representation_real_code_norm_fixed_coderepresentation) = 2 * (ge_balance_positive_norm_fixed_coderepresentationreal) /\ (ge_balance_negative_norm_fixed_coderepresentationreal) = 0) \/ exists ge_signed_half_norm_fixed_coderepresentationrealdecode. (((ge_representation_real_code_norm_fixed_coderepresentation) = 2 * ge_signed_half_norm_fixed_coderepresentationrealdecode + 1 /\ (ge_balance_positive_norm_fixed_coderepresentationreal) = 0) /\ (ge_balance_negative_norm_fixed_coderepresentationreal) = S ge_signed_half_norm_fixed_coderepresentationrealdecode))) /\ ((ge_norm_rp_norm_fixed_code) + ge_balance_negative_norm_fixed_coderepresentationreal = (ge_norm_rn_norm_fixed_code) + ge_balance_positive_norm_fixed_coderepresentationreal))) /\ (exists ge_balance_positive_norm_fixed_coderepresentationimaginary ge_balance_negative_norm_fixed_coderepresentationimaginary. (((((ge_representation_imaginary_code_norm_fixed_coderepresentation) = 2 * (ge_balance_positive_norm_fixed_coderepresentationimaginary) /\ (ge_balance_negative_norm_fixed_coderepresentationimaginary) = 0) \/ exists ge_signed_half_norm_fixed_coderepresentationimaginarydecode. (((ge_representation_imaginary_code_norm_fixed_coderepresentation) = 2 * ge_signed_half_norm_fixed_coderepresentationimaginarydecode + 1 /\ (ge_balance_positive_norm_fixed_coderepresentationimaginary) = 0) /\ (ge_balance_negative_norm_fixed_coderepresentationimaginary) = S ge_signed_half_norm_fixed_coderepresentationimaginarydecode))) /\ ((ge_norm_ip_norm_fixed_code) + ge_balance_negative_norm_fixed_coderepresentationimaginary = (ge_norm_in_norm_fixed_code) + ge_balance_positive_norm_fixed_coderepresentationimaginary)))))) /\ (exists ge_real_square_norm_fixed_codesquare ge_imaginary_square_norm_fixed_codesquare. ((((((ge_norm_rp_norm_fixed_code) * (ge_norm_rp_norm_fixed_code))) + (((ge_norm_rn_norm_fixed_code) * (ge_norm_rn_norm_fixed_code)))) = ((ge_real_square_norm_fixed_codesquare) + (((((ge_norm_rp_norm_fixed_code) * (ge_norm_rn_norm_fixed_code))) + (((ge_norm_rn_norm_fixed_code) * (ge_norm_rp_norm_fixed_code))))))) /\ ((((((ge_norm_ip_norm_fixed_code) * (ge_norm_ip_norm_fixed_code))) + (((ge_norm_in_norm_fixed_code) * (ge_norm_in_norm_fixed_code)))) = ((ge_imaginary_square_norm_fixed_codesquare) + (((((ge_norm_ip_norm_fixed_code) * (ge_norm_in_norm_fixed_code))) + (((ge_norm_in_norm_fixed_code) * (ge_norm_ip_norm_fixed_code))))))) /\ ((N) = ge_real_square_norm_fixed_codesquare + ge_imaginary_square_norm_fixed_codesquare)))))) -> (exists ge_real_square_norm_fixed_raw ge_imaginary_square_norm_fixed_raw. ((((((a) * (a))) + (((b) * (b)))) = ((ge_real_square_norm_fixed_raw) + (((((a) * (b))) + (((b) * (a))))))) /\ ((((((c) * (c))) + (((d) * (d)))) = ((ge_imaginary_square_norm_fixed_raw) + (((((c) * (d))) + (((d) * (c))))))) /\ ((N) = ge_real_square_norm_fixed_raw + ge_imaginary_square_norm_fixed_raw))))Constructive proof overview
Generated structural guide
The canonical norm is the actual squared modulus of every equal signed representative, not merely its selected witness.
The unchanged tactic script uses 2 declared prerequisites and contains 36 exact native proof lines.
Alpha v34 checked-use · first admitted v28 · 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 (2)
01Fix variables and assumptionsL1–8
02Separate the logical casesL9–13
03Use earlier factsL14–23
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L14
specialize gaussian_signed_norm_integer_transport x - L15
specialize gaussian_signed_norm_integer_transport x1 - L16
specialize gaussian_signed_norm_integer_transport x2 - L17
specialize gaussian_signed_norm_integer_transport x3 - L18
specialize gaussian_signed_norm_integer_transport a - L19
specialize gaussian_signed_norm_integer_transport b - L20
specialize gaussian_signed_norm_integer_transport c - L21
specialize gaussian_signed_norm_integer_transport d - L22
specialize gaussian_signed_norm_integer_transport N - L23
apply gaussian_signed_norm_integer_transport
04Use earlier factsL24–33
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L24
specialize gaussian_representation_equal z - L25
specialize gaussian_representation_equal x - L26
specialize gaussian_representation_equal x1 - L27
specialize gaussian_representation_equal x2 - L28
specialize gaussian_representation_equal x3 - L29
specialize gaussian_representation_equal a - L30
specialize gaussian_representation_equal b - L31
specialize gaussian_representation_equal c - L32
specialize gaussian_representation_equal d - L33
apply gaussian_representation_equal
Original exact command ledger · 36 lines
- 0001
intro z - 0002
intro a - 0003
intro b - 0004
intro c - 0005
intro d - 0006
intro N - 0007
intro hrep - 0008
intro hnorm - 0009
cases hnorm - 0010
cases hnorm_witness - 0011
cases hnorm_witness_witness - 0012
cases hnorm_witness_witness_witness - 0013
cases hnorm_witness_witness_witness_witness - 0014
specialize gaussian_signed_norm_integer_transport x - 0015
specialize gaussian_signed_norm_integer_transport x1 - 0016
specialize gaussian_signed_norm_integer_transport x2 - 0017
specialize gaussian_signed_norm_integer_transport x3 - 0018
specialize gaussian_signed_norm_integer_transport a - 0019
specialize gaussian_signed_norm_integer_transport b - 0020
specialize gaussian_signed_norm_integer_transport c - 0021
specialize gaussian_signed_norm_integer_transport d - 0022
specialize gaussian_signed_norm_integer_transport N - 0023
apply gaussian_signed_norm_integer_transport - 0024
specialize gaussian_representation_equal z - 0025
specialize gaussian_representation_equal x - 0026
specialize gaussian_representation_equal x1 - 0027
specialize gaussian_representation_equal x2 - 0028
specialize gaussian_representation_equal x3 - 0029
specialize gaussian_representation_equal a - 0030
specialize gaussian_representation_equal b - 0031
specialize gaussian_representation_equal c - 0032
specialize gaussian_representation_equal d - 0033
apply gaussian_representation_equal - 0034
exact hnorm_witness_witness_witness_witness_left - 0035
exact hrep - 0036
exact hnorm_witness_witness_witness_witness_right