Users' Mathboxes Mathbox for Alexander van der Vekens < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  lighneallem2 Structured version   Visualization version   GIF version

Theorem lighneallem2 48057
Description: Lemma 2 for lighneal 48062. (Contributed by AV, 13-Aug-2021.)
Assertion
Ref Expression
lighneallem2 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 2 ∥ 𝑁 ∧ ((2↑𝑁) − 1) = (𝑃𝑀)) → 𝑀 = 1)

Proof of Theorem lighneallem2
Dummy variable 𝑘 is distinct from all other variables.
StepHypRef Expression
1 evennn2n 16309 . . . 4 (𝑁 ∈ ℕ → (2 ∥ 𝑁 ↔ ∃𝑘 ∈ ℕ (2 · 𝑘) = 𝑁))
213ad2ant3 1136 . . 3 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2 ∥ 𝑁 ↔ ∃𝑘 ∈ ℕ (2 · 𝑘) = 𝑁))
3 oveq2 7364 . . . . . . . . 9 (𝑁 = (2 · 𝑘) → (2↑𝑁) = (2↑(2 · 𝑘)))
43eqcoms 2743 . . . . . . . 8 ((2 · 𝑘) = 𝑁 → (2↑𝑁) = (2↑(2 · 𝑘)))
5 2cnd 12248 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → 2 ∈ ℂ)
6 nncn 12171 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → 𝑘 ∈ ℂ)
75, 6mulcomd 11155 . . . . . . . . . . 11 (𝑘 ∈ ℕ → (2 · 𝑘) = (𝑘 · 2))
87oveq2d 7372 . . . . . . . . . 10 (𝑘 ∈ ℕ → (2↑(2 · 𝑘)) = (2↑(𝑘 · 2)))
9 2nn0 12443 . . . . . . . . . . . 12 2 ∈ ℕ0
109a1i 11 . . . . . . . . . . 11 (𝑘 ∈ ℕ → 2 ∈ ℕ0)
11 nnnn0 12433 . . . . . . . . . . 11 (𝑘 ∈ ℕ → 𝑘 ∈ ℕ0)
125, 10, 11expmuld 14100 . . . . . . . . . 10 (𝑘 ∈ ℕ → (2↑(𝑘 · 2)) = ((2↑𝑘)↑2))
138, 12eqtrd 2770 . . . . . . . . 9 (𝑘 ∈ ℕ → (2↑(2 · 𝑘)) = ((2↑𝑘)↑2))
1413adantl 481 . . . . . . . 8 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) → (2↑(2 · 𝑘)) = ((2↑𝑘)↑2))
154, 14sylan9eqr 2792 . . . . . . 7 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) ∧ (2 · 𝑘) = 𝑁) → (2↑𝑁) = ((2↑𝑘)↑2))
1615oveq1d 7371 . . . . . 6 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) ∧ (2 · 𝑘) = 𝑁) → ((2↑𝑁) − 1) = (((2↑𝑘)↑2) − 1))
1716eqeq1d 2737 . . . . 5 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) ∧ (2 · 𝑘) = 𝑁) → (((2↑𝑁) − 1) = (𝑃𝑀) ↔ (((2↑𝑘)↑2) − 1) = (𝑃𝑀)))
18 elnn1uz2 12864 . . . . . . . 8 (𝑘 ∈ ℕ ↔ (𝑘 = 1 ∨ 𝑘 ∈ (ℤ‘2)))
19 oveq2 7364 . . . . . . . . . . . . . . . . 17 (𝑘 = 1 → (2↑𝑘) = (2↑1))
20 2cn 12245 . . . . . . . . . . . . . . . . . 18 2 ∈ ℂ
21 exp1 14018 . . . . . . . . . . . . . . . . . 18 (2 ∈ ℂ → (2↑1) = 2)
2220, 21ax-mp 5 . . . . . . . . . . . . . . . . 17 (2↑1) = 2
2319, 22eqtrdi 2786 . . . . . . . . . . . . . . . 16 (𝑘 = 1 → (2↑𝑘) = 2)
2423oveq1d 7371 . . . . . . . . . . . . . . 15 (𝑘 = 1 → ((2↑𝑘)↑2) = (2↑2))
2524oveq1d 7371 . . . . . . . . . . . . . 14 (𝑘 = 1 → (((2↑𝑘)↑2) − 1) = ((2↑2) − 1))
26 sq2 14148 . . . . . . . . . . . . . . . 16 (2↑2) = 4
2726oveq1i 7366 . . . . . . . . . . . . . . 15 ((2↑2) − 1) = (4 − 1)
28 4m1e3 12294 . . . . . . . . . . . . . . 15 (4 − 1) = 3
2927, 28eqtri 2758 . . . . . . . . . . . . . 14 ((2↑2) − 1) = 3
3025, 29eqtrdi 2786 . . . . . . . . . . . . 13 (𝑘 = 1 → (((2↑𝑘)↑2) − 1) = 3)
3130eqeq1d 2737 . . . . . . . . . . . 12 (𝑘 = 1 → ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) ↔ 3 = (𝑃𝑀)))
3231adantr 480 . . . . . . . . . . 11 ((𝑘 = 1 ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) ↔ 3 = (𝑃𝑀)))
33 eqcom 2742 . . . . . . . . . . . . . 14 (3 = (𝑃𝑀) ↔ (𝑃𝑀) = 3)
34 eldifi 4063 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℙ)
35 prmnn 16632 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
36 nnre 12170 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ ℕ → 𝑃 ∈ ℝ)
3734, 35, 363syl 18 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℝ)
38373ad2ant1 1134 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑃 ∈ ℝ)
39 nnnn0 12433 . . . . . . . . . . . . . . . . . . 19 (𝑀 ∈ ℕ → 𝑀 ∈ ℕ0)
40393ad2ant2 1135 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑀 ∈ ℕ0)
4138, 40reexpcld 14114 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑃𝑀) ∈ ℝ)
4241adantr 480 . . . . . . . . . . . . . . . 16 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑃𝑀) = 3) → (𝑃𝑀) ∈ ℝ)
43 simpr 484 . . . . . . . . . . . . . . . 16 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑃𝑀) = 3) → (𝑃𝑀) = 3)
4442, 43eqled 11238 . . . . . . . . . . . . . . 15 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑃𝑀) = 3) → (𝑃𝑀) ≤ 3)
4544ex 412 . . . . . . . . . . . . . 14 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑃𝑀) = 3 → (𝑃𝑀) ≤ 3))
4633, 45biimtrid 242 . . . . . . . . . . . . 13 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (3 = (𝑃𝑀) → (𝑃𝑀) ≤ 3))
4735nnred 12178 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ ℙ → 𝑃 ∈ ℝ)
48 prmgt1 16656 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ ℙ → 1 < 𝑃)
4947, 48jca 511 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ ℙ → (𝑃 ∈ ℝ ∧ 1 < 𝑃))
5034, 49syl 17 . . . . . . . . . . . . . . . 16 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∈ ℝ ∧ 1 < 𝑃))
51503ad2ant1 1134 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑃 ∈ ℝ ∧ 1 < 𝑃))
52 nnz 12534 . . . . . . . . . . . . . . . 16 (𝑀 ∈ ℕ → 𝑀 ∈ ℤ)
53523ad2ant2 1135 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑀 ∈ ℤ)
54 3rp 12937 . . . . . . . . . . . . . . . 16 3 ∈ ℝ+
5554a1i 11 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 3 ∈ ℝ+)
56 efexple 27232 . . . . . . . . . . . . . . 15 (((𝑃 ∈ ℝ ∧ 1 < 𝑃) ∧ 𝑀 ∈ ℤ ∧ 3 ∈ ℝ+) → ((𝑃𝑀) ≤ 3 ↔ 𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃)))))
5751, 53, 55, 56syl3anc 1374 . . . . . . . . . . . . . 14 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑃𝑀) ≤ 3 ↔ 𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃)))))
58 oddprmge3 16659 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ (ℤ‘3))
59 eluzle 12790 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℤ‘3) → 3 ≤ 𝑃)
6058, 59syl 17 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ (ℙ ∖ {2}) → 3 ≤ 𝑃)
6154a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → 3 ∈ ℝ+)
62 nnrp 12943 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ ℕ → 𝑃 ∈ ℝ+)
6334, 35, 623syl 18 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℝ+)
6461, 63logled 26579 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ (ℙ ∖ {2}) → (3 ≤ 𝑃 ↔ (log‘3) ≤ (log‘𝑃)))
6560, 64mpbid 232 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ (ℙ ∖ {2}) → (log‘3) ≤ (log‘𝑃))
66653ad2ant1 1134 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (log‘3) ≤ (log‘𝑃))
67 relogcl 26527 . . . . . . . . . . . . . . . . . 18 (3 ∈ ℝ+ → (log‘3) ∈ ℝ)
6854, 67ax-mp 5 . . . . . . . . . . . . . . . . 17 (log‘3) ∈ ℝ
69 rplogcl 26556 . . . . . . . . . . . . . . . . . . 19 ((𝑃 ∈ ℝ ∧ 1 < 𝑃) → (log‘𝑃) ∈ ℝ+)
7034, 49, 693syl 18 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ (ℙ ∖ {2}) → (log‘𝑃) ∈ ℝ+)
71703ad2ant1 1134 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (log‘𝑃) ∈ ℝ+)
72 divle1le 13003 . . . . . . . . . . . . . . . . 17 (((log‘3) ∈ ℝ ∧ (log‘𝑃) ∈ ℝ+) → (((log‘3) / (log‘𝑃)) ≤ 1 ↔ (log‘3) ≤ (log‘𝑃)))
7368, 71, 72sylancr 588 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (((log‘3) / (log‘𝑃)) ≤ 1 ↔ (log‘3) ≤ (log‘𝑃)))
7466, 73mpbird 257 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((log‘3) / (log‘𝑃)) ≤ 1)
75 fldivle 13779 . . . . . . . . . . . . . . . . 17 (((log‘3) ∈ ℝ ∧ (log‘𝑃) ∈ ℝ+) → (⌊‘((log‘3) / (log‘𝑃))) ≤ ((log‘3) / (log‘𝑃)))
7668, 71, 75sylancr 588 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((log‘3) / (log‘𝑃))) ≤ ((log‘3) / (log‘𝑃)))
77 nnre 12170 . . . . . . . . . . . . . . . . . . 19 (𝑀 ∈ ℕ → 𝑀 ∈ ℝ)
78773ad2ant2 1135 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑀 ∈ ℝ)
7968a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 (𝑃 ∈ (ℙ ∖ {2}) → (log‘3) ∈ ℝ)
8062relogcld 26575 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑃 ∈ ℕ → (log‘𝑃) ∈ ℝ)
8134, 35, 803syl 18 . . . . . . . . . . . . . . . . . . . . . 22 (𝑃 ∈ (ℙ ∖ {2}) → (log‘𝑃) ∈ ℝ)
8235nnrpd 12973 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑃 ∈ ℙ → 𝑃 ∈ ℝ+)
83 1red 11134 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑃 ∈ ℙ → 1 ∈ ℝ)
8483, 48gtned 11270 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑃 ∈ ℙ → 𝑃 ≠ 1)
8582, 84jca 511 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑃 ∈ ℙ → (𝑃 ∈ ℝ+𝑃 ≠ 1))
86 logne0 26531 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑃 ∈ ℝ+𝑃 ≠ 1) → (log‘𝑃) ≠ 0)
8734, 85, 863syl 18 . . . . . . . . . . . . . . . . . . . . . 22 (𝑃 ∈ (ℙ ∖ {2}) → (log‘𝑃) ≠ 0)
8879, 81, 87redivcld 11972 . . . . . . . . . . . . . . . . . . . . 21 (𝑃 ∈ (ℙ ∖ {2}) → ((log‘3) / (log‘𝑃)) ∈ ℝ)
8988flcld 13746 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ (ℙ ∖ {2}) → (⌊‘((log‘3) / (log‘𝑃))) ∈ ℤ)
9089zred 12622 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → (⌊‘((log‘3) / (log‘𝑃))) ∈ ℝ)
91903ad2ant1 1134 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((log‘3) / (log‘𝑃))) ∈ ℝ)
92883ad2ant1 1134 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((log‘3) / (log‘𝑃)) ∈ ℝ)
93 letr 11229 . . . . . . . . . . . . . . . . . 18 ((𝑀 ∈ ℝ ∧ (⌊‘((log‘3) / (log‘𝑃))) ∈ ℝ ∧ ((log‘3) / (log‘𝑃)) ∈ ℝ) → ((𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃))) ∧ (⌊‘((log‘3) / (log‘𝑃))) ≤ ((log‘3) / (log‘𝑃))) → 𝑀 ≤ ((log‘3) / (log‘𝑃))))
9478, 91, 92, 93syl3anc 1374 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃))) ∧ (⌊‘((log‘3) / (log‘𝑃))) ≤ ((log‘3) / (log‘𝑃))) → 𝑀 ≤ ((log‘3) / (log‘𝑃))))
95 1red 11134 . . . . . . . . . . . . . . . . . . . 20 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 1 ∈ ℝ)
96 letr 11229 . . . . . . . . . . . . . . . . . . . 20 ((𝑀 ∈ ℝ ∧ ((log‘3) / (log‘𝑃)) ∈ ℝ ∧ 1 ∈ ℝ) → ((𝑀 ≤ ((log‘3) / (log‘𝑃)) ∧ ((log‘3) / (log‘𝑃)) ≤ 1) → 𝑀 ≤ 1))
9778, 92, 95, 96syl3anc 1374 . . . . . . . . . . . . . . . . . . 19 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑀 ≤ ((log‘3) / (log‘𝑃)) ∧ ((log‘3) / (log‘𝑃)) ≤ 1) → 𝑀 ≤ 1))
98 nnge1 12194 . . . . . . . . . . . . . . . . . . . . 21 (𝑀 ∈ ℕ → 1 ≤ 𝑀)
99 eqcom 2742 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑀 = 1 ↔ 1 = 𝑀)
100 1red 11134 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑀 ∈ ℕ → 1 ∈ ℝ)
101100, 77letri3d 11277 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑀 ∈ ℕ → (1 = 𝑀 ↔ (1 ≤ 𝑀𝑀 ≤ 1)))
10299, 101bitr2id 284 . . . . . . . . . . . . . . . . . . . . . 22 (𝑀 ∈ ℕ → ((1 ≤ 𝑀𝑀 ≤ 1) ↔ 𝑀 = 1))
103102biimpd 229 . . . . . . . . . . . . . . . . . . . . 21 (𝑀 ∈ ℕ → ((1 ≤ 𝑀𝑀 ≤ 1) → 𝑀 = 1))
10498, 103mpand 696 . . . . . . . . . . . . . . . . . . . 20 (𝑀 ∈ ℕ → (𝑀 ≤ 1 → 𝑀 = 1))
1051043ad2ant2 1135 . . . . . . . . . . . . . . . . . . 19 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑀 ≤ 1 → 𝑀 = 1))
10697, 105syld 47 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑀 ≤ ((log‘3) / (log‘𝑃)) ∧ ((log‘3) / (log‘𝑃)) ≤ 1) → 𝑀 = 1))
107106expd 415 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑀 ≤ ((log‘3) / (log‘𝑃)) → (((log‘3) / (log‘𝑃)) ≤ 1 → 𝑀 = 1)))
10894, 107syld 47 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃))) ∧ (⌊‘((log‘3) / (log‘𝑃))) ≤ ((log‘3) / (log‘𝑃))) → (((log‘3) / (log‘𝑃)) ≤ 1 → 𝑀 = 1)))
10976, 108mpan2d 695 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃))) → (((log‘3) / (log‘𝑃)) ≤ 1 → 𝑀 = 1)))
11074, 109mpid 44 . . . . . . . . . . . . . 14 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃))) → 𝑀 = 1))
11157, 110sylbid 240 . . . . . . . . . . . . 13 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑃𝑀) ≤ 3 → 𝑀 = 1))
11246, 111syld 47 . . . . . . . . . . . 12 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (3 = (𝑃𝑀) → 𝑀 = 1))
113112adantl 481 . . . . . . . . . . 11 ((𝑘 = 1 ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → (3 = (𝑃𝑀) → 𝑀 = 1))
11432, 113sylbid 240 . . . . . . . . . 10 ((𝑘 = 1 ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) → 𝑀 = 1))
115114ex 412 . . . . . . . . 9 (𝑘 = 1 → ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) → 𝑀 = 1)))
116 sq1 14146 . . . . . . . . . . . . . 14 (1↑2) = 1
117116eqcomi 2744 . . . . . . . . . . . . 13 1 = (1↑2)
118117oveq2i 7367 . . . . . . . . . . . 12 (((2↑𝑘)↑2) − 1) = (((2↑𝑘)↑2) − (1↑2))
119118eqeq1i 2740 . . . . . . . . . . 11 ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) ↔ (((2↑𝑘)↑2) − (1↑2)) = (𝑃𝑀))
120 eqcom 2742 . . . . . . . . . . . 12 ((((2↑𝑘)↑2) − (1↑2)) = (𝑃𝑀) ↔ (𝑃𝑀) = (((2↑𝑘)↑2) − (1↑2)))
1219a1i 11 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (ℤ‘2) → 2 ∈ ℕ0)
122 eluzge2nn0 12831 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (ℤ‘2) → 𝑘 ∈ ℕ0)
123121, 122nn0expcld 14197 . . . . . . . . . . . . . . 15 (𝑘 ∈ (ℤ‘2) → (2↑𝑘) ∈ ℕ0)
124123adantr 480 . . . . . . . . . . . . . 14 ((𝑘 ∈ (ℤ‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → (2↑𝑘) ∈ ℕ0)
125 1nn0 12442 . . . . . . . . . . . . . . 15 1 ∈ ℕ0
126125a1i 11 . . . . . . . . . . . . . 14 ((𝑘 ∈ (ℤ‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → 1 ∈ ℕ0)
127 1p1e2 12290 . . . . . . . . . . . . . . . . 17 (1 + 1) = 2
12822eqcomi 2744 . . . . . . . . . . . . . . . . 17 2 = (2↑1)
129127, 128eqtri 2758 . . . . . . . . . . . . . . . 16 (1 + 1) = (2↑1)
130 eluz2gt1 12859 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ (ℤ‘2) → 1 < 𝑘)
131 2re 12244 . . . . . . . . . . . . . . . . . . 19 2 ∈ ℝ
132131a1i 11 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ‘2) → 2 ∈ ℝ)
133 1zzd 12547 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ‘2) → 1 ∈ ℤ)
134 eluzelz 12787 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ‘2) → 𝑘 ∈ ℤ)
135 1lt2 12336 . . . . . . . . . . . . . . . . . . 19 1 < 2
136135a1i 11 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ‘2) → 1 < 2)
137132, 133, 134, 136ltexp2d 14202 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ (ℤ‘2) → (1 < 𝑘 ↔ (2↑1) < (2↑𝑘)))
138130, 137mpbid 232 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (ℤ‘2) → (2↑1) < (2↑𝑘))
139129, 138eqbrtrid 5109 . . . . . . . . . . . . . . 15 (𝑘 ∈ (ℤ‘2) → (1 + 1) < (2↑𝑘))
140139adantr 480 . . . . . . . . . . . . . 14 ((𝑘 ∈ (ℤ‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → (1 + 1) < (2↑𝑘))
14134, 39anim12i 614 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) → (𝑃 ∈ ℙ ∧ 𝑀 ∈ ℕ0))
1421413adant3 1133 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑃 ∈ ℙ ∧ 𝑀 ∈ ℕ0))
143142adantl 481 . . . . . . . . . . . . . 14 ((𝑘 ∈ (ℤ‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → (𝑃 ∈ ℙ ∧ 𝑀 ∈ ℕ0))
144 difsqpwdvds 16847 . . . . . . . . . . . . . 14 ((((2↑𝑘) ∈ ℕ0 ∧ 1 ∈ ℕ0 ∧ (1 + 1) < (2↑𝑘)) ∧ (𝑃 ∈ ℙ ∧ 𝑀 ∈ ℕ0)) → ((𝑃𝑀) = (((2↑𝑘)↑2) − (1↑2)) → 𝑃 ∥ (2 · 1)))
145124, 126, 140, 143, 144syl31anc 1376 . . . . . . . . . . . . 13 ((𝑘 ∈ (ℤ‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → ((𝑃𝑀) = (((2↑𝑘)↑2) − (1↑2)) → 𝑃 ∥ (2 · 1)))
146 2t1e2 12328 . . . . . . . . . . . . . . . . . 18 (2 · 1) = 2
147146breq2i 5082 . . . . . . . . . . . . . . . . 17 (𝑃 ∥ (2 · 1) ↔ 𝑃 ∥ 2)
148 prmuz2 16654 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ ℙ → 𝑃 ∈ (ℤ‘2))
14934, 148syl 17 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ (ℤ‘2))
150 2prm 16650 . . . . . . . . . . . . . . . . . 18 2 ∈ ℙ
151 dvdsprm 16662 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℤ‘2) ∧ 2 ∈ ℙ) → (𝑃 ∥ 2 ↔ 𝑃 = 2))
152149, 150, 151sylancl 587 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∥ 2 ↔ 𝑃 = 2))
153147, 152bitrid 283 . . . . . . . . . . . . . . . 16 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∥ (2 · 1) ↔ 𝑃 = 2))
154 eldifsn 4721 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ (ℙ ∖ {2}) ↔ (𝑃 ∈ ℙ ∧ 𝑃 ≠ 2))
155 eqneqall 2941 . . . . . . . . . . . . . . . . . 18 (𝑃 = 2 → (𝑃 ≠ 2 → 𝑀 = 1))
156155com12 32 . . . . . . . . . . . . . . . . 17 (𝑃 ≠ 2 → (𝑃 = 2 → 𝑀 = 1))
157154, 156simplbiim 504 . . . . . . . . . . . . . . . 16 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 = 2 → 𝑀 = 1))
158153, 157sylbid 240 . . . . . . . . . . . . . . 15 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∥ (2 · 1) → 𝑀 = 1))
1591583ad2ant1 1134 . . . . . . . . . . . . . 14 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑃 ∥ (2 · 1) → 𝑀 = 1))
160159adantl 481 . . . . . . . . . . . . 13 ((𝑘 ∈ (ℤ‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → (𝑃 ∥ (2 · 1) → 𝑀 = 1))
161145, 160syld 47 . . . . . . . . . . . 12 ((𝑘 ∈ (ℤ‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → ((𝑃𝑀) = (((2↑𝑘)↑2) − (1↑2)) → 𝑀 = 1))
162120, 161biimtrid 242 . . . . . . . . . . 11 ((𝑘 ∈ (ℤ‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → ((((2↑𝑘)↑2) − (1↑2)) = (𝑃𝑀) → 𝑀 = 1))
163119, 162biimtrid 242 . . . . . . . . . 10 ((𝑘 ∈ (ℤ‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) → 𝑀 = 1))
164163ex 412 . . . . . . . . 9 (𝑘 ∈ (ℤ‘2) → ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) → 𝑀 = 1)))
165115, 164jaoi 858 . . . . . . . 8 ((𝑘 = 1 ∨ 𝑘 ∈ (ℤ‘2)) → ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) → 𝑀 = 1)))
16618, 165sylbi 217 . . . . . . 7 (𝑘 ∈ ℕ → ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) → 𝑀 = 1)))
167166impcom 407 . . . . . 6 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) → ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) → 𝑀 = 1))
168167adantr 480 . . . . 5 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) ∧ (2 · 𝑘) = 𝑁) → ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) → 𝑀 = 1))
16917, 168sylbid 240 . . . 4 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) ∧ (2 · 𝑘) = 𝑁) → (((2↑𝑁) − 1) = (𝑃𝑀) → 𝑀 = 1))
170169rexlimdva2 3138 . . 3 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (∃𝑘 ∈ ℕ (2 · 𝑘) = 𝑁 → (((2↑𝑁) − 1) = (𝑃𝑀) → 𝑀 = 1)))
1712, 170sylbid 240 . 2 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2 ∥ 𝑁 → (((2↑𝑁) − 1) = (𝑃𝑀) → 𝑀 = 1)))
1721713imp 1111 1 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 2 ∥ 𝑁 ∧ ((2↑𝑁) − 1) = (𝑃𝑀)) → 𝑀 = 1)
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395  wo 848  w3a 1087   = wceq 1542  wcel 2114  wne 2930  wrex 3059  cdif 3882  {csn 4557   class class class wbr 5074  cfv 6487  (class class class)co 7356  cc 11025  cr 11026  0cc0 11027  1c1 11028   + caddc 11030   · cmul 11032   < clt 11168  cle 11169  cmin 11366   / cdiv 11796  cn 12163  2c2 12225  3c3 12226  4c4 12227  0cn0 12426  cz 12513  cuz 12777  +crp 12931  cfl 13738  cexp 14012  cdvds 16210  cprime 16629  logclog 26506
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1912  ax-6 1969  ax-7 2010  ax-8 2116  ax-9 2124  ax-10 2147  ax-11 2163  ax-12 2184  ax-ext 2707  ax-rep 5201  ax-sep 5220  ax-nul 5230  ax-pow 5296  ax-pr 5364  ax-un 7678  ax-inf2 9551  ax-cnex 11083  ax-resscn 11084  ax-1cn 11085  ax-icn 11086  ax-addcl 11087  ax-addrcl 11088  ax-mulcl 11089  ax-mulrcl 11090  ax-mulcom 11091  ax-addass 11092  ax-mulass 11093  ax-distr 11094  ax-i2m1 11095  ax-1ne0 11096  ax-1rid 11097  ax-rnegex 11098  ax-rrecex 11099  ax-cnre 11100  ax-pre-lttri 11101  ax-pre-lttrn 11102  ax-pre-ltadd 11103  ax-pre-mulgt0 11104  ax-pre-sup 11105  ax-addf 11106
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 849  df-3or 1088  df-3an 1089  df-tru 1545  df-fal 1555  df-ex 1782  df-nf 1786  df-sb 2069  df-mo 2538  df-eu 2568  df-clab 2714  df-cleq 2727  df-clel 2810  df-nfc 2884  df-ne 2931  df-nel 3035  df-ral 3050  df-rex 3060  df-rmo 3340  df-reu 3341  df-rab 3388  df-v 3429  df-sbc 3726  df-csb 3834  df-dif 3888  df-un 3890  df-in 3892  df-ss 3902  df-pss 3905  df-nul 4264  df-if 4457  df-pw 4533  df-sn 4558  df-pr 4560  df-tp 4562  df-op 4564  df-uni 4841  df-int 4880  df-iun 4925  df-iin 4926  df-br 5075  df-opab 5137  df-mpt 5156  df-tr 5182  df-id 5515  df-eprel 5520  df-po 5528  df-so 5529  df-fr 5573  df-se 5574  df-we 5575  df-xp 5626  df-rel 5627  df-cnv 5628  df-co 5629  df-dm 5630  df-rn 5631  df-res 5632  df-ima 5633  df-pred 6254  df-ord 6315  df-on 6316  df-lim 6317  df-suc 6318  df-iota 6443  df-fun 6489  df-fn 6490  df-f 6491  df-f1 6492  df-fo 6493  df-f1o 6494  df-fv 6495  df-isom 6496  df-riota 7313  df-ov 7359  df-oprab 7360  df-mpo 7361  df-of 7620  df-om 7807  df-1st 7931  df-2nd 7932  df-supp 8100  df-frecs 8220  df-wrecs 8251  df-recs 8300  df-rdg 8338  df-1o 8394  df-2o 8395  df-er 8632  df-map 8764  df-pm 8765  df-ixp 8835  df-en 8883  df-dom 8884  df-sdom 8885  df-fin 8886  df-fsupp 9264  df-fi 9313  df-sup 9344  df-inf 9345  df-oi 9414  df-card 9852  df-pnf 11170  df-mnf 11171  df-xr 11172  df-ltxr 11173  df-le 11174  df-sub 11368  df-neg 11369  df-div 11797  df-nn 12164  df-2 12233  df-3 12234  df-4 12235  df-5 12236  df-6 12237  df-7 12238  df-8 12239  df-9 12240  df-n0 12427  df-z 12514  df-dec 12634  df-uz 12778  df-q 12888  df-rp 12932  df-xneg 13052  df-xadd 13053  df-xmul 13054  df-ioo 13291  df-ioc 13292  df-ico 13293  df-icc 13294  df-fz 13451  df-fzo 13598  df-fl 13740  df-mod 13818  df-seq 13953  df-exp 14013  df-fac 14225  df-bc 14254  df-hash 14282  df-shft 15018  df-cj 15050  df-re 15051  df-im 15052  df-sqrt 15186  df-abs 15187  df-limsup 15422  df-clim 15439  df-rlim 15440  df-sum 15638  df-ef 16021  df-sin 16023  df-cos 16024  df-pi 16026  df-dvds 16211  df-gcd 16453  df-prm 16630  df-pc 16797  df-struct 17106  df-sets 17123  df-slot 17141  df-ndx 17153  df-base 17169  df-ress 17190  df-plusg 17222  df-mulr 17223  df-starv 17224  df-sca 17225  df-vsca 17226  df-ip 17227  df-tset 17228  df-ple 17229  df-ds 17231  df-unif 17232  df-hom 17233  df-cco 17234  df-rest 17374  df-topn 17375  df-0g 17393  df-gsum 17394  df-topgen 17395  df-pt 17396  df-prds 17399  df-xrs 17455  df-qtop 17460  df-imas 17461  df-xps 17463  df-mre 17537  df-mrc 17538  df-acs 17540  df-mgm 18597  df-sgrp 18676  df-mnd 18692  df-submnd 18741  df-mulg 19033  df-cntz 19281  df-cmn 19746  df-psmet 21333  df-xmet 21334  df-met 21335  df-bl 21336  df-mopn 21337  df-fbas 21338  df-fg 21339  df-cnfld 21342  df-top 22847  df-topon 22864  df-topsp 22886  df-bases 22899  df-cld 22972  df-ntr 22973  df-cls 22974  df-nei 23051  df-lp 23089  df-perf 23090  df-cn 23180  df-cnp 23181  df-haus 23268  df-tx 23515  df-hmeo 23708  df-fil 23799  df-fm 23891  df-flim 23892  df-flf 23893  df-xms 24273  df-ms 24274  df-tms 24275  df-cncf 24833  df-limc 25821  df-dv 25822  df-log 26508
This theorem is referenced by:  lighneal  48062
  Copyright terms: Public domain W3C validator