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.
Statement with defined notation
(∀ x. Prime(x) → ∃ y. ∃ z. ∃ n. ∃ m. x = y · y + z · z + n · n + m · m) → ∀ x. ∃ y. ∃ z. ∃ n. ∃ m. x = y · y + z · z + n · n + m · mEvery purple notation token opens its conservative definition. This reading surface never changes the unchanged intuitionistic kernel or confers checked-use authority.
Definitions used by this theorem
In the theorem statement
In local proof propositions
Exact expanded first-order statement
(forall fsl_prime_universal. ((~(fsl_prime_universal = 1) /\ forall frm_prime_left_fsl_all_universal frm_prime_right_fsl_all_universal. fsl_prime_universal = frm_prime_left_fsl_all_universal * frm_prime_right_fsl_all_universal -> frm_prime_left_fsl_all_universal = 1 \/ frm_prime_right_fsl_all_universal = 1)) -> (exists fsl_a_all_universal fsl_b_all_universal fsl_c_all_universal fsl_d_all_universal. (fsl_prime_universal) = fsl_a_all_universal * fsl_a_all_universal + fsl_b_all_universal * fsl_b_all_universal + fsl_c_all_universal * fsl_c_all_universal + fsl_d_all_universal * fsl_d_all_universal)) -> forall n. (exists fsl_a_value fsl_b_value fsl_c_value fsl_d_value. (n) = fsl_a_value * fsl_a_value + fsl_b_value * fsl_b_value + fsl_c_value * fsl_c_value + fsl_d_value * fsl_d_value)Proof neighborhood
Direct theorem prerequisites
FS003I four_square_lagrange_bounded_from_primesDirect theorem dependents
Definition-aware tactic body
Only propositions whose conservative expansion has been checked for exact first-order equivalence are compacted. Every changed line retains its immutable exact replay command.
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 (1)
01Fix variables and assumptionsL1–2
02Use earlier factsL3–4
03Separate the logical casesL5–5
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L5
cases eq_decidable
04Construct an explicit witnessL6–9
05Calculate and transport equalitiesL10–11
06Use earlier factsL12–18
Instantiate or apply named facts and discharge the corresponding proof obligations.
Original defined command ledger · 18 lines
- 0001
intro hprimes - 0002
intro n - 0003
specialize eq_decidable n - 0004
specialize eq_decidable 0 - 0005
cases eq_decidable - 0006
exists 0 - 0007
exists 0 - 0008
exists 0 - 0009
exists 0 - 0010
rewrite eq_decidable_left - 0011
norm_num - 0012
specialize four_square_lagrange_bounded_from_primes n - 0013
specialize four_square_lagrange_bounded_from_primes n - 0014
apply four_square_lagrange_bounded_from_primes - 0015
specialize le_refl n - 0016
exact le_refl - 0017
exact eq_decidable_right - 0018
exact hprimes