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 n z. (exists ftsc_first_ftsv_scale_source ftsc_second_ftsv_scale_source. (n) = ftsc_first_ftsv_scale_source * ftsc_first_ftsv_scale_source + ftsc_second_ftsv_scale_source * ftsc_second_ftsv_scale_source) -> (exists ftsc_first_ftsv_scale_result ftsc_second_ftsv_scale_result. (n * (z * z)) = ftsc_first_ftsv_scale_result * ftsc_first_ftsv_scale_result + ftsc_second_ftsv_scale_result * ftsc_second_ftsv_scale_result)Constructive proof overview
Generated structural guide
Every represented natural remains represented after multiplication by an arbitrary natural square.
The unchanged tactic script uses 2 declared prerequisites and contains 11 exact native proof lines.
dependency-curried kernel-checked theorem body; Alpha enrollment and checked-use authority follow separately sealed release evidence; Stable membership remains unchanged
Proof neighborhood
Direct dependencies
TS001Z every_natural_square_is_sum_of_two_squares TS001X two_square_representation_multiplicatively_closedDirect 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 hsquareL4–11
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply two square representation multiplicatively closed.
- L4
have hsquare : exists ftsc_first_ftsv_scale_witness ftsc_second_ftsv_scale_witness. (z * z) = ftsc_first_ftsv_scale_witness * ftsc_first_ftsv_scale_witness + ftsc_second_ftsv_scale_witness * ftsc_second_ftsv_scale_witness - L5
specialize every_natural_square_is_sum_of_two_squares z - L6
exact every_natural_square_is_sum_of_two_squares - L7
specialize two_square_representation_multiplicatively_closed n - L8
specialize two_square_representation_multiplicatively_closed (z * z) - L9
apply two_square_representation_multiplicatively_closed - L10
exact hrepresented - L11
exact hsquare
Original exact command ledger · 11 lines
- 0001
intro n - 0002
intro z - 0003
intro hrepresented - 0004
have hsquare : exists ftsc_first_ftsv_scale_witness ftsc_second_ftsv_scale_witness. (z * z) = ftsc_first_ftsv_scale_witness * ftsc_first_ftsv_scale_witness + ftsc_second_ftsv_scale_witness * ftsc_second_ftsv_scale_witness - 0005
specialize every_natural_square_is_sum_of_two_squares z - 0006
exact every_natural_square_is_sum_of_two_squares - 0007
specialize two_square_representation_multiplicatively_closed n - 0008
specialize two_square_representation_multiplicatively_closed (z * z) - 0009
apply two_square_representation_multiplicatively_closed - 0010
exact hrepresented - 0011
exact hsquare