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 n. (exists ff_residue_ptmf_number. (n) = 4 * ff_residue_ptmf_number + 3) -> exists p. ((((~(p = 1) /\ forall frm_prime_left_ptmf_source_prime frm_prime_right_ptmf_source_prime. p = frm_prime_left_ptmf_source_prime * frm_prime_right_ptmf_source_prime -> frm_prime_left_ptmf_source_prime = 1 \/ frm_prime_right_ptmf_source_prime = 1)) /\ ((exists ff_residue_ptmf_source_residue. (p) = 4 * ff_residue_ptmf_source_residue + 3) /\ (exists ff_quotient_ptmf_source_divides. (n) = (p) * ff_quotient_ptmf_source_divides))))Constructive proof overview
Generated structural guide
Every natural congruent to three modulo four has an actual prime divisor congruent to three modulo four, obtained by constructive finite search and beta-coded prime factorization.
The unchanged tactic script uses 6 declared prerequisites and contains 46 exact native proof lines.
Alpha v34 checked-use · first admitted v23 · independently kernel and Lean verified; not Stable
Proof neighborhood
Direct dependencies
TF0007 three_mod_four_progression_nonzero TF000C three_mod_four_prime_divisor_bounded_search TF0006 positive_number_with_admissible_prime_divisors_is_two_square prime_mod_four_good_or_three Alpha theorem; checked-use authorized divisor_le_nonzero Stable theorem; checked-use authorized TF0009 three_mod_four_progression_not_two_squareDirect dependents
Formal native tactic body
Dependencies are introduced as named hypotheses before line 1. Local theorem links identify exact declared prerequisites. This exact body belongs to a complete independently kernel-checked constructive proof bundle and has Alpha checked-use authority; it does not imply 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 (4)
01Fix variables and assumptionsL1–2
02Establish hnonzeroL3–10
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply three mod four progression nonzero.
03Separate the logical casesL11–12
04Establish hrepresentedL13–19
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply positive number with admissible prime divisors is two square.
- L13
have hrepresented : exists ptmf_first_represented ptmf_second_represented. (n) = ptmf_first_represented * ptmf_first_represented + ptmf_second_represented * ptmf_second_represented - L14
specialize positive_number_with_admissible_prime_divisors_is_two_square n - L15
apply positive_number_with_admissible_prime_divisors_is_two_square - L16
exact hnonzero - L17
intro p - L18
intro hprime - L19
intro hdivides
05Establish hclassL20–23
Establish this local claim before using it. It is not an additional assumption. The following proof commands apply prime mod four good or three.
06Separate the logical casesL24–24
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L24
cases hclass
07Use earlier factsL25–25
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L25
exact hclass_left
08Separate the logical casesL26–26
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L26
exfalso
09Use earlier factsL27–33
Instantiate or apply named facts and discharge the corresponding proof obligations.
10Separate the logical casesL34–34
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L34
split
11Use earlier factsL35–35
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L35
exact hprime
12Separate the logical casesL36–36
Follow the explicit conjunction, disjunction, witness, or contradiction step recorded below.
- L36
split
13Use earlier factsL37–42
14Separate the logical casesL43–44
15Construct an explicit witnessL45–45
Supply the displayed value, then prove that it has the required property.
- L45
exists x
16Use earlier factsL46–46
Instantiate or apply named facts and discharge the corresponding proof obligations.
- L46
exact three_mod_four_prime_divisor_bounded_search_right_witness_right
Original exact command ledger · 46 lines
- 0001
intro n - 0002
intro hthree - 0003
have hnonzero : ~(n = 0) - 0004
intro hzero - 0005
specialize three_mod_four_progression_nonzero n - 0006
apply three_mod_four_progression_nonzero - 0007
exact hthree - 0008
exact hzero - 0009
specialize three_mod_four_prime_divisor_bounded_search n - 0010
specialize three_mod_four_prime_divisor_bounded_search n - 0011
cases three_mod_four_prime_divisor_bounded_search - 0012
exfalso - 0013
have hrepresented : exists ptmf_first_represented ptmf_second_represented. (n) = ptmf_first_represented * ptmf_first_represented + ptmf_second_represented * ptmf_second_represented - 0014
specialize positive_number_with_admissible_prime_divisors_is_two_square n - 0015
apply positive_number_with_admissible_prime_divisors_is_two_square - 0016
exact hnonzero - 0017
intro p - 0018
intro hprime - 0019
intro hdivides - 0020
have hclass : (p = 2 \/ exists k. p = 4 * k + 1) \/ exists k. p = 4 * k + 3 - 0021
specialize prime_mod_four_good_or_three p - 0022
apply prime_mod_four_good_or_three - 0023
exact hprime - 0024
cases hclass - 0025
exact hclass_left - 0026
exfalso - 0027
specialize three_mod_four_prime_divisor_bounded_search_left p - 0028
apply three_mod_four_prime_divisor_bounded_search_left - 0029
specialize divisor_le_nonzero p - 0030
specialize divisor_le_nonzero n - 0031
apply divisor_le_nonzero - 0032
exact hnonzero - 0033
exact hdivides - 0034
split - 0035
exact hprime - 0036
split - 0037
exact hclass_right - 0038
exact hdivides - 0039
specialize three_mod_four_progression_not_two_square n - 0040
apply three_mod_four_progression_not_two_square - 0041
exact hthree - 0042
exact hrepresented - 0043
cases three_mod_four_prime_divisor_bounded_search_right - 0044
cases three_mod_four_prime_divisor_bounded_search_right_witness - 0045
exists x - 0046
exact three_mod_four_prime_divisor_bounded_search_right_witness_right