Metamath Proof Explorer


Theorem fmtnoprmfac1

Description: Divisor of Fermat number (special form of Euler's result, see fmtnofac1 ): Let F_n be a Fermat number. Let p be a prime divisor of F_n. Then p is in the form: k*2^(n+1)+1 where k is a positive integer. (Contributed by AV, 25-Jul-2021)

Ref Expression
Assertion fmtnoprmfac1 ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ P ∥ FermatNo ⁡ N → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1

Proof

Step Hyp Ref Expression
1 breq1 ⊢ P = 2 → P ∥ FermatNo ⁡ N ↔ 2 ∥ FermatNo ⁡ N
2 1 adantr ⊢ P = 2 ∧ N ∈ ℕ → P ∥ FermatNo ⁡ N ↔ 2 ∥ FermatNo ⁡ N
3 nnnn0 ⊢ N ∈ ℕ → N ∈ ℕ 0
4 fmtnoodd ⊢ N ∈ ℕ 0 → ¬ 2 ∥ FermatNo ⁡ N
5 3 4 syl ⊢ N ∈ ℕ → ¬ 2 ∥ FermatNo ⁡ N
6 5 adantl ⊢ P = 2 ∧ N ∈ ℕ → ¬ 2 ∥ FermatNo ⁡ N
7 6 pm2.21d ⊢ P = 2 ∧ N ∈ ℕ → 2 ∥ FermatNo ⁡ N → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
8 2 7 sylbid ⊢ P = 2 ∧ N ∈ ℕ → P ∥ FermatNo ⁡ N → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
9 8 a1d ⊢ P = 2 ∧ N ∈ ℕ → P ∈ ℙ → P ∥ FermatNo ⁡ N → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
10 9 ex ⊢ P = 2 → N ∈ ℕ → P ∈ ℙ → P ∥ FermatNo ⁡ N → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
11 10 3impd ⊢ P = 2 → N ∈ ℕ ∧ P ∈ ℙ ∧ P ∥ FermatNo ⁡ N → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
12 simpr1 ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ ∧ P ∥ FermatNo ⁡ N → N ∈ ℕ
13 neqne ⊢ ¬ P = 2 → P ≠ 2
14 13 anim2i ⊢ P ∈ ℙ ∧ ¬ P = 2 → P ∈ ℙ ∧ P ≠ 2
15 eldifsn ⊢ P ∈ ℙ ∖ 2 ↔ P ∈ ℙ ∧ P ≠ 2
16 14 15 sylibr ⊢ P ∈ ℙ ∧ ¬ P = 2 → P ∈ ℙ ∖ 2
17 16 ex ⊢ P ∈ ℙ → ¬ P = 2 → P ∈ ℙ ∖ 2
18 17 3ad2ant2 ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ P ∥ FermatNo ⁡ N → ¬ P = 2 → P ∈ ℙ ∖ 2
19 18 impcom ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ ∧ P ∥ FermatNo ⁡ N → P ∈ ℙ ∖ 2
20 simpr3 ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ ∧ P ∥ FermatNo ⁡ N → P ∥ FermatNo ⁡ N
21 fmtnoprmfac1lem ⊢ N ∈ ℕ ∧ P ∈ ℙ ∖ 2 ∧ P ∥ FermatNo ⁡ N → odℤ ⁡ P ⁡ 2 = 2 N + 1
22 12 19 20 21 syl3anc ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ ∧ P ∥ FermatNo ⁡ N → odℤ ⁡ P ⁡ 2 = 2 N + 1
23 prmnn ⊢ P ∈ ℙ → P ∈ ℕ
24 23 ad2antll ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → P ∈ ℕ
25 2z ⊢ 2 ∈ ℤ
26 25 a1i ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → 2 ∈ ℤ
27 13 necomd ⊢ ¬ P = 2 → 2 ≠ P
28 27 adantr ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → 2 ≠ P
29 2prm ⊢ 2 ∈ ℙ
30 29 a1i ⊢ N ∈ ℕ → 2 ∈ ℙ
31 30 anim1i ⊢ N ∈ ℕ ∧ P ∈ ℙ → 2 ∈ ℙ ∧ P ∈ ℙ
32 31 adantl ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → 2 ∈ ℙ ∧ P ∈ ℙ
33 prmrp ⊢ 2 ∈ ℙ ∧ P ∈ ℙ → 2 gcd P = 1 ↔ 2 ≠ P
34 32 33 syl ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → 2 gcd P = 1 ↔ 2 ≠ P
35 28 34 mpbird ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → 2 gcd P = 1
36 odzphi ⊢ P ∈ ℕ ∧ 2 ∈ ℤ ∧ 2 gcd P = 1 → odℤ ⁡ P ⁡ 2 ∥ ϕ ⁡ P
37 24 26 35 36 syl3anc ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → odℤ ⁡ P ⁡ 2 ∥ ϕ ⁡ P
38 phiprm ⊢ P ∈ ℙ → ϕ ⁡ P = P − 1
39 38 ad2antll ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → ϕ ⁡ P = P − 1
40 39 breq2d ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → odℤ ⁡ P ⁡ 2 ∥ ϕ ⁡ P ↔ odℤ ⁡ P ⁡ 2 ∥ P − 1
41 breq1 ⊢ odℤ ⁡ P ⁡ 2 = 2 N + 1 → odℤ ⁡ P ⁡ 2 ∥ P − 1 ↔ 2 N + 1 ∥ P − 1
42 41 adantl ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ ∧ odℤ ⁡ P ⁡ 2 = 2 N + 1 → odℤ ⁡ P ⁡ 2 ∥ P − 1 ↔ 2 N + 1 ∥ P − 1
43 2nn ⊢ 2 ∈ ℕ
44 43 a1i ⊢ N ∈ ℕ → 2 ∈ ℕ
45 peano2nn ⊢ N ∈ ℕ → N + 1 ∈ ℕ
46 45 nnnn0d ⊢ N ∈ ℕ → N + 1 ∈ ℕ 0
47 44 46 nnexpcld ⊢ N ∈ ℕ → 2 N + 1 ∈ ℕ
48 23 nnnn0d ⊢ P ∈ ℙ → P ∈ ℕ 0
49 prmuz2 ⊢ P ∈ ℙ → P ∈ ℤ ≥ 2
50 eluzle ⊢ P ∈ ℤ ≥ 2 → 2 ≤ P
51 49 50 syl ⊢ P ∈ ℙ → 2 ≤ P
52 nn0ge2m1nn ⊢ P ∈ ℕ 0 ∧ 2 ≤ P → P − 1 ∈ ℕ
53 48 51 52 syl2anc ⊢ P ∈ ℙ → P − 1 ∈ ℕ
54 47 53 anim12i ⊢ N ∈ ℕ ∧ P ∈ ℙ → 2 N + 1 ∈ ℕ ∧ P − 1 ∈ ℕ
55 54 adantl ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → 2 N + 1 ∈ ℕ ∧ P − 1 ∈ ℕ
56 nndivides ⊢ 2 N + 1 ∈ ℕ ∧ P − 1 ∈ ℕ → 2 N + 1 ∥ P − 1 ↔ ∃ k ∈ ℕ k ⁢ 2 N + 1 = P − 1
57 55 56 syl ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → 2 N + 1 ∥ P − 1 ↔ ∃ k ∈ ℕ k ⁢ 2 N + 1 = P − 1
58 eqcom ⊢ k ⁢ 2 N + 1 = P − 1 ↔ P − 1 = k ⁢ 2 N + 1
59 58 a1i ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ ℕ → k ⁢ 2 N + 1 = P − 1 ↔ P − 1 = k ⁢ 2 N + 1
60 23 nncnd ⊢ P ∈ ℙ → P ∈ ℂ
61 60 adantl ⊢ N ∈ ℕ ∧ P ∈ ℙ → P ∈ ℂ
62 61 adantr ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ ℕ → P ∈ ℂ
63 1cnd ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ ℕ → 1 ∈ ℂ
64 nncn ⊢ k ∈ ℕ → k ∈ ℂ
65 64 adantl ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ ℕ → k ∈ ℂ
66 peano2nn0 ⊢ N ∈ ℕ 0 → N + 1 ∈ ℕ 0
67 3 66 syl ⊢ N ∈ ℕ → N + 1 ∈ ℕ 0
68 44 67 nnexpcld ⊢ N ∈ ℕ → 2 N + 1 ∈ ℕ
69 68 nncnd ⊢ N ∈ ℕ → 2 N + 1 ∈ ℂ
70 69 adantr ⊢ N ∈ ℕ ∧ P ∈ ℙ → 2 N + 1 ∈ ℂ
71 70 adantr ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ ℕ → 2 N + 1 ∈ ℂ
72 65 71 mulcld ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ ℕ → k ⁢ 2 N + 1 ∈ ℂ
73 62 63 72 subadd2d ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ ℕ → P − 1 = k ⁢ 2 N + 1 ↔ k ⁢ 2 N + 1 + 1 = P
74 73 adantll ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ ℕ → P − 1 = k ⁢ 2 N + 1 ↔ k ⁢ 2 N + 1 + 1 = P
75 eqcom ⊢ k ⁢ 2 N + 1 + 1 = P ↔ P = k ⁢ 2 N + 1 + 1
76 75 a1i ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ ℕ → k ⁢ 2 N + 1 + 1 = P ↔ P = k ⁢ 2 N + 1 + 1
77 59 74 76 3bitrd ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ ∧ k ∈ ℕ → k ⁢ 2 N + 1 = P − 1 ↔ P = k ⁢ 2 N + 1 + 1
78 77 rexbidva ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → ∃ k ∈ ℕ k ⁢ 2 N + 1 = P − 1 ↔ ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
79 78 biimpd ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → ∃ k ∈ ℕ k ⁢ 2 N + 1 = P − 1 → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
80 57 79 sylbid ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → 2 N + 1 ∥ P − 1 → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
81 80 adantr ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ ∧ odℤ ⁡ P ⁡ 2 = 2 N + 1 → 2 N + 1 ∥ P − 1 → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
82 42 81 sylbid ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ ∧ odℤ ⁡ P ⁡ 2 = 2 N + 1 → odℤ ⁡ P ⁡ 2 ∥ P − 1 → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
83 82 ex ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → odℤ ⁡ P ⁡ 2 = 2 N + 1 → odℤ ⁡ P ⁡ 2 ∥ P − 1 → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
84 83 com23 ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → odℤ ⁡ P ⁡ 2 ∥ P − 1 → odℤ ⁡ P ⁡ 2 = 2 N + 1 → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
85 40 84 sylbid ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → odℤ ⁡ P ⁡ 2 ∥ ϕ ⁡ P → odℤ ⁡ P ⁡ 2 = 2 N + 1 → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
86 37 85 mpd ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ → odℤ ⁡ P ⁡ 2 = 2 N + 1 → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
87 86 3adantr3 ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ ∧ P ∥ FermatNo ⁡ N → odℤ ⁡ P ⁡ 2 = 2 N + 1 → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
88 22 87 mpd ⊢ ¬ P = 2 ∧ N ∈ ℕ ∧ P ∈ ℙ ∧ P ∥ FermatNo ⁡ N → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
89 88 ex ⊢ ¬ P = 2 → N ∈ ℕ ∧ P ∈ ℙ ∧ P ∥ FermatNo ⁡ N → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1
90 11 89 pm2.61i ⊢ N ∈ ℕ ∧ P ∈ ℙ ∧ P ∥ FermatNo ⁡ N → ∃ k ∈ ℕ P = k ⁢ 2 N + 1 + 1