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 a b c d. exists m. ((((a * d = b * c + m) \/ (b * c = a * d + m))) /\ ((a * a + b * b) * (c * c + d * d) = (a * c + b * d) * (a * c + b * d) + m * m))Constructive proof overview
Generated structural guide
The product of two two-square norms has the explicit coordinates a*c+b*d and a constructively witnessed absolute difference |a*d-b*c|.
The unchanged tactic script uses 3 declared prerequisites and contains 25 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
TS001A natural_absolute_difference_exists TS002E two_square_product_difference_forward TS002F two_square_product_difference_reverseDirect dependents
Formal native tactic body
Dependencies are introduced as named hypotheses before line 1. Local theorem links identify exact declared prerequisites. This dependency-curried candidate body does not grant checked theorem use or 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 (3)
01Fix variables and assumptionsL1–4
02Use earlier factsL5–6
03Separate the logical casesL7–7
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L7
cases natural_absolute_difference_exists
04Construct an explicit witnessL8–8
Supply the displayed value, then prove that it has the required property.
- L8
exists x
05Separate the logical casesL9–9
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L9
split
06Use earlier factsL10–10
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L10
exact natural_absolute_difference_exists_witness
07Separate the logical casesL11–11
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L11
cases natural_absolute_difference_exists_witness
08Use earlier factsL12–21
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L12
specialize two_square_product_difference_forward a - L13
specialize two_square_product_difference_forward b - L14
specialize two_square_product_difference_forward c - L15
specialize two_square_product_difference_forward d - L16
specialize two_square_product_difference_forward x - L17
apply two_square_product_difference_forward - L18
exact natural_absolute_difference_exists_witness_left - L19
specialize two_square_product_difference_reverse a - L20
specialize two_square_product_difference_reverse b - L21
specialize two_square_product_difference_reverse c
09Use earlier factsL22–25
Original exact command ledger · 25 lines
- 0001
intro a - 0002
intro b - 0003
intro c - 0004
intro d - 0005
specialize natural_absolute_difference_exists (a * d) - 0006
specialize natural_absolute_difference_exists (b * c) - 0007
cases natural_absolute_difference_exists - 0008
exists x - 0009
split - 0010
exact natural_absolute_difference_exists_witness - 0011
cases natural_absolute_difference_exists_witness - 0012
specialize two_square_product_difference_forward a - 0013
specialize two_square_product_difference_forward b - 0014
specialize two_square_product_difference_forward c - 0015
specialize two_square_product_difference_forward d - 0016
specialize two_square_product_difference_forward x - 0017
apply two_square_product_difference_forward - 0018
exact natural_absolute_difference_exists_witness_left - 0019
specialize two_square_product_difference_reverse a - 0020
specialize two_square_product_difference_reverse b - 0021
specialize two_square_product_difference_reverse c - 0022
specialize two_square_product_difference_reverse d - 0023
specialize two_square_product_difference_reverse x - 0024
apply two_square_product_difference_reverse - 0025
exact natural_absolute_difference_exists_witness_right