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
∀ a. ∀ b. ∀ h. (a · a · a · a + b · b · b · b = h · h · h · h → TrivialFermatFourSolution(a,b,h)) ∧ (TrivialFermatFourSolution(a,b,h) → a · a · a · a + b · b · b · b = h · h · h · h)Every 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 a b h. ((a * a * a * a + b * b * b * b = h * h * h * h -> ((((a) = 0 /\ (b) = (h)) \/ ((b) = 0 /\ (a) = (h))))) /\ (((((a) = 0 /\ (b) = (h)) \/ ((b) = 0 /\ (a) = (h)))) -> a * a * a * a + b * b * b * b = h * h * h * h))Proof neighborhood
Direct theorem prerequisites
PF002R fermat_four_solutions_have_zero_coordinate PF001B square_eq_injective fourth_power_regroup · Stable closed mul_zero_left · Stable closed zero_add · Stable closedDirect 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 (2)
01Fix variables and assumptionsL1–3
02Separate the logical casesL4–4
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L4
split
03Fix variables and assumptionsL5–5
Work with arbitrary variables or the premises of the current implication.
- L5
intro hequation
04Establish hzeroL6–8
05Separate the logical casesL9–11
06Use earlier factsL12–14
07Calculate and transport equalitiesL15–16
08Use earlier factsL17–17
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L17
apply fourth_power_regroup
09Calculate and transport equalitiesL18–21
10Use earlier factsL22–23
11Separate the logical casesL24–25
12Use earlier factsL26–28
13Calculate and transport equalitiesL29–30
14Use earlier factsL31–31
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L31
apply fourth_power_regroup
15Calculate and transport equalitiesL32–35
16Use earlier factsL36–37
17Fix variables and assumptionsL38–38
Work with arbitrary variables or the premises of the current implication.
- L38
intro htrivial
18Separate the logical casesL39–40
19Calculate and transport equalitiesL41–41
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L41
simp [htrivial_left_left, htrivial_left_right, mul_zero_left, zero_add]
20Separate the logical casesL42–42
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L42
cases htrivial_right
21Calculate and transport equalitiesL43–43
Carry out the recorded arithmetic or equality steps; inspect the exact commands for their direction and premises.
- L43
simp [htrivial_right_left, htrivial_right_right, mul_zero_left, zero_add]
Original defined command ledger · 43 lines
- 0001
intro a - 0002
intro b - 0003
intro h - 0004
split - 0005
intro hequation - 0006
have hzero : a = 0 \/ b = 0 - 0007
apply fermat_four_solutions_have_zero_coordinate - 0008
exact hequation - 0009
cases hzero - 0010
left - 0011
split - 0012
exact hzero_left - 0013
apply square_eq_injective - 0014
apply square_eq_injective - 0015
trans b * b * b * b - 0016
symm - 0017
apply fourth_power_regroup - 0018
trans h * h * h * h - 0019
trans a * a * a * a + b * b * b * b - 0020
symm - 0021
simp [hzero_left, mul_zero_left, zero_add] - 0022
exact hequation - 0023
apply fourth_power_regroup - 0024
right - 0025
split - 0026
exact hzero_right - 0027
apply square_eq_injective - 0028
apply square_eq_injective - 0029
trans a * a * a * a - 0030
symm - 0031
apply fourth_power_regroup - 0032
trans h * h * h * h - 0033
trans a * a * a * a + b * b * b * b - 0034
symm - 0035
simp [hzero_right, mul_zero_left, zero_add] - 0036
exact hequation - 0037
apply fourth_power_regroup - 0038
intro htrivial - 0039
cases htrivial - 0040
cases htrivial_left - 0041
simp [htrivial_left_left, htrivial_left_right, mul_zero_left, zero_add] - 0042
cases htrivial_right - 0043
simp [htrivial_right_left, htrivial_right_right, mul_zero_left, zero_add]