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 N. (exists ge_norm_rp_search_given_norm ge_norm_rn_search_given_norm ge_norm_ip_search_given_norm ge_norm_in_search_given_norm. ((exists ge_representation_real_code_search_given_normrepresentation ge_representation_imaginary_code_search_given_normrepresentation. (((z) = ((ge_representation_real_code_search_given_normrepresentation) + (ge_representation_imaginary_code_search_given_normrepresentation)) * S ((ge_representation_real_code_search_given_normrepresentation) + (ge_representation_imaginary_code_search_given_normrepresentation)) + ((ge_representation_imaginary_code_search_given_normrepresentation) + (ge_representation_imaginary_code_search_given_normrepresentation))) /\ ((exists ge_balance_positive_search_given_normrepresentationreal ge_balance_negative_search_given_normrepresentationreal. (((((ge_representation_real_code_search_given_normrepresentation) = 2 * (ge_balance_positive_search_given_normrepresentationreal) /\ (ge_balance_negative_search_given_normrepresentationreal) = 0) \/ exists ge_signed_half_search_given_normrepresentationrealdecode. (((ge_representation_real_code_search_given_normrepresentation) = 2 * ge_signed_half_search_given_normrepresentationrealdecode + 1 /\ (ge_balance_positive_search_given_normrepresentationreal) = 0) /\ (ge_balance_negative_search_given_normrepresentationreal) = S ge_signed_half_search_given_normrepresentationrealdecode))) /\ ((ge_norm_rp_search_given_norm) + ge_balance_negative_search_given_normrepresentationreal = (ge_norm_rn_search_given_norm) + ge_balance_positive_search_given_normrepresentationreal))) /\ (exists ge_balance_positive_search_given_normrepresentationimaginary ge_balance_negative_search_given_normrepresentationimaginary. (((((ge_representation_imaginary_code_search_given_normrepresentation) = 2 * (ge_balance_positive_search_given_normrepresentationimaginary) /\ (ge_balance_negative_search_given_normrepresentationimaginary) = 0) \/ exists ge_signed_half_search_given_normrepresentationimaginarydecode. (((ge_representation_imaginary_code_search_given_normrepresentation) = 2 * ge_signed_half_search_given_normrepresentationimaginarydecode + 1 /\ (ge_balance_positive_search_given_normrepresentationimaginary) = 0) /\ (ge_balance_negative_search_given_normrepresentationimaginary) = S ge_signed_half_search_given_normrepresentationimaginarydecode))) /\ ((ge_norm_ip_search_given_norm) + ge_balance_negative_search_given_normrepresentationimaginary = (ge_norm_in_search_given_norm) + ge_balance_positive_search_given_normrepresentationimaginary)))))) /\ (exists ge_real_square_search_given_normsquare ge_imaginary_square_search_given_normsquare. ((((((ge_norm_rp_search_given_norm) * (ge_norm_rp_search_given_norm))) + (((ge_norm_rn_search_given_norm) * (ge_norm_rn_search_given_norm)))) = ((ge_real_square_search_given_normsquare) + (((((ge_norm_rp_search_given_norm) * (ge_norm_rn_search_given_norm))) + (((ge_norm_rn_search_given_norm) * (ge_norm_rp_search_given_norm))))))) /\ ((((((ge_norm_ip_search_given_norm) * (ge_norm_ip_search_given_norm))) + (((ge_norm_in_search_given_norm) * (ge_norm_in_search_given_norm)))) = ((ge_imaginary_square_search_given_normsquare) + (((((ge_norm_ip_search_given_norm) * (ge_norm_in_search_given_norm))) + (((ge_norm_in_search_given_norm) * (ge_norm_ip_search_given_norm))))))) /\ ((N) = ge_real_square_search_given_normsquare + ge_imaginary_square_search_given_normsquare)))))) -> (exists gr_search_real_search_bounded_coordinates gr_search_imaginary_search_bounded_coordinates. (((z)=((gr_search_real_search_bounded_coordinates) + (gr_search_imaginary_search_bounded_coordinates)) * S ((gr_search_real_search_bounded_coordinates) + (gr_search_imaginary_search_bounded_coordinates)) + ((gr_search_imaginary_search_bounded_coordinates) + (gr_search_imaginary_search_bounded_coordinates))) /\ ((exists ge_gap_search_bounded_coordinatesreal_bound. ge_gap_search_bounded_coordinatesreal_bound + (gr_search_real_search_bounded_coordinates) = (2*(N))) /\ (exists ge_gap_search_bounded_coordinatesimaginary_bound. ge_gap_search_bounded_coordinatesimaginary_bound + (gr_search_imaginary_search_bounded_coordinates) = (2*(N))))))Constructive proof overview
Generated structural guide
An actual Gaussian norm bounds both canonical signed-coordinate codes; arbitrary non-normal representatives are never bounded.
The unchanged tactic script uses 5 declared prerequisites and contains 63 exact native proof lines.
Alpha v34 checked-use · first admitted v30 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
GF0003 gaussian_norm_input_valid gaussian_decode_representation Alpha theorem; checked-use authorized gaussian_norm_for_representation Alpha theorem; checked-use authorized GF006E gaussian_search_signed_code_bound add_comm Stable 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.
Named ingredients (2)
01Fix variables and assumptionsL1–3
02Establish hvalidL4–8
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply gaussian norm input valid.
03Separate the logical casesL9–12
04Establish hrawL13–22
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply gaussian norm for representation.
- L13
have hraw : (exists ge_real_square_search_canonical_norm ge_imaginary_square_search_canonical_norm. ((((((x) * (x))) + (((x1) * (x1)))) = ((ge_real_square_search_canonical_norm) + (((((x) * (x1))) + (((x1) * (x))))))) /\ ((((((x2) * (x2))) + (((x3) * (x3)))) = ((ge_imaginary_square_search_canonical_norm) + (((((x2) * (x3))) + (((x3) * (x2))))))) /\ ((N) = ge_real_square_search_canonical_norm + ge_imaginary_square_search_canonical_norm)))) - L14
specialize gaussian_norm_for_representation (z) - L15
specialize gaussian_norm_for_representation (x) - L16
specialize gaussian_norm_for_representation (x1) - L17
specialize gaussian_norm_for_representation (x2) - L18
specialize gaussian_norm_for_representation (x3) - L19
specialize gaussian_norm_for_representation (N) - L20
apply gaussian_norm_for_representation - L21
specialize gaussian_decode_representation (z) - L22
specialize gaussian_decode_representation (x)
05Use earlier factsL23–28
Instantiate or apply named facts and discharge the corresponding proof obligations.
06Separate the logical casesL29–36
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L29
cases hvalid_witness_witness_witness_witness - L30
cases hvalid_witness_witness_witness_witness_witness - L31
cases hvalid_witness_witness_witness_witness_witness_witness - L32
cases hvalid_witness_witness_witness_witness_witness_witness_right - L33
cases hraw - L34
cases hraw_witness - L35
cases hraw_witness_witness - L36
cases hraw_witness_witness_right
07Construct an explicit witnessL37–38
08Separate the logical casesL39–39
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L39
split
09Use earlier factsL40–40
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L40
exact hvalid_witness_witness_witness_witness_witness_witness_left
10Separate the logical casesL41–41
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L41
split
11Use earlier factsL42–49
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L42
specialize gaussian_search_signed_code_bound (x4) - L43
specialize gaussian_search_signed_code_bound (x) - L44
specialize gaussian_search_signed_code_bound (x1) - L45
specialize gaussian_search_signed_code_bound (x6) - L46
specialize gaussian_search_signed_code_bound (N) - L47
apply gaussian_search_signed_code_bound - L48
exact hvalid_witness_witness_witness_witness_witness_witness_right_left - L49
exact hraw_witness_witness_left
12Construct an explicit witnessL50–50
Supply the displayed value, then prove that it has the required property.
- L50
exists x7
13Calculate and transport equalitiesL51–51
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L51
rewrite hraw_witness_witness_right_right
14Use earlier factsL52–60
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L52
apply add_comm - L53
specialize gaussian_search_signed_code_bound (x5) - L54
specialize gaussian_search_signed_code_bound (x2) - L55
specialize gaussian_search_signed_code_bound (x3) - L56
specialize gaussian_search_signed_code_bound (x7) - L57
specialize gaussian_search_signed_code_bound (N) - L58
apply gaussian_search_signed_code_bound - L59
exact hvalid_witness_witness_witness_witness_witness_witness_right_right - L60
exact hraw_witness_witness_right_left
15Construct an explicit witnessL61–61
Supply the displayed value, then prove that it has the required property.
- L61
exists x6
16Calculate and transport equalitiesL62–62
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L62
symm
17Use earlier factsL63–63
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L63
exact hraw_witness_witness_right_right
Original exact command ledger · 63 lines
- 0001
intro z - 0002
intro N - 0003
intro hnorm - 0004
have hvalid : (exists ge_real_positive_search_norm_valid ge_real_negative_search_norm_valid ge_imaginary_positive_search_norm_valid ge_imaginary_negative_search_norm_valid. (exists ge_real_code_search_norm_validdecode ge_imaginary_code_search_norm_validdecode. (((z) = ((ge_real_code_search_norm_validdecode) + (ge_imaginary_code_search_norm_validdecode)) * S ((ge_real_code_search_norm_validdecode) + (ge_imaginary_code_search_norm_validdecode)) + ((ge_imaginary_code_search_norm_validdecode) + (ge_imaginary_code_search_norm_validdecode))) /\ (((((ge_real_code_search_norm_validdecode) = 2 * (ge_real_positive_search_norm_valid) /\ (ge_real_negative_search_norm_valid) = 0) \/ exists ge_signed_half_ge_search_norm_validdecode_real. (((ge_real_code_search_norm_validdecode) = 2 * ge_signed_half_ge_search_norm_validdecode_real + 1 /\ (ge_real_positive_search_norm_valid) = 0) /\ (ge_real_negative_search_norm_valid) = S ge_signed_half_ge_search_norm_validdecode_real))) /\ ((((ge_imaginary_code_search_norm_validdecode) = 2 * (ge_imaginary_positive_search_norm_valid) /\ (ge_imaginary_negative_search_norm_valid) = 0) \/ exists ge_signed_half_ge_search_norm_validdecode_imaginary. (((ge_imaginary_code_search_norm_validdecode) = 2 * ge_signed_half_ge_search_norm_validdecode_imaginary + 1 /\ (ge_imaginary_positive_search_norm_valid) = 0) /\ (ge_imaginary_negative_search_norm_valid) = S ge_signed_half_ge_search_norm_validdecode_imaginary))))))) - 0005
specialize gaussian_norm_input_valid (z) - 0006
specialize gaussian_norm_input_valid (N) - 0007
apply gaussian_norm_input_valid - 0008
exact hnorm - 0009
cases hvalid - 0010
cases hvalid_witness - 0011
cases hvalid_witness_witness - 0012
cases hvalid_witness_witness_witness - 0013
have hraw : (exists ge_real_square_search_canonical_norm ge_imaginary_square_search_canonical_norm. ((((((x) * (x))) + (((x1) * (x1)))) = ((ge_real_square_search_canonical_norm) + (((((x) * (x1))) + (((x1) * (x))))))) /\ ((((((x2) * (x2))) + (((x3) * (x3)))) = ((ge_imaginary_square_search_canonical_norm) + (((((x2) * (x3))) + (((x3) * (x2))))))) /\ ((N) = ge_real_square_search_canonical_norm + ge_imaginary_square_search_canonical_norm)))) - 0014
specialize gaussian_norm_for_representation (z) - 0015
specialize gaussian_norm_for_representation (x) - 0016
specialize gaussian_norm_for_representation (x1) - 0017
specialize gaussian_norm_for_representation (x2) - 0018
specialize gaussian_norm_for_representation (x3) - 0019
specialize gaussian_norm_for_representation (N) - 0020
apply gaussian_norm_for_representation - 0021
specialize gaussian_decode_representation (z) - 0022
specialize gaussian_decode_representation (x) - 0023
specialize gaussian_decode_representation (x1) - 0024
specialize gaussian_decode_representation (x2) - 0025
specialize gaussian_decode_representation (x3) - 0026
apply gaussian_decode_representation - 0027
exact hvalid_witness_witness_witness_witness - 0028
exact hnorm - 0029
cases hvalid_witness_witness_witness_witness - 0030
cases hvalid_witness_witness_witness_witness_witness - 0031
cases hvalid_witness_witness_witness_witness_witness_witness - 0032
cases hvalid_witness_witness_witness_witness_witness_witness_right - 0033
cases hraw - 0034
cases hraw_witness - 0035
cases hraw_witness_witness - 0036
cases hraw_witness_witness_right - 0037
exists (x4) - 0038
exists (x5) - 0039
split - 0040
exact hvalid_witness_witness_witness_witness_witness_witness_left - 0041
split - 0042
specialize gaussian_search_signed_code_bound (x4) - 0043
specialize gaussian_search_signed_code_bound (x) - 0044
specialize gaussian_search_signed_code_bound (x1) - 0045
specialize gaussian_search_signed_code_bound (x6) - 0046
specialize gaussian_search_signed_code_bound (N) - 0047
apply gaussian_search_signed_code_bound - 0048
exact hvalid_witness_witness_witness_witness_witness_witness_right_left - 0049
exact hraw_witness_witness_left - 0050
exists x7 - 0051
rewrite hraw_witness_witness_right_right - 0052
apply add_comm - 0053
specialize gaussian_search_signed_code_bound (x5) - 0054
specialize gaussian_search_signed_code_bound (x2) - 0055
specialize gaussian_search_signed_code_bound (x3) - 0056
specialize gaussian_search_signed_code_bound (x7) - 0057
specialize gaussian_search_signed_code_bound (N) - 0058
apply gaussian_search_signed_code_bound - 0059
exact hvalid_witness_witness_witness_witness_witness_witness_right_right - 0060
exact hraw_witness_witness_right_left - 0061
exists x6 - 0062
symm - 0063
exact hraw_witness_witness_right_right