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
∀ m. ∀ n. ∀ d. m · m = n · n + d → Coprime(m,n) → OppositeParity(m,n) → Coprime(d,2 · (m · n))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 m n d. m * m = n * n + d -> (forall pff_divisor_primitive_parameters. (exists pff_left_primitive_parameters. (m) = pff_divisor_primitive_parameters * pff_left_primitive_parameters) -> (exists pff_right_primitive_parameters. (n) = pff_divisor_primitive_parameters * pff_right_primitive_parameters) -> pff_divisor_primitive_parameters = 1) -> ((((exists pp_even_primitive_parameters_first_even. (m) = 2 * pp_even_primitive_parameters_first_even) /\ (exists pp_odd_primitive_parameters_second_odd. (n) = 2 * pp_odd_primitive_parameters_second_odd + 1)) \/ ((exists pp_odd_primitive_parameters_first_odd. (m) = 2 * pp_odd_primitive_parameters_first_odd + 1) /\ (exists pp_even_primitive_parameters_second_even. (n) = 2 * pp_even_primitive_parameters_second_even)))) -> (forall pff_divisor_euclidean_legs. (exists pff_left_euclidean_legs. (d) = pff_divisor_euclidean_legs * pff_left_euclidean_legs) -> (exists pff_right_euclidean_legs. (2 * (m * n)) = pff_divisor_euclidean_legs * pff_right_euclidean_legs) -> pff_divisor_euclidean_legs = 1)Proof neighborhood
Direct theorem prerequisites
PF000L pythagorean_opposite_parity_square_gap_odd PF000N pythagorean_odd_coordinate_coprime_two PF000R pythagorean_square_gap_coprime_parameter_product coprime_mul_right · 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 (3)
01Fix variables and assumptionsL1–6
02Establish hoddL7–16
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply pythagorean opposite parity square gap odd.
- L7
- L8
specialize pythagorean_opposite_parity_square_gap_odd m - L9
specialize pythagorean_opposite_parity_square_gap_odd n - L10
specialize pythagorean_opposite_parity_square_gap_odd d - L11
apply pythagorean_opposite_parity_square_gap_odd - L12
exact hgap - L13
exact hopposite - L14
specialize coprime_mul_right d - L15
specialize coprime_mul_right 2 - L16
specialize coprime_mul_right (m * n)
03Use earlier factsL17–26
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L17
apply coprime_mul_right - L18
specialize pythagorean_odd_coordinate_coprime_two d - L19
apply pythagorean_odd_coordinate_coprime_two - L20
exact hodd - L21
specialize pythagorean_square_gap_coprime_parameter_product m - L22
specialize pythagorean_square_gap_coprime_parameter_product n - L23
specialize pythagorean_square_gap_coprime_parameter_product d - L24
apply pythagorean_square_gap_coprime_parameter_product - L25
exact hgap - L26
exact hcoprime
Original defined command ledger · 26 lines
- 0001
intro m - 0002
intro n - 0003
intro d - 0004
intro hgap - 0005
intro hcoprime - 0006
intro hopposite - 0007
have hodd : Odd(d)Exact native replay line
have hodd : exists q. d = 2 * q + 1 - 0008
specialize pythagorean_opposite_parity_square_gap_odd m - 0009
specialize pythagorean_opposite_parity_square_gap_odd n - 0010
specialize pythagorean_opposite_parity_square_gap_odd d - 0011
apply pythagorean_opposite_parity_square_gap_odd - 0012
exact hgap - 0013
exact hopposite - 0014
specialize coprime_mul_right d - 0015
specialize coprime_mul_right 2 - 0016
specialize coprime_mul_right (m * n) - 0017
apply coprime_mul_right - 0018
specialize pythagorean_odd_coordinate_coprime_two d - 0019
apply pythagorean_odd_coordinate_coprime_two - 0020
exact hodd - 0021
specialize pythagorean_square_gap_coprime_parameter_product m - 0022
specialize pythagorean_square_gap_coprime_parameter_product n - 0023
specialize pythagorean_square_gap_coprime_parameter_product d - 0024
apply pythagorean_square_gap_coprime_parameter_product - 0025
exact hgap - 0026
exact hcoprime