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 47480
Description: Lemma 2 for lighneal 47485. (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 16399 . . . 4 (𝑁 ∈ ℕ → (2 ∥ 𝑁 ↔ ∃𝑘 ∈ ℕ (2 · 𝑘) = 𝑁))
213ad2ant3 1135 . . 3 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2 ∥ 𝑁 ↔ ∃𝑘 ∈ ℕ (2 · 𝑘) = 𝑁))
3 oveq2 7456 . . . . . . . . 9 (𝑁 = (2 · 𝑘) → (2↑𝑁) = (2↑(2 · 𝑘)))
43eqcoms 2748 . . . . . . . 8 ((2 · 𝑘) = 𝑁 → (2↑𝑁) = (2↑(2 · 𝑘)))
5 2cnd 12371 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → 2 ∈ ℂ)
6 nncn 12301 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → 𝑘 ∈ ℂ)
75, 6mulcomd 11311 . . . . . . . . . . 11 (𝑘 ∈ ℕ → (2 · 𝑘) = (𝑘 · 2))
87oveq2d 7464 . . . . . . . . . 10 (𝑘 ∈ ℕ → (2↑(2 · 𝑘)) = (2↑(𝑘 · 2)))
9 2nn0 12570 . . . . . . . . . . . 12 2 ∈ ℕ0
109a1i 11 . . . . . . . . . . 11 (𝑘 ∈ ℕ → 2 ∈ ℕ0)
11 nnnn0 12560 . . . . . . . . . . 11 (𝑘 ∈ ℕ → 𝑘 ∈ ℕ0)
125, 10, 11expmuld 14199 . . . . . . . . . 10 (𝑘 ∈ ℕ → (2↑(𝑘 · 2)) = ((2↑𝑘)↑2))
138, 12eqtrd 2780 . . . . . . . . 9 (𝑘 ∈ ℕ → (2↑(2 · 𝑘)) = ((2↑𝑘)↑2))
1413adantl 481 . . . . . . . 8 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) → (2↑(2 · 𝑘)) = ((2↑𝑘)↑2))
154, 14sylan9eqr 2802 . . . . . . 7 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) ∧ (2 · 𝑘) = 𝑁) → (2↑𝑁) = ((2↑𝑘)↑2))
1615oveq1d 7463 . . . . . 6 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) ∧ (2 · 𝑘) = 𝑁) → ((2↑𝑁) − 1) = (((2↑𝑘)↑2) − 1))
1716eqeq1d 2742 . . . . 5 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) ∧ (2 · 𝑘) = 𝑁) → (((2↑𝑁) − 1) = (𝑃𝑀) ↔ (((2↑𝑘)↑2) − 1) = (𝑃𝑀)))
18 elnn1uz2 12990 . . . . . . . 8 (𝑘 ∈ ℕ ↔ (𝑘 = 1 ∨ 𝑘 ∈ (ℤ‘2)))
19 oveq2 7456 . . . . . . . . . . . . . . . . 17 (𝑘 = 1 → (2↑𝑘) = (2↑1))
20 2cn 12368 . . . . . . . . . . . . . . . . . 18 2 ∈ ℂ
21 exp1 14118 . . . . . . . . . . . . . . . . . 18 (2 ∈ ℂ → (2↑1) = 2)
2220, 21ax-mp 5 . . . . . . . . . . . . . . . . 17 (2↑1) = 2
2319, 22eqtrdi 2796 . . . . . . . . . . . . . . . 16 (𝑘 = 1 → (2↑𝑘) = 2)
2423oveq1d 7463 . . . . . . . . . . . . . . 15 (𝑘 = 1 → ((2↑𝑘)↑2) = (2↑2))
2524oveq1d 7463 . . . . . . . . . . . . . 14 (𝑘 = 1 → (((2↑𝑘)↑2) − 1) = ((2↑2) − 1))
26 sq2 14246 . . . . . . . . . . . . . . . 16 (2↑2) = 4
2726oveq1i 7458 . . . . . . . . . . . . . . 15 ((2↑2) − 1) = (4 − 1)
28 4m1e3 12422 . . . . . . . . . . . . . . 15 (4 − 1) = 3
2927, 28eqtri 2768 . . . . . . . . . . . . . 14 ((2↑2) − 1) = 3
3025, 29eqtrdi 2796 . . . . . . . . . . . . 13 (𝑘 = 1 → (((2↑𝑘)↑2) − 1) = 3)
3130eqeq1d 2742 . . . . . . . . . . . 12 (𝑘 = 1 → ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) ↔ 3 = (𝑃𝑀)))
3231adantr 480 . . . . . . . . . . 11 ((𝑘 = 1 ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) ↔ 3 = (𝑃𝑀)))
33 eqcom 2747 . . . . . . . . . . . . . 14 (3 = (𝑃𝑀) ↔ (𝑃𝑀) = 3)
34 eldifi 4154 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℙ)
35 prmnn 16721 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
36 nnre 12300 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ ℕ → 𝑃 ∈ ℝ)
3734, 35, 363syl 18 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℝ)
38373ad2ant1 1133 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑃 ∈ ℝ)
39 nnnn0 12560 . . . . . . . . . . . . . . . . . . 19 (𝑀 ∈ ℕ → 𝑀 ∈ ℕ0)
40393ad2ant2 1134 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑀 ∈ ℕ0)
4138, 40reexpcld 14213 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑃𝑀) ∈ ℝ)
4241adantr 480 . . . . . . . . . . . . . . . 16 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑃𝑀) = 3) → (𝑃𝑀) ∈ ℝ)
43 simpr 484 . . . . . . . . . . . . . . . 16 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑃𝑀) = 3) → (𝑃𝑀) = 3)
4442, 43eqled 11393 . . . . . . . . . . . . . . 15 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑃𝑀) = 3) → (𝑃𝑀) ≤ 3)
4544ex 412 . . . . . . . . . . . . . 14 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑃𝑀) = 3 → (𝑃𝑀) ≤ 3))
4633, 45biimtrid 242 . . . . . . . . . . . . 13 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (3 = (𝑃𝑀) → (𝑃𝑀) ≤ 3))
4735nnred 12308 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ ℙ → 𝑃 ∈ ℝ)
48 prmgt1 16744 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ ℙ → 1 < 𝑃)
4947, 48jca 511 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ ℙ → (𝑃 ∈ ℝ ∧ 1 < 𝑃))
5034, 49syl 17 . . . . . . . . . . . . . . . 16 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∈ ℝ ∧ 1 < 𝑃))
51503ad2ant1 1133 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑃 ∈ ℝ ∧ 1 < 𝑃))
52 nnz 12660 . . . . . . . . . . . . . . . 16 (𝑀 ∈ ℕ → 𝑀 ∈ ℤ)
53523ad2ant2 1134 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑀 ∈ ℤ)
54 3rp 13063 . . . . . . . . . . . . . . . 16 3 ∈ ℝ+
5554a1i 11 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 3 ∈ ℝ+)
56 efexple 27343 . . . . . . . . . . . . . . 15 (((𝑃 ∈ ℝ ∧ 1 < 𝑃) ∧ 𝑀 ∈ ℤ ∧ 3 ∈ ℝ+) → ((𝑃𝑀) ≤ 3 ↔ 𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃)))))
5751, 53, 55, 56syl3anc 1371 . . . . . . . . . . . . . 14 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑃𝑀) ≤ 3 ↔ 𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃)))))
58 oddprmge3 16747 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ (ℤ‘3))
59 eluzle 12916 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℤ‘3) → 3 ≤ 𝑃)
6058, 59syl 17 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ (ℙ ∖ {2}) → 3 ≤ 𝑃)
6154a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → 3 ∈ ℝ+)
62 nnrp 13068 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ ℕ → 𝑃 ∈ ℝ+)
6334, 35, 623syl 18 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℝ+)
6461, 63logled 26687 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ (ℙ ∖ {2}) → (3 ≤ 𝑃 ↔ (log‘3) ≤ (log‘𝑃)))
6560, 64mpbid 232 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ (ℙ ∖ {2}) → (log‘3) ≤ (log‘𝑃))
66653ad2ant1 1133 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (log‘3) ≤ (log‘𝑃))
67 relogcl 26635 . . . . . . . . . . . . . . . . . 18 (3 ∈ ℝ+ → (log‘3) ∈ ℝ)
6854, 67ax-mp 5 . . . . . . . . . . . . . . . . 17 (log‘3) ∈ ℝ
69 rplogcl 26664 . . . . . . . . . . . . . . . . . . 19 ((𝑃 ∈ ℝ ∧ 1 < 𝑃) → (log‘𝑃) ∈ ℝ+)
7034, 49, 693syl 18 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ (ℙ ∖ {2}) → (log‘𝑃) ∈ ℝ+)
71703ad2ant1 1133 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (log‘𝑃) ∈ ℝ+)
72 divle1le 13127 . . . . . . . . . . . . . . . . 17 (((log‘3) ∈ ℝ ∧ (log‘𝑃) ∈ ℝ+) → (((log‘3) / (log‘𝑃)) ≤ 1 ↔ (log‘3) ≤ (log‘𝑃)))
7368, 71, 72sylancr 586 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (((log‘3) / (log‘𝑃)) ≤ 1 ↔ (log‘3) ≤ (log‘𝑃)))
7466, 73mpbird 257 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((log‘3) / (log‘𝑃)) ≤ 1)
75 fldivle 13882 . . . . . . . . . . . . . . . . 17 (((log‘3) ∈ ℝ ∧ (log‘𝑃) ∈ ℝ+) → (⌊‘((log‘3) / (log‘𝑃))) ≤ ((log‘3) / (log‘𝑃)))
7668, 71, 75sylancr 586 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((log‘3) / (log‘𝑃))) ≤ ((log‘3) / (log‘𝑃)))
77 nnre 12300 . . . . . . . . . . . . . . . . . . 19 (𝑀 ∈ ℕ → 𝑀 ∈ ℝ)
78773ad2ant2 1134 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑀 ∈ ℝ)
7968a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 (𝑃 ∈ (ℙ ∖ {2}) → (log‘3) ∈ ℝ)
8062relogcld 26683 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑃 ∈ ℕ → (log‘𝑃) ∈ ℝ)
8134, 35, 803syl 18 . . . . . . . . . . . . . . . . . . . . . 22 (𝑃 ∈ (ℙ ∖ {2}) → (log‘𝑃) ∈ ℝ)
8235nnrpd 13097 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑃 ∈ ℙ → 𝑃 ∈ ℝ+)
83 1red 11291 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑃 ∈ ℙ → 1 ∈ ℝ)
8483, 48gtned 11425 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑃 ∈ ℙ → 𝑃 ≠ 1)
8582, 84jca 511 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑃 ∈ ℙ → (𝑃 ∈ ℝ+𝑃 ≠ 1))
86 logne0 26639 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑃 ∈ ℝ+𝑃 ≠ 1) → (log‘𝑃) ≠ 0)
8734, 85, 863syl 18 . . . . . . . . . . . . . . . . . . . . . 22 (𝑃 ∈ (ℙ ∖ {2}) → (log‘𝑃) ≠ 0)
8879, 81, 87redivcld 12122 . . . . . . . . . . . . . . . . . . . . 21 (𝑃 ∈ (ℙ ∖ {2}) → ((log‘3) / (log‘𝑃)) ∈ ℝ)
8988flcld 13849 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ (ℙ ∖ {2}) → (⌊‘((log‘3) / (log‘𝑃))) ∈ ℤ)
9089zred 12747 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → (⌊‘((log‘3) / (log‘𝑃))) ∈ ℝ)
91903ad2ant1 1133 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((log‘3) / (log‘𝑃))) ∈ ℝ)
92883ad2ant1 1133 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((log‘3) / (log‘𝑃)) ∈ ℝ)
93 letr 11384 . . . . . . . . . . . . . . . . . 18 ((𝑀 ∈ ℝ ∧ (⌊‘((log‘3) / (log‘𝑃))) ∈ ℝ ∧ ((log‘3) / (log‘𝑃)) ∈ ℝ) → ((𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃))) ∧ (⌊‘((log‘3) / (log‘𝑃))) ≤ ((log‘3) / (log‘𝑃))) → 𝑀 ≤ ((log‘3) / (log‘𝑃))))
9478, 91, 92, 93syl3anc 1371 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃))) ∧ (⌊‘((log‘3) / (log‘𝑃))) ≤ ((log‘3) / (log‘𝑃))) → 𝑀 ≤ ((log‘3) / (log‘𝑃))))
95 1red 11291 . . . . . . . . . . . . . . . . . . . 20 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 1 ∈ ℝ)
96 letr 11384 . . . . . . . . . . . . . . . . . . . 20 ((𝑀 ∈ ℝ ∧ ((log‘3) / (log‘𝑃)) ∈ ℝ ∧ 1 ∈ ℝ) → ((𝑀 ≤ ((log‘3) / (log‘𝑃)) ∧ ((log‘3) / (log‘𝑃)) ≤ 1) → 𝑀 ≤ 1))
9778, 92, 95, 96syl3anc 1371 . . . . . . . . . . . . . . . . . . 19 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑀 ≤ ((log‘3) / (log‘𝑃)) ∧ ((log‘3) / (log‘𝑃)) ≤ 1) → 𝑀 ≤ 1))
98 nnge1 12321 . . . . . . . . . . . . . . . . . . . . 21 (𝑀 ∈ ℕ → 1 ≤ 𝑀)
99 eqcom 2747 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑀 = 1 ↔ 1 = 𝑀)
100 1red 11291 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑀 ∈ ℕ → 1 ∈ ℝ)
101100, 77letri3d 11432 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑀 ∈ ℕ → (1 = 𝑀 ↔ (1 ≤ 𝑀𝑀 ≤ 1)))
10299, 101bitr2id 284 . . . . . . . . . . . . . . . . . . . . . 22 (𝑀 ∈ ℕ → ((1 ≤ 𝑀𝑀 ≤ 1) ↔ 𝑀 = 1))
103102biimpd 229 . . . . . . . . . . . . . . . . . . . . 21 (𝑀 ∈ ℕ → ((1 ≤ 𝑀𝑀 ≤ 1) → 𝑀 = 1))
10498, 103mpand 694 . . . . . . . . . . . . . . . . . . . 20 (𝑀 ∈ ℕ → (𝑀 ≤ 1 → 𝑀 = 1))
1051043ad2ant2 1134 . . . . . . . . . . . . . . . . . . 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 693 . . . . . . . . . . . . . . 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 14244 . . . . . . . . . . . . . 14 (1↑2) = 1
117116eqcomi 2749 . . . . . . . . . . . . 13 1 = (1↑2)
118117oveq2i 7459 . . . . . . . . . . . 12 (((2↑𝑘)↑2) − 1) = (((2↑𝑘)↑2) − (1↑2))
119118eqeq1i 2745 . . . . . . . . . . 11 ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) ↔ (((2↑𝑘)↑2) − (1↑2)) = (𝑃𝑀))
120 eqcom 2747 . . . . . . . . . . . 12 ((((2↑𝑘)↑2) − (1↑2)) = (𝑃𝑀) ↔ (𝑃𝑀) = (((2↑𝑘)↑2) − (1↑2)))
1219a1i 11 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (ℤ‘2) → 2 ∈ ℕ0)
122 eluzge2nn0 12952 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (ℤ‘2) → 𝑘 ∈ ℕ0)
123121, 122nn0expcld 14295 . . . . . . . . . . . . . . 15 (𝑘 ∈ (ℤ‘2) → (2↑𝑘) ∈ ℕ0)
124123adantr 480 . . . . . . . . . . . . . 14 ((𝑘 ∈ (ℤ‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → (2↑𝑘) ∈ ℕ0)
125 1nn0 12569 . . . . . . . . . . . . . . 15 1 ∈ ℕ0
126125a1i 11 . . . . . . . . . . . . . 14 ((𝑘 ∈ (ℤ‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → 1 ∈ ℕ0)
127 1p1e2 12418 . . . . . . . . . . . . . . . . 17 (1 + 1) = 2
12822eqcomi 2749 . . . . . . . . . . . . . . . . 17 2 = (2↑1)
129127, 128eqtri 2768 . . . . . . . . . . . . . . . 16 (1 + 1) = (2↑1)
130 eluz2gt1 12985 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ (ℤ‘2) → 1 < 𝑘)
131 2re 12367 . . . . . . . . . . . . . . . . . . 19 2 ∈ ℝ
132131a1i 11 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ‘2) → 2 ∈ ℝ)
133 1zzd 12674 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ‘2) → 1 ∈ ℤ)
134 eluzelz 12913 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ‘2) → 𝑘 ∈ ℤ)
135 1lt2 12464 . . . . . . . . . . . . . . . . . . 19 1 < 2
136135a1i 11 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ‘2) → 1 < 2)
137132, 133, 134, 136ltexp2d 14300 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ (ℤ‘2) → (1 < 𝑘 ↔ (2↑1) < (2↑𝑘)))
138130, 137mpbid 232 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (ℤ‘2) → (2↑1) < (2↑𝑘))
139129, 138eqbrtrid 5201 . . . . . . . . . . . . . . 15 (𝑘 ∈ (ℤ‘2) → (1 + 1) < (2↑𝑘))
140139adantr 480 . . . . . . . . . . . . . 14 ((𝑘 ∈ (ℤ‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → (1 + 1) < (2↑𝑘))
14134, 39anim12i 612 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) → (𝑃 ∈ ℙ ∧ 𝑀 ∈ ℕ0))
1421413adant3 1132 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑃 ∈ ℙ ∧ 𝑀 ∈ ℕ0))
143142adantl 481 . . . . . . . . . . . . . 14 ((𝑘 ∈ (ℤ‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → (𝑃 ∈ ℙ ∧ 𝑀 ∈ ℕ0))
144 difsqpwdvds 16934 . . . . . . . . . . . . . 14 ((((2↑𝑘) ∈ ℕ0 ∧ 1 ∈ ℕ0 ∧ (1 + 1) < (2↑𝑘)) ∧ (𝑃 ∈ ℙ ∧ 𝑀 ∈ ℕ0)) → ((𝑃𝑀) = (((2↑𝑘)↑2) − (1↑2)) → 𝑃 ∥ (2 · 1)))
145124, 126, 140, 143, 144syl31anc 1373 . . . . . . . . . . . . 13 ((𝑘 ∈ (ℤ‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → ((𝑃𝑀) = (((2↑𝑘)↑2) − (1↑2)) → 𝑃 ∥ (2 · 1)))
146 2t1e2 12456 . . . . . . . . . . . . . . . . . 18 (2 · 1) = 2
147146breq2i 5174 . . . . . . . . . . . . . . . . 17 (𝑃 ∥ (2 · 1) ↔ 𝑃 ∥ 2)
148 prmuz2 16743 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ ℙ → 𝑃 ∈ (ℤ‘2))
14934, 148syl 17 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ (ℤ‘2))
150 2prm 16739 . . . . . . . . . . . . . . . . . 18 2 ∈ ℙ
151 dvdsprm 16750 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℤ‘2) ∧ 2 ∈ ℙ) → (𝑃 ∥ 2 ↔ 𝑃 = 2))
152149, 150, 151sylancl 585 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∥ 2 ↔ 𝑃 = 2))
153147, 152bitrid 283 . . . . . . . . . . . . . . . 16 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∥ (2 · 1) ↔ 𝑃 = 2))
154 eldifsn 4811 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ (ℙ ∖ {2}) ↔ (𝑃 ∈ ℙ ∧ 𝑃 ≠ 2))
155 eqneqall 2957 . . . . . . . . . . . . . . . . . 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 1133 . . . . . . . . . . . . . 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 856 . . . . . . . 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 3163 . . 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 846  w3a 1087   = wceq 1537  wcel 2108  wne 2946  wrex 3076  cdif 3973  {csn 4648   class class class wbr 5166  cfv 6573  (class class class)co 7448  cc 11182  cr 11183  0cc0 11184  1c1 11185   + caddc 11187   · cmul 11189   < clt 11324  cle 11325  cmin 11520   / cdiv 11947  cn 12293  2c2 12348  3c3 12349  4c4 12350  0cn0 12553  cz 12639  cuz 12903  +crp 13057  cfl 13841  cexp 14112  cdvds 16302  cprime 16718  logclog 26614
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1793  ax-4 1807  ax-5 1909  ax-6 1967  ax-7 2007  ax-8 2110  ax-9 2118  ax-10 2141  ax-11 2158  ax-12 2178  ax-ext 2711  ax-rep 5303  ax-sep 5317  ax-nul 5324  ax-pow 5383  ax-pr 5447  ax-un 7770  ax-inf2 9710  ax-cnex 11240  ax-resscn 11241  ax-1cn 11242  ax-icn 11243  ax-addcl 11244  ax-addrcl 11245  ax-mulcl 11246  ax-mulrcl 11247  ax-mulcom 11248  ax-addass 11249  ax-mulass 11250  ax-distr 11251  ax-i2m1 11252  ax-1ne0 11253  ax-1rid 11254  ax-rnegex 11255  ax-rrecex 11256  ax-cnre 11257  ax-pre-lttri 11258  ax-pre-lttrn 11259  ax-pre-ltadd 11260  ax-pre-mulgt0 11261  ax-pre-sup 11262  ax-addf 11263
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 847  df-3or 1088  df-3an 1089  df-tru 1540  df-fal 1550  df-ex 1778  df-nf 1782  df-sb 2065  df-mo 2543  df-eu 2572  df-clab 2718  df-cleq 2732  df-clel 2819  df-nfc 2895  df-ne 2947  df-nel 3053  df-ral 3068  df-rex 3077  df-rmo 3388  df-reu 3389  df-rab 3444  df-v 3490  df-sbc 3805  df-csb 3922  df-dif 3979  df-un 3981  df-in 3983  df-ss 3993  df-pss 3996  df-nul 4353  df-if 4549  df-pw 4624  df-sn 4649  df-pr 4651  df-tp 4653  df-op 4655  df-uni 4932  df-int 4971  df-iun 5017  df-iin 5018  df-br 5167  df-opab 5229  df-mpt 5250  df-tr 5284  df-id 5593  df-eprel 5599  df-po 5607  df-so 5608  df-fr 5652  df-se 5653  df-we 5654  df-xp 5706  df-rel 5707  df-cnv 5708  df-co 5709  df-dm 5710  df-rn 5711  df-res 5712  df-ima 5713  df-pred 6332  df-ord 6398  df-on 6399  df-lim 6400  df-suc 6401  df-iota 6525  df-fun 6575  df-fn 6576  df-f 6577  df-f1 6578  df-fo 6579  df-f1o 6580  df-fv 6581  df-isom 6582  df-riota 7404  df-ov 7451  df-oprab 7452  df-mpo 7453  df-of 7714  df-om 7904  df-1st 8030  df-2nd 8031  df-supp 8202  df-frecs 8322  df-wrecs 8353  df-recs 8427  df-rdg 8466  df-1o 8522  df-2o 8523  df-er 8763  df-map 8886  df-pm 8887  df-ixp 8956  df-en 9004  df-dom 9005  df-sdom 9006  df-fin 9007  df-fsupp 9432  df-fi 9480  df-sup 9511  df-inf 9512  df-oi 9579  df-card 10008  df-pnf 11326  df-mnf 11327  df-xr 11328  df-ltxr 11329  df-le 11330  df-sub 11522  df-neg 11523  df-div 11948  df-nn 12294  df-2 12356  df-3 12357  df-4 12358  df-5 12359  df-6 12360  df-7 12361  df-8 12362  df-9 12363  df-n0 12554  df-z 12640  df-dec 12759  df-uz 12904  df-q 13014  df-rp 13058  df-xneg 13175  df-xadd 13176  df-xmul 13177  df-ioo 13411  df-ioc 13412  df-ico 13413  df-icc 13414  df-fz 13568  df-fzo 13712  df-fl 13843  df-mod 13921  df-seq 14053  df-exp 14113  df-fac 14323  df-bc 14352  df-hash 14380  df-shft 15116  df-cj 15148  df-re 15149  df-im 15150  df-sqrt 15284  df-abs 15285  df-limsup 15517  df-clim 15534  df-rlim 15535  df-sum 15735  df-ef 16115  df-sin 16117  df-cos 16118  df-pi 16120  df-dvds 16303  df-gcd 16541  df-prm 16719  df-pc 16884  df-struct 17194  df-sets 17211  df-slot 17229  df-ndx 17241  df-base 17259  df-ress 17288  df-plusg 17324  df-mulr 17325  df-starv 17326  df-sca 17327  df-vsca 17328  df-ip 17329  df-tset 17330  df-ple 17331  df-ds 17333  df-unif 17334  df-hom 17335  df-cco 17336  df-rest 17482  df-topn 17483  df-0g 17501  df-gsum 17502  df-topgen 17503  df-pt 17504  df-prds 17507  df-xrs 17562  df-qtop 17567  df-imas 17568  df-xps 17570  df-mre 17644  df-mrc 17645  df-acs 17647  df-mgm 18678  df-sgrp 18757  df-mnd 18773  df-submnd 18819  df-mulg 19108  df-cntz 19357  df-cmn 19824  df-psmet 21379  df-xmet 21380  df-met 21381  df-bl 21382  df-mopn 21383  df-fbas 21384  df-fg 21385  df-cnfld 21388  df-top 22921  df-topon 22938  df-topsp 22960  df-bases 22974  df-cld 23048  df-ntr 23049  df-cls 23050  df-nei 23127  df-lp 23165  df-perf 23166  df-cn 23256  df-cnp 23257  df-haus 23344  df-tx 23591  df-hmeo 23784  df-fil 23875  df-fm 23967  df-flim 23968  df-flf 23969  df-xms 24351  df-ms 24352  df-tms 24353  df-cncf 24923  df-limc 25921  df-dv 25922  df-log 26616
This theorem is referenced by:  lighneal  47485
  Copyright terms: Public domain W3C validator