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. PrimitiveFermatFourCounterexample(a,b,h) → ∃ x. ∃ y. ∃ z. SmallerFermatFourCounterexample(x,y,z,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) = 0) /\ (~((b) = 0) /\ (~((h) = 0) /\ ((a) * (a) * (a) * (a) + (b) * (b) * (b) * (b) = (h) * (h)))))) /\ (forall pff_divisor_primitive_descent_source. (exists pff_left_primitive_descent_source. (a) = pff_divisor_primitive_descent_source * pff_left_primitive_descent_source) -> (exists pff_right_primitive_descent_source. (b) = pff_divisor_primitive_descent_source * pff_right_primitive_descent_source) -> pff_divisor_primitive_descent_source = 1))) -> exists A B H. ((((~((A) = 0) /\ (~((B) = 0) /\ (~((H) = 0) /\ ((A) * (A) * (A) * (A) + (B) * (B) * (B) * (B) = (H) * (H)))))) /\ (exists ffd_gap_primitive_descent_result. ffd_gap_primitive_descent_result + S H = h)))Proof neighborhood
Direct theorem prerequisites
PF002I fermat_four_primitive_square_triangle PF0014 pythagorean_primitive_legs_opposite_parity PF002J fermat_four_primitive_counterexample_swap PF002K fermat_four_primitive_odd_even_descentDirect 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 (4)
01Fix variables and assumptionsL1–4
02Establish htriangleL5–7
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply fermat four primitive square triangle.
- L5
have htriangle : PrimitivePythagorean(a · a,b · b,h)Definitions: PrimitivePythagorean(a · a,b · b,h)Original native command in the exact edition - L6
apply fermat_four_primitive_square_triangle - L7
exact hprimitive
03Establish hparityL8–13
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply pythagorean primitive legs opposite parity.
- L8
have hparity : OppositeParity(a · a,b · b)Definitions: OppositeParity(a · a,b · b)Original native command in the exact edition - L9
specialize pythagorean_primitive_legs_opposite_parity (a * a) - L10
specialize pythagorean_primitive_legs_opposite_parity (b * b) - L11
specialize pythagorean_primitive_legs_opposite_parity (h) - L12
apply pythagorean_primitive_legs_opposite_parity - L13
exact htriangle
04Separate the logical casesL14–15
05Use earlier factsL16–23
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L16
specialize fermat_four_primitive_odd_even_descent (b) - L17
specialize fermat_four_primitive_odd_even_descent (a) - L18
specialize fermat_four_primitive_odd_even_descent (h) - L19
apply fermat_four_primitive_odd_even_descent - L20
apply fermat_four_primitive_counterexample_swap - L21
exact hprimitive - L22
exact hparity_left_right - L23
exact hparity_left_left
06Separate the logical casesL24–24
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L24
cases hparity_right
07Use earlier factsL25–31
Instantiate or apply named facts and discharge the corresponding proof obligations.
Original defined command ledger · 31 lines
- 0001
intro a - 0002
intro b - 0003
intro h - 0004
intro hprimitive - 0005
have htriangle : PrimitivePythagorean(a · a,b · b,h)Exact native replay line
have htriangle : (((a * a) * (a * a) + (b * b) * (b * b) = (h) * (h)) /\ (forall pff_divisor_ffd_primitive_descent_triangle. (exists pff_left_ffd_primitive_descent_triangle. (a * a) = pff_divisor_ffd_primitive_descent_triangle * pff_left_ffd_primitive_descent_triangle) -> (exists pff_right_ffd_primitive_descent_triangle. (b * b) = pff_divisor_ffd_primitive_descent_triangle * pff_right_ffd_primitive_descent_triangle) -> pff_divisor_ffd_primitive_descent_triangle = 1)) - 0006
apply fermat_four_primitive_square_triangle - 0007
exact hprimitive - 0008
have hparity : OppositeParity(a · a,b · b)Exact native replay line
have hparity : (((exists pp_even_ffd_primitive_descent_parity_first_even. (a * a) = 2 * pp_even_ffd_primitive_descent_parity_first_even) /\ (exists pp_odd_ffd_primitive_descent_parity_second_odd. (b * b) = 2 * pp_odd_ffd_primitive_descent_parity_second_odd + 1)) \/ ((exists pp_odd_ffd_primitive_descent_parity_first_odd. (a * a) = 2 * pp_odd_ffd_primitive_descent_parity_first_odd + 1) /\ (exists pp_even_ffd_primitive_descent_parity_second_even. (b * b) = 2 * pp_even_ffd_primitive_descent_parity_second_even))) - 0009
specialize pythagorean_primitive_legs_opposite_parity (a * a) - 0010
specialize pythagorean_primitive_legs_opposite_parity (b * b) - 0011
specialize pythagorean_primitive_legs_opposite_parity (h) - 0012
apply pythagorean_primitive_legs_opposite_parity - 0013
exact htriangle - 0014
cases hparity - 0015
cases hparity_left - 0016
specialize fermat_four_primitive_odd_even_descent (b) - 0017
specialize fermat_four_primitive_odd_even_descent (a) - 0018
specialize fermat_four_primitive_odd_even_descent (h) - 0019
apply fermat_four_primitive_odd_even_descent - 0020
apply fermat_four_primitive_counterexample_swap - 0021
exact hprimitive - 0022
exact hparity_left_right - 0023
exact hparity_left_left - 0024
cases hparity_right - 0025
specialize fermat_four_primitive_odd_even_descent (a) - 0026
specialize fermat_four_primitive_odd_even_descent (b) - 0027
specialize fermat_four_primitive_odd_even_descent (h) - 0028
apply fermat_four_primitive_odd_even_descent - 0029
exact hprimitive - 0030
exact hparity_right_left - 0031
exact hparity_right_right