Metamath Proof Explorer


Theorem fmtno4prmfac

Description: If P was a (prime) factor of the fourth Fermat number less than the square root of the fourth Fermat number, it would be either 65 or 129 or 193. (Contributed by AV, 28-Jul-2021)

Ref Expression
Assertion fmtno4prmfac ( ( 𝑃 ∈ ℙ ∧ 𝑃 ∥ ( FermatNo ‘ 4 ) ∧ 𝑃 ≤ ( ⌊ ‘ ( √ ‘ ( FermatNo ‘ 4 ) ) ) ) → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) )

Proof

Step Hyp Ref Expression
1 2z 2 ∈ ℤ
2 4z 4 ∈ ℤ
3 2re 2 ∈ ℝ
4 4re 4 ∈ ℝ
5 2lt4 2 < 4
6 3 4 5 ltleii 2 ≤ 4
7 eluz2 ( 4 ∈ ( ℤ ‘ 2 ) ↔ ( 2 ∈ ℤ ∧ 4 ∈ ℤ ∧ 2 ≤ 4 ) )
8 1 2 6 7 mpbir3an 4 ∈ ( ℤ ‘ 2 )
9 fmtnoprmfac2 ( ( 4 ∈ ( ℤ ‘ 2 ) ∧ 𝑃 ∈ ℙ ∧ 𝑃 ∥ ( FermatNo ‘ 4 ) ) → ∃ 𝑘 ∈ ℕ 𝑃 = ( ( 𝑘 · ( 2 ↑ ( 4 + 2 ) ) ) + 1 ) )
10 8 9 mp3an1 ( ( 𝑃 ∈ ℙ ∧ 𝑃 ∥ ( FermatNo ‘ 4 ) ) → ∃ 𝑘 ∈ ℕ 𝑃 = ( ( 𝑘 · ( 2 ↑ ( 4 + 2 ) ) ) + 1 ) )
11 elnnuz ( 𝑘 ∈ ℕ ↔ 𝑘 ∈ ( ℤ ‘ 1 ) )
12 4nn 4 ∈ ℕ
13 nnuz ℕ = ( ℤ ‘ 1 )
14 12 13 eleqtri 4 ∈ ( ℤ ‘ 1 )
15 fzouzsplit ( 4 ∈ ( ℤ ‘ 1 ) → ( ℤ ‘ 1 ) = ( ( 1 ..^ 4 ) ∪ ( ℤ ‘ 4 ) ) )
16 14 15 ax-mp ( ℤ ‘ 1 ) = ( ( 1 ..^ 4 ) ∪ ( ℤ ‘ 4 ) )
17 16 eleq2i ( 𝑘 ∈ ( ℤ ‘ 1 ) ↔ 𝑘 ∈ ( ( 1 ..^ 4 ) ∪ ( ℤ ‘ 4 ) ) )
18 elun ( 𝑘 ∈ ( ( 1 ..^ 4 ) ∪ ( ℤ ‘ 4 ) ) ↔ ( 𝑘 ∈ ( 1 ..^ 4 ) ∨ 𝑘 ∈ ( ℤ ‘ 4 ) ) )
19 fzo1to4tp ( 1 ..^ 4 ) = { 1 , 2 , 3 }
20 19 eleq2i ( 𝑘 ∈ ( 1 ..^ 4 ) ↔ 𝑘 ∈ { 1 , 2 , 3 } )
21 vex 𝑘 ∈ V
22 21 eltp ( 𝑘 ∈ { 1 , 2 , 3 } ↔ ( 𝑘 = 1 ∨ 𝑘 = 2 ∨ 𝑘 = 3 ) )
23 20 22 bitri ( 𝑘 ∈ ( 1 ..^ 4 ) ↔ ( 𝑘 = 1 ∨ 𝑘 = 2 ∨ 𝑘 = 3 ) )
24 23 orbi1i ( ( 𝑘 ∈ ( 1 ..^ 4 ) ∨ 𝑘 ∈ ( ℤ ‘ 4 ) ) ↔ ( ( 𝑘 = 1 ∨ 𝑘 = 2 ∨ 𝑘 = 3 ) ∨ 𝑘 ∈ ( ℤ ‘ 4 ) ) )
25 18 24 bitri ( 𝑘 ∈ ( ( 1 ..^ 4 ) ∪ ( ℤ ‘ 4 ) ) ↔ ( ( 𝑘 = 1 ∨ 𝑘 = 2 ∨ 𝑘 = 3 ) ∨ 𝑘 ∈ ( ℤ ‘ 4 ) ) )
26 11 17 25 3bitri ( 𝑘 ∈ ℕ ↔ ( ( 𝑘 = 1 ∨ 𝑘 = 2 ∨ 𝑘 = 3 ) ∨ 𝑘 ∈ ( ℤ ‘ 4 ) ) )
27 4p2e6 ( 4 + 2 ) = 6
28 27 oveq2i ( 2 ↑ ( 4 + 2 ) ) = ( 2 ↑ 6 )
29 2exp6 ( 2 ↑ 6 ) = 6 4
30 28 29 eqtri ( 2 ↑ ( 4 + 2 ) ) = 6 4
31 30 oveq2i ( 𝑘 · ( 2 ↑ ( 4 + 2 ) ) ) = ( 𝑘 · 6 4 )
32 31 oveq1i ( ( 𝑘 · ( 2 ↑ ( 4 + 2 ) ) ) + 1 ) = ( ( 𝑘 · 6 4 ) + 1 )
33 32 eqeq2i ( 𝑃 = ( ( 𝑘 · ( 2 ↑ ( 4 + 2 ) ) ) + 1 ) ↔ 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) )
34 simpl ( ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) ∧ 𝑘 = 1 ) → 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) )
35 oveq1 ( 𝑘 = 1 → ( 𝑘 · 6 4 ) = ( 1 · 6 4 ) )
36 6nn0 6 ∈ ℕ0
37 4nn0 4 ∈ ℕ0
38 36 37 deccl 6 4 ∈ ℕ0
39 38 nn0cni 6 4 ∈ ℂ
40 39 mullidi ( 1 · 6 4 ) = 6 4
41 35 40 eqtrdi ( 𝑘 = 1 → ( 𝑘 · 6 4 ) = 6 4 )
42 41 oveq1d ( 𝑘 = 1 → ( ( 𝑘 · 6 4 ) + 1 ) = ( 6 4 + 1 ) )
43 4p1e5 ( 4 + 1 ) = 5
44 eqid 6 4 = 6 4
45 36 37 43 44 decsuc ( 6 4 + 1 ) = 6 5
46 42 45 eqtrdi ( 𝑘 = 1 → ( ( 𝑘 · 6 4 ) + 1 ) = 6 5 )
47 46 adantl ( ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) ∧ 𝑘 = 1 ) → ( ( 𝑘 · 6 4 ) + 1 ) = 6 5 )
48 34 47 eqtrd ( ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) ∧ 𝑘 = 1 ) → 𝑃 = 6 5 )
49 48 ex ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) → ( 𝑘 = 1 → 𝑃 = 6 5 ) )
50 simpl ( ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) ∧ 𝑘 = 2 ) → 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) )
51 oveq1 ( 𝑘 = 2 → ( 𝑘 · 6 4 ) = ( 2 · 6 4 ) )
52 2nn0 2 ∈ ℕ0
53 6cn 6 ∈ ℂ
54 2cn 2 ∈ ℂ
55 6t2e12 ( 6 · 2 ) = 1 2
56 53 54 55 mulcomli ( 2 · 6 ) = 1 2
57 56 eqcomi 1 2 = ( 2 · 6 )
58 2t4e8 ( 2 · 4 ) = 8
59 58 eqcomi 8 = ( 2 · 4 )
60 36 37 52 57 59 decmul10add ( 2 · 6 4 ) = ( 1 2 0 + 8 )
61 51 60 eqtrdi ( 𝑘 = 2 → ( 𝑘 · 6 4 ) = ( 1 2 0 + 8 ) )
62 61 oveq1d ( 𝑘 = 2 → ( ( 𝑘 · 6 4 ) + 1 ) = ( ( 1 2 0 + 8 ) + 1 ) )
63 1nn0 1 ∈ ℕ0
64 63 52 deccl 1 2 ∈ ℕ0
65 8nn0 8 ∈ ℕ0
66 8p1e9 ( 8 + 1 ) = 9
67 0nn0 0 ∈ ℕ0
68 eqid 1 2 0 = 1 2 0
69 8cn 8 ∈ ℂ
70 69 addlidi ( 0 + 8 ) = 8
71 64 67 65 68 70 decaddi ( 1 2 0 + 8 ) = 1 2 8
72 64 65 66 71 decsuc ( ( 1 2 0 + 8 ) + 1 ) = 1 2 9
73 62 72 eqtrdi ( 𝑘 = 2 → ( ( 𝑘 · 6 4 ) + 1 ) = 1 2 9 )
74 73 adantl ( ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) ∧ 𝑘 = 2 ) → ( ( 𝑘 · 6 4 ) + 1 ) = 1 2 9 )
75 50 74 eqtrd ( ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) ∧ 𝑘 = 2 ) → 𝑃 = 1 2 9 )
76 75 ex ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) → ( 𝑘 = 2 → 𝑃 = 1 2 9 ) )
77 simpl ( ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) ∧ 𝑘 = 3 ) → 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) )
78 oveq1 ( 𝑘 = 3 → ( 𝑘 · 6 4 ) = ( 3 · 6 4 ) )
79 3nn0 3 ∈ ℕ0
80 6t3e18 ( 6 · 3 ) = 1 8
81 3cn 3 ∈ ℂ
82 53 81 mulcomi ( 6 · 3 ) = ( 3 · 6 )
83 80 82 eqtr3i 1 8 = ( 3 · 6 )
84 4t3e12 ( 4 · 3 ) = 1 2
85 4cn 4 ∈ ℂ
86 85 81 mulcomi ( 4 · 3 ) = ( 3 · 4 )
87 84 86 eqtr3i 1 2 = ( 3 · 4 )
88 36 37 79 83 87 decmul10add ( 3 · 6 4 ) = ( 1 8 0 + 1 2 )
89 78 88 eqtrdi ( 𝑘 = 3 → ( 𝑘 · 6 4 ) = ( 1 8 0 + 1 2 ) )
90 89 oveq1d ( 𝑘 = 3 → ( ( 𝑘 · 6 4 ) + 1 ) = ( ( 1 8 0 + 1 2 ) + 1 ) )
91 9nn0 9 ∈ ℕ0
92 63 91 deccl 1 9 ∈ ℕ0
93 2p1e3 ( 2 + 1 ) = 3
94 63 65 deccl 1 8 ∈ ℕ0
95 eqid 1 8 0 = 1 8 0
96 eqid 1 2 = 1 2
97 eqid 1 8 = 1 8
98 63 65 66 97 decsuc ( 1 8 + 1 ) = 1 9
99 54 addlidi ( 0 + 2 ) = 2
100 94 67 63 52 95 96 98 99 decadd ( 1 8 0 + 1 2 ) = 1 9 2
101 92 52 93 100 decsuc ( ( 1 8 0 + 1 2 ) + 1 ) = 1 9 3
102 90 101 eqtrdi ( 𝑘 = 3 → ( ( 𝑘 · 6 4 ) + 1 ) = 1 9 3 )
103 102 adantl ( ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) ∧ 𝑘 = 3 ) → ( ( 𝑘 · 6 4 ) + 1 ) = 1 9 3 )
104 77 103 eqtrd ( ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) ∧ 𝑘 = 3 ) → 𝑃 = 1 9 3 )
105 104 ex ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) → ( 𝑘 = 3 → 𝑃 = 1 9 3 ) )
106 49 76 105 3orim123d ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) → ( ( 𝑘 = 1 ∨ 𝑘 = 2 ∨ 𝑘 = 3 ) → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) ) )
107 106 a1i ( 𝑃 ≤ ( ⌊ ‘ ( √ ‘ ( FermatNo ‘ 4 ) ) ) → ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) → ( ( 𝑘 = 1 ∨ 𝑘 = 2 ∨ 𝑘 = 3 ) → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) ) ) )
108 107 com13 ( ( 𝑘 = 1 ∨ 𝑘 = 2 ∨ 𝑘 = 3 ) → ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) → ( 𝑃 ≤ ( ⌊ ‘ ( √ ‘ ( FermatNo ‘ 4 ) ) ) → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) ) ) )
109 fmtno4sqrt ( ⌊ ‘ ( √ ‘ ( FermatNo ‘ 4 ) ) ) = 2 5 6
110 109 breq2i ( 𝑃 ≤ ( ⌊ ‘ ( √ ‘ ( FermatNo ‘ 4 ) ) ) ↔ 𝑃 2 5 6 )
111 breq1 ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) → ( 𝑃 2 5 6 ↔ ( ( 𝑘 · 6 4 ) + 1 ) ≤ 2 5 6 ) )
112 111 adantl ( ( 𝑘 ∈ ( ℤ ‘ 4 ) ∧ 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) ) → ( 𝑃 2 5 6 ↔ ( ( 𝑘 · 6 4 ) + 1 ) ≤ 2 5 6 ) )
113 eluz2 ( 𝑘 ∈ ( ℤ ‘ 4 ) ↔ ( 4 ∈ ℤ ∧ 𝑘 ∈ ℤ ∧ 4 ≤ 𝑘 ) )
114 6t4e24 ( 6 · 4 ) = 2 4
115 53 85 114 mulcomli ( 4 · 6 ) = 2 4
116 52 37 43 115 decsuc ( ( 4 · 6 ) + 1 ) = 2 5
117 4t4e16 ( 4 · 4 ) = 1 6
118 37 36 37 44 36 63 116 117 decmul2c ( 4 · 6 4 ) = 2 5 6
119 zre ( 𝑘 ∈ ℤ → 𝑘 ∈ ℝ )
120 38 nn0rei 6 4 ∈ ℝ
121 36 12 decnncl 6 4 ∈ ℕ
122 121 nngt0i 0 < 6 4
123 120 122 pm3.2i ( 6 4 ∈ ℝ ∧ 0 < 6 4 )
124 123 a1i ( 𝑘 ∈ ℤ → ( 6 4 ∈ ℝ ∧ 0 < 6 4 ) )
125 lemul1 ( ( 4 ∈ ℝ ∧ 𝑘 ∈ ℝ ∧ ( 6 4 ∈ ℝ ∧ 0 < 6 4 ) ) → ( 4 ≤ 𝑘 ↔ ( 4 · 6 4 ) ≤ ( 𝑘 · 6 4 ) ) )
126 4 119 124 125 mp3an2i ( 𝑘 ∈ ℤ → ( 4 ≤ 𝑘 ↔ ( 4 · 6 4 ) ≤ ( 𝑘 · 6 4 ) ) )
127 126 biimpa ( ( 𝑘 ∈ ℤ ∧ 4 ≤ 𝑘 ) → ( 4 · 6 4 ) ≤ ( 𝑘 · 6 4 ) )
128 118 127 eqbrtrrid ( ( 𝑘 ∈ ℤ ∧ 4 ≤ 𝑘 ) → 2 5 6 ≤ ( 𝑘 · 6 4 ) )
129 5nn0 5 ∈ ℕ0
130 52 129 deccl 2 5 ∈ ℕ0
131 130 36 deccl 2 5 6 ∈ ℕ0
132 131 nn0zi 2 5 6 ∈ ℤ
133 id ( 𝑘 ∈ ℤ → 𝑘 ∈ ℤ )
134 38 nn0zi 6 4 ∈ ℤ
135 134 a1i ( 𝑘 ∈ ℤ → 6 4 ∈ ℤ )
136 133 135 zmulcld ( 𝑘 ∈ ℤ → ( 𝑘 · 6 4 ) ∈ ℤ )
137 136 adantr ( ( 𝑘 ∈ ℤ ∧ 4 ≤ 𝑘 ) → ( 𝑘 · 6 4 ) ∈ ℤ )
138 zleltp1 ( ( 2 5 6 ∈ ℤ ∧ ( 𝑘 · 6 4 ) ∈ ℤ ) → ( 2 5 6 ≤ ( 𝑘 · 6 4 ) ↔ 2 5 6 < ( ( 𝑘 · 6 4 ) + 1 ) ) )
139 132 137 138 sylancr ( ( 𝑘 ∈ ℤ ∧ 4 ≤ 𝑘 ) → ( 2 5 6 ≤ ( 𝑘 · 6 4 ) ↔ 2 5 6 < ( ( 𝑘 · 6 4 ) + 1 ) ) )
140 128 139 mpbid ( ( 𝑘 ∈ ℤ ∧ 4 ≤ 𝑘 ) → 2 5 6 < ( ( 𝑘 · 6 4 ) + 1 ) )
141 140 3adant1 ( ( 4 ∈ ℤ ∧ 𝑘 ∈ ℤ ∧ 4 ≤ 𝑘 ) → 2 5 6 < ( ( 𝑘 · 6 4 ) + 1 ) )
142 113 141 sylbi ( 𝑘 ∈ ( ℤ ‘ 4 ) → 2 5 6 < ( ( 𝑘 · 6 4 ) + 1 ) )
143 131 nn0rei 2 5 6 ∈ ℝ
144 143 a1i ( 𝑘 ∈ ( ℤ ‘ 4 ) → 2 5 6 ∈ ℝ )
145 eluzelre ( 𝑘 ∈ ( ℤ ‘ 4 ) → 𝑘 ∈ ℝ )
146 120 a1i ( 𝑘 ∈ ( ℤ ‘ 4 ) → 6 4 ∈ ℝ )
147 145 146 remulcld ( 𝑘 ∈ ( ℤ ‘ 4 ) → ( 𝑘 · 6 4 ) ∈ ℝ )
148 peano2re ( ( 𝑘 · 6 4 ) ∈ ℝ → ( ( 𝑘 · 6 4 ) + 1 ) ∈ ℝ )
149 147 148 syl ( 𝑘 ∈ ( ℤ ‘ 4 ) → ( ( 𝑘 · 6 4 ) + 1 ) ∈ ℝ )
150 144 149 ltnled ( 𝑘 ∈ ( ℤ ‘ 4 ) → ( 2 5 6 < ( ( 𝑘 · 6 4 ) + 1 ) ↔ ¬ ( ( 𝑘 · 6 4 ) + 1 ) ≤ 2 5 6 ) )
151 142 150 mpbid ( 𝑘 ∈ ( ℤ ‘ 4 ) → ¬ ( ( 𝑘 · 6 4 ) + 1 ) ≤ 2 5 6 )
152 151 pm2.21d ( 𝑘 ∈ ( ℤ ‘ 4 ) → ( ( ( 𝑘 · 6 4 ) + 1 ) ≤ 2 5 6 → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) ) )
153 152 adantr ( ( 𝑘 ∈ ( ℤ ‘ 4 ) ∧ 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) ) → ( ( ( 𝑘 · 6 4 ) + 1 ) ≤ 2 5 6 → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) ) )
154 112 153 sylbid ( ( 𝑘 ∈ ( ℤ ‘ 4 ) ∧ 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) ) → ( 𝑃 2 5 6 → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) ) )
155 110 154 biimtrid ( ( 𝑘 ∈ ( ℤ ‘ 4 ) ∧ 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) ) → ( 𝑃 ≤ ( ⌊ ‘ ( √ ‘ ( FermatNo ‘ 4 ) ) ) → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) ) )
156 155 ex ( 𝑘 ∈ ( ℤ ‘ 4 ) → ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) → ( 𝑃 ≤ ( ⌊ ‘ ( √ ‘ ( FermatNo ‘ 4 ) ) ) → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) ) ) )
157 108 156 jaoi ( ( ( 𝑘 = 1 ∨ 𝑘 = 2 ∨ 𝑘 = 3 ) ∨ 𝑘 ∈ ( ℤ ‘ 4 ) ) → ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) → ( 𝑃 ≤ ( ⌊ ‘ ( √ ‘ ( FermatNo ‘ 4 ) ) ) → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) ) ) )
158 157 adantr ( ( ( ( 𝑘 = 1 ∨ 𝑘 = 2 ∨ 𝑘 = 3 ) ∨ 𝑘 ∈ ( ℤ ‘ 4 ) ) ∧ ( 𝑃 ∈ ℙ ∧ 𝑃 ∥ ( FermatNo ‘ 4 ) ) ) → ( 𝑃 = ( ( 𝑘 · 6 4 ) + 1 ) → ( 𝑃 ≤ ( ⌊ ‘ ( √ ‘ ( FermatNo ‘ 4 ) ) ) → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) ) ) )
159 33 158 biimtrid ( ( ( ( 𝑘 = 1 ∨ 𝑘 = 2 ∨ 𝑘 = 3 ) ∨ 𝑘 ∈ ( ℤ ‘ 4 ) ) ∧ ( 𝑃 ∈ ℙ ∧ 𝑃 ∥ ( FermatNo ‘ 4 ) ) ) → ( 𝑃 = ( ( 𝑘 · ( 2 ↑ ( 4 + 2 ) ) ) + 1 ) → ( 𝑃 ≤ ( ⌊ ‘ ( √ ‘ ( FermatNo ‘ 4 ) ) ) → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) ) ) )
160 159 ex ( ( ( 𝑘 = 1 ∨ 𝑘 = 2 ∨ 𝑘 = 3 ) ∨ 𝑘 ∈ ( ℤ ‘ 4 ) ) → ( ( 𝑃 ∈ ℙ ∧ 𝑃 ∥ ( FermatNo ‘ 4 ) ) → ( 𝑃 = ( ( 𝑘 · ( 2 ↑ ( 4 + 2 ) ) ) + 1 ) → ( 𝑃 ≤ ( ⌊ ‘ ( √ ‘ ( FermatNo ‘ 4 ) ) ) → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) ) ) ) )
161 26 160 sylbi ( 𝑘 ∈ ℕ → ( ( 𝑃 ∈ ℙ ∧ 𝑃 ∥ ( FermatNo ‘ 4 ) ) → ( 𝑃 = ( ( 𝑘 · ( 2 ↑ ( 4 + 2 ) ) ) + 1 ) → ( 𝑃 ≤ ( ⌊ ‘ ( √ ‘ ( FermatNo ‘ 4 ) ) ) → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) ) ) ) )
162 161 com12 ( ( 𝑃 ∈ ℙ ∧ 𝑃 ∥ ( FermatNo ‘ 4 ) ) → ( 𝑘 ∈ ℕ → ( 𝑃 = ( ( 𝑘 · ( 2 ↑ ( 4 + 2 ) ) ) + 1 ) → ( 𝑃 ≤ ( ⌊ ‘ ( √ ‘ ( FermatNo ‘ 4 ) ) ) → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) ) ) ) )
163 162 rexlimdv ( ( 𝑃 ∈ ℙ ∧ 𝑃 ∥ ( FermatNo ‘ 4 ) ) → ( ∃ 𝑘 ∈ ℕ 𝑃 = ( ( 𝑘 · ( 2 ↑ ( 4 + 2 ) ) ) + 1 ) → ( 𝑃 ≤ ( ⌊ ‘ ( √ ‘ ( FermatNo ‘ 4 ) ) ) → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) ) ) )
164 10 163 mpd ( ( 𝑃 ∈ ℙ ∧ 𝑃 ∥ ( FermatNo ‘ 4 ) ) → ( 𝑃 ≤ ( ⌊ ‘ ( √ ‘ ( FermatNo ‘ 4 ) ) ) → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) ) )
165 164 3impia ( ( 𝑃 ∈ ℙ ∧ 𝑃 ∥ ( FermatNo ‘ 4 ) ∧ 𝑃 ≤ ( ⌊ ‘ ( √ ‘ ( FermatNo ‘ 4 ) ) ) ) → ( 𝑃 = 6 5 ∨ 𝑃 = 1 2 9 ∨ 𝑃 = 1 9 3 ) )