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 48613
Description: Lemma 2 for lighneal 48618. (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 16488 . . . 4 (𝑁 ∈ ℕ → (2 ∥ 𝑁 ↔ ∃𝑘 ∈ ℕ (2 · 𝑘) = 𝑁))
213ad2ant3 1153 . . 3 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2 ∥ 𝑁 ↔ ∃𝑘 ∈ ℕ (2 · 𝑘) = 𝑁))
3 oveq2 7416 . . . . . . . . 9 (𝑁 = (2 · 𝑘) → (2↑𝑁) = (2↑(2 · 𝑘)))
43eqcoms 2768 . . . . . . . 8 ((2 · 𝑘) = 𝑁 → (2↑𝑁) = (2↑(2 · 𝑘)))
5 2cnd 12390 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → 2 ∈ ℂ)
6 nncn 12312 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → 𝑘 ∈ ℂ)
75, 6mulcomd 11301 . . . . . . . . . . 11 (𝑘 ∈ ℕ → (2 · 𝑘) = (𝑘 · 2))
87oveq2d 7424 . . . . . . . . . 10 (𝑘 ∈ ℕ → (2↑(2 · 𝑘)) = (2↑(𝑘 · 2)))
9 2nn0 12592 . . . . . . . . . . . 12 2 ∈ ℕ0
109a1i 11 . . . . . . . . . . 11 (𝑘 ∈ ℕ → 2 ∈ ℕ0)
11 nnnn0 12582 . . . . . . . . . . 11 (𝑘 ∈ ℕ → 𝑘 ∈ ℕ0)
125, 10, 11expmuld 14260 . . . . . . . . . 10 (𝑘 ∈ ℕ → (2↑(𝑘 · 2)) = ((2↑𝑘)↑2))
138, 12eqtrd 2795 . . . . . . . . 9 (𝑘 ∈ ℕ → (2↑(2 · 𝑘)) = ((2↑𝑘)↑2))
1413adantl 487 . . . . . . . 8 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) → (2↑(2 · 𝑘)) = ((2↑𝑘)↑2))
154, 14sylan9eqr 2817 . . . . . . 7 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) ∧ (2 · 𝑘) = 𝑁) → (2↑𝑁) = ((2↑𝑘)↑2))
1615oveq1d 7423 . . . . . 6 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) ∧ (2 · 𝑘) = 𝑁) → ((2↑𝑁) − 1) = (((2↑𝑘)↑2) − 1))
1716eqeq1d 2762 . . . . 5 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) ∧ (2 · 𝑘) = 𝑁) → (((2↑𝑁) − 1) = (𝑃↑𝑀) ↔ (((2↑𝑘)↑2) − 1) = (𝑃↑𝑀)))
18 elnn1uz2 13021 . . . . . . . 8 (𝑘 ∈ ℕ ↔ (𝑘 = 1 ∨ 𝑘 ∈ (ℤ≥‘2)))
19 oveq2 7416 . . . . . . . . . . . . . . . . 17 (𝑘 = 1 → (2↑𝑘) = (2↑1))
20 2cn 12387 . . . . . . . . . . . . . . . . . 18 2 ∈ ℂ
21 exp1 14178 . . . . . . . . . . . . . . . . . 18 (2 ∈ ℂ → (2↑1) = 2)
2220, 21ax-mp 5 . . . . . . . . . . . . . . . . 17 (2↑1) = 2
2319, 22eqtrdi 2811 . . . . . . . . . . . . . . . 16 (𝑘 = 1 → (2↑𝑘) = 2)
2423oveq1d 7423 . . . . . . . . . . . . . . 15 (𝑘 = 1 → ((2↑𝑘)↑2) = (2↑2))
2524oveq1d 7423 . . . . . . . . . . . . . 14 (𝑘 = 1 → (((2↑𝑘)↑2) − 1) = ((2↑2) − 1))
26 sq2 14308 . . . . . . . . . . . . . . . 16 (2↑2) = 4
2726oveq1i 7418 . . . . . . . . . . . . . . 15 ((2↑2) − 1) = (4 − 1)
28 4m1e3 12440 . . . . . . . . . . . . . . 15 (4 − 1) = 3
2927, 28eqtri 2783 . . . . . . . . . . . . . 14 ((2↑2) − 1) = 3
3025, 29eqtrdi 2811 . . . . . . . . . . . . 13 (𝑘 = 1 → (((2↑𝑘)↑2) − 1) = 3)
3130eqeq1d 2762 . . . . . . . . . . . 12 (𝑘 = 1 → ((((2↑𝑘)↑2) − 1) = (𝑃↑𝑀) ↔ 3 = (𝑃↑𝑀)))
3231adantr 486 . . . . . . . . . . 11 ((𝑘 = 1 ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → ((((2↑𝑘)↑2) − 1) = (𝑃↑𝑀) ↔ 3 = (𝑃↑𝑀)))
33 eqcom 2767 . . . . . . . . . . . . . 14 (3 = (𝑃↑𝑀) ↔ (𝑃↑𝑀) = 3)
34 eldifi 4077 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℙ)
35 prmnn 16811 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
36 nnre 12311 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ ℕ → 𝑃 ∈ ℝ)
3734, 35, 363syl 19 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℝ)
38373ad2ant1 1151 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑃 ∈ ℝ)
39 nnnn0 12582 . . . . . . . . . . . . . . . . . . 19 (𝑀 ∈ ℕ → 𝑀 ∈ ℕ0)
40393ad2ant2 1152 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑀 ∈ ℕ0)
4138, 40reexpcld 14274 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑃↑𝑀) ∈ ℝ)
4241adantr 486 . . . . . . . . . . . . . . . 16 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑃↑𝑀) = 3) → (𝑃↑𝑀) ∈ ℝ)
43 simpr 490 . . . . . . . . . . . . . . . 16 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑃↑𝑀) = 3) → (𝑃↑𝑀) = 3)
4442, 43eqled 11384 . . . . . . . . . . . . . . 15 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑃↑𝑀) = 3) → (𝑃↑𝑀) ≤ 3)
4544ex 418 . . . . . . . . . . . . . 14 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑃↑𝑀) = 3 → (𝑃↑𝑀) ≤ 3))
4633, 45biimtrid 245 . . . . . . . . . . . . 13 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (3 = (𝑃↑𝑀) → (𝑃↑𝑀) ≤ 3))
4735nnred 12319 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ ℙ → 𝑃 ∈ ℝ)
48 prmgt1 16835 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ ℙ → 1 < 𝑃)
4947, 48jca 521 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ ℙ → (𝑃 ∈ ℝ ∧ 1 < 𝑃))
5034, 49syl 18 . . . . . . . . . . . . . . . 16 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∈ ℝ ∧ 1 < 𝑃))
51503ad2ant1 1151 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑃 ∈ ℝ ∧ 1 < 𝑃))
52 nnz 12683 . . . . . . . . . . . . . . . 16 (𝑀 ∈ ℕ → 𝑀 ∈ ℤ)
53523ad2ant2 1152 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑀 ∈ ℤ)
54 3rp 13095 . . . . . . . . . . . . . . . 16 3 ∈ ℝ+
5554a1i 11 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 3 ∈ ℝ+)
56 efexple 27571 . . . . . . . . . . . . . . 15 (((𝑃 ∈ ℝ ∧ 1 < 𝑃) ∧ 𝑀 ∈ ℤ ∧ 3 ∈ ℝ+) → ((𝑃↑𝑀) ≤ 3 ↔ 𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃)))))
5751, 53, 55, 56syl3anc 1398 . . . . . . . . . . . . . 14 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑃↑𝑀) ≤ 3 ↔ 𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃)))))
58 oddprmge3 16838 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ (ℤ≥‘3))
59 eluzle 12947 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℤ≥‘3) → 3 ≤ 𝑃)
6058, 59syl 18 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ (ℙ ∖ {2}) → 3 ≤ 𝑃)
6154a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → 3 ∈ ℝ+)
62 nnrp 13101 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ ℕ → 𝑃 ∈ ℝ+)
6334, 35, 623syl 19 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℝ+)
6461, 63logled 26918 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ (ℙ ∖ {2}) → (3 ≤ 𝑃 ↔ (log‘3) ≤ (log‘𝑃)))
6560, 64mpbid 235 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ (ℙ ∖ {2}) → (log‘3) ≤ (log‘𝑃))
66653ad2ant1 1151 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (log‘3) ≤ (log‘𝑃))
67 relogcl 26866 . . . . . . . . . . . . . . . . . 18 (3 ∈ ℝ+ → (log‘3) ∈ ℝ)
6854, 67ax-mp 5 . . . . . . . . . . . . . . . . 17 (log‘3) ∈ ℝ
69 rplogcl 26895 . . . . . . . . . . . . . . . . . . 19 ((𝑃 ∈ ℝ ∧ 1 < 𝑃) → (log‘𝑃) ∈ ℝ+)
7034, 49, 693syl 19 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ (ℙ ∖ {2}) → (log‘𝑃) ∈ ℝ+)
71703ad2ant1 1151 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (log‘𝑃) ∈ ℝ+)
72 divle1le 13161 . . . . . . . . . . . . . . . . 17 (((log‘3) ∈ ℝ ∧ (log‘𝑃) ∈ ℝ+) → (((log‘3) / (log‘𝑃)) ≤ 1 ↔ (log‘3) ≤ (log‘𝑃)))
7368, 71, 72sylancr 599 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (((log‘3) / (log‘𝑃)) ≤ 1 ↔ (log‘3) ≤ (log‘𝑃)))
7466, 73mpbird 260 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((log‘3) / (log‘𝑃)) ≤ 1)
75 fldivle 13939 . . . . . . . . . . . . . . . . 17 (((log‘3) ∈ ℝ ∧ (log‘𝑃) ∈ ℝ+) → (⌊‘((log‘3) / (log‘𝑃))) ≤ ((log‘3) / (log‘𝑃)))
7668, 71, 75sylancr 599 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((log‘3) / (log‘𝑃))) ≤ ((log‘3) / (log‘𝑃)))
77 nnre 12311 . . . . . . . . . . . . . . . . . . 19 (𝑀 ∈ ℕ → 𝑀 ∈ ℝ)
78773ad2ant2 1152 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑀 ∈ ℝ)
7968a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 (𝑃 ∈ (ℙ ∖ {2}) → (log‘3) ∈ ℝ)
8062relogcld 26914 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑃 ∈ ℕ → (log‘𝑃) ∈ ℝ)
8134, 35, 803syl 19 . . . . . . . . . . . . . . . . . . . . . 22 (𝑃 ∈ (ℙ ∖ {2}) → (log‘𝑃) ∈ ℝ)
8235nnrpd 13131 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑃 ∈ ℙ → 𝑃 ∈ ℝ+)
83 1red 11280 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑃 ∈ ℙ → 1 ∈ ℝ)
8483, 48gtned 11416 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑃 ∈ ℙ → 𝑃 ≠ 1)
8582, 84jca 521 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑃 ∈ ℙ → (𝑃 ∈ ℝ+ ∧ 𝑃 ≠ 1))
86 logne0 26870 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑃 ∈ ℝ+ ∧ 𝑃 ≠ 1) → (log‘𝑃) ≠ 0)
8734, 85, 863syl 19 . . . . . . . . . . . . . . . . . . . . . 22 (𝑃 ∈ (ℙ ∖ {2}) → (log‘𝑃) ≠ 0)
8879, 81, 87redivcld 12114 . . . . . . . . . . . . . . . . . . . . 21 (𝑃 ∈ (ℙ ∖ {2}) → ((log‘3) / (log‘𝑃)) ∈ ℝ)
8988flcld 13906 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ (ℙ ∖ {2}) → (⌊‘((log‘3) / (log‘𝑃))) ∈ ℤ)
9089zred 12772 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → (⌊‘((log‘3) / (log‘𝑃))) ∈ ℝ)
91903ad2ant1 1151 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((log‘3) / (log‘𝑃))) ∈ ℝ)
92883ad2ant1 1151 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((log‘3) / (log‘𝑃)) ∈ ℝ)
93 letr 11375 . . . . . . . . . . . . . . . . . 18 ((𝑀 ∈ ℝ ∧ (⌊‘((log‘3) / (log‘𝑃))) ∈ ℝ ∧ ((log‘3) / (log‘𝑃)) ∈ ℝ) → ((𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃))) ∧ (⌊‘((log‘3) / (log‘𝑃))) ≤ ((log‘3) / (log‘𝑃))) → 𝑀 ≤ ((log‘3) / (log‘𝑃))))
9478, 91, 92, 93syl3anc 1398 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃))) ∧ (⌊‘((log‘3) / (log‘𝑃))) ≤ ((log‘3) / (log‘𝑃))) → 𝑀 ≤ ((log‘3) / (log‘𝑃))))
95 1red 11280 . . . . . . . . . . . . . . . . . . . 20 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 1 ∈ ℝ)
96 letr 11375 . . . . . . . . . . . . . . . . . . . 20 ((𝑀 ∈ ℝ ∧ ((log‘3) / (log‘𝑃)) ∈ ℝ ∧ 1 ∈ ℝ) → ((𝑀 ≤ ((log‘3) / (log‘𝑃)) ∧ ((log‘3) / (log‘𝑃)) ≤ 1) → 𝑀 ≤ 1))
9778, 92, 95, 96syl3anc 1398 . . . . . . . . . . . . . . . . . . 19 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑀 ≤ ((log‘3) / (log‘𝑃)) ∧ ((log‘3) / (log‘𝑃)) ≤ 1) → 𝑀 ≤ 1))
98 nnge1 12335 . . . . . . . . . . . . . . . . . . . . 21 (𝑀 ∈ ℕ → 1 ≤ 𝑀)
99 eqcom 2767 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑀 = 1 ↔ 1 = 𝑀)
100 1red 11280 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑀 ∈ ℕ → 1 ∈ ℝ)
101100, 77letri3d 11423 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑀 ∈ ℕ → (1 = 𝑀 ↔ (1 ≤ 𝑀 ∧ 𝑀 ≤ 1)))
10299, 101bitr2id 287 . . . . . . . . . . . . . . . . . . . . . 22 (𝑀 ∈ ℕ → ((1 ≤ 𝑀 ∧ 𝑀 ≤ 1) ↔ 𝑀 = 1))
103102biimpd 232 . . . . . . . . . . . . . . . . . . . . 21 (𝑀 ∈ ℕ → ((1 ≤ 𝑀 ∧ 𝑀 ≤ 1) → 𝑀 = 1))
10498, 103mpand 708 . . . . . . . . . . . . . . . . . . . 20 (𝑀 ∈ ℕ → (𝑀 ≤ 1 → 𝑀 = 1))
1051043ad2ant2 1152 . . . . . . . . . . . . . . . . . . 19 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑀 ≤ 1 → 𝑀 = 1))
10697, 105syld 48 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑀 ≤ ((log‘3) / (log‘𝑃)) ∧ ((log‘3) / (log‘𝑃)) ≤ 1) → 𝑀 = 1))
107106expd 421 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑀 ≤ ((log‘3) / (log‘𝑃)) → (((log‘3) / (log‘𝑃)) ≤ 1 → 𝑀 = 1)))
10894, 107syld 48 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃))) ∧ (⌊‘((log‘3) / (log‘𝑃))) ≤ ((log‘3) / (log‘𝑃))) → (((log‘3) / (log‘𝑃)) ≤ 1 → 𝑀 = 1)))
10976, 108mpan2d 707 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃))) → (((log‘3) / (log‘𝑃)) ≤ 1 → 𝑀 = 1)))
11074, 109mpid 45 . . . . . . . . . . . . . 14 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃))) → 𝑀 = 1))
11157, 110sylbid 243 . . . . . . . . . . . . 13 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑃↑𝑀) ≤ 3 → 𝑀 = 1))
11246, 111syld 48 . . . . . . . . . . . 12 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (3 = (𝑃↑𝑀) → 𝑀 = 1))
113112adantl 487 . . . . . . . . . . 11 ((𝑘 = 1 ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → (3 = (𝑃↑𝑀) → 𝑀 = 1))
11432, 113sylbid 243 . . . . . . . . . 10 ((𝑘 = 1 ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → ((((2↑𝑘)↑2) − 1) = (𝑃↑𝑀) → 𝑀 = 1))
115114ex 418 . . . . . . . . 9 (𝑘 = 1 → ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((((2↑𝑘)↑2) − 1) = (𝑃↑𝑀) → 𝑀 = 1)))
116 sq1 14306 . . . . . . . . . . . . . 14 (1↑2) = 1
117116eqcomi 2769 . . . . . . . . . . . . 13 1 = (1↑2)
118117oveq2i 7419 . . . . . . . . . . . 12 (((2↑𝑘)↑2) − 1) = (((2↑𝑘)↑2) − (1↑2))
119118eqeq1i 2765 . . . . . . . . . . 11 ((((2↑𝑘)↑2) − 1) = (𝑃↑𝑀) ↔ (((2↑𝑘)↑2) − (1↑2)) = (𝑃↑𝑀))
120 eqcom 2767 . . . . . . . . . . . 12 ((((2↑𝑘)↑2) − (1↑2)) = (𝑃↑𝑀) ↔ (𝑃↑𝑀) = (((2↑𝑘)↑2) − (1↑2)))
1219a1i 11 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (ℤ≥‘2) → 2 ∈ ℕ0)
122 eluzge2nn0 12988 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (ℤ≥‘2) → 𝑘 ∈ ℕ0)
123121, 122nn0expcld 14357 . . . . . . . . . . . . . . 15 (𝑘 ∈ (ℤ≥‘2) → (2↑𝑘) ∈ ℕ0)
124123adantr 486 . . . . . . . . . . . . . 14 ((𝑘 ∈ (ℤ≥‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → (2↑𝑘) ∈ ℕ0)
125 1nn0 12591 . . . . . . . . . . . . . . 15 1 ∈ ℕ0
126125a1i 11 . . . . . . . . . . . . . 14 ((𝑘 ∈ (ℤ≥‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → 1 ∈ ℕ0)
127 1p1e2 12435 . . . . . . . . . . . . . . . . 17 (1 + 1) = 2
12822eqcomi 2769 . . . . . . . . . . . . . . . . 17 2 = (2↑1)
129127, 128eqtri 2783 . . . . . . . . . . . . . . . 16 (1 + 1) = (2↑1)
130 eluz2gt1 13016 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ (ℤ≥‘2) → 1 < 𝑘)
131 2re 12386 . . . . . . . . . . . . . . . . . . 19 2 ∈ ℝ
132131a1i 11 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ≥‘2) → 2 ∈ ℝ)
133 1zzd 12696 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ≥‘2) → 1 ∈ ℤ)
134 eluzelz 12944 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ≥‘2) → 𝑘 ∈ ℤ)
135 1lt2 12484 . . . . . . . . . . . . . . . . . . 19 1 < 2
136135a1i 11 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ≥‘2) → 1 < 2)
137132, 133, 134, 136ltexp2d 14362 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ (ℤ≥‘2) → (1 < 𝑘 ↔ (2↑1) < (2↑𝑘)))
138130, 137mpbid 235 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (ℤ≥‘2) → (2↑1) < (2↑𝑘))
139129, 138eqbrtrid 5139 . . . . . . . . . . . . . . 15 (𝑘 ∈ (ℤ≥‘2) → (1 + 1) < (2↑𝑘))
140139adantr 486 . . . . . . . . . . . . . 14 ((𝑘 ∈ (ℤ≥‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → (1 + 1) < (2↑𝑘))
14134, 39anim12i 625 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) → (𝑃 ∈ ℙ ∧ 𝑀 ∈ ℕ0))
1421413adant3 1150 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑃 ∈ ℙ ∧ 𝑀 ∈ ℕ0))
143142adantl 487 . . . . . . . . . . . . . 14 ((𝑘 ∈ (ℤ≥‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → (𝑃 ∈ ℙ ∧ 𝑀 ∈ ℕ0))
144 difsqpwdvds 17026 . . . . . . . . . . . . . 14 ((((2↑𝑘) ∈ ℕ0 ∧ 1 ∈ ℕ0 ∧ (1 + 1) < (2↑𝑘)) ∧ (𝑃 ∈ ℙ ∧ 𝑀 ∈ ℕ0)) → ((𝑃↑𝑀) = (((2↑𝑘)↑2) − (1↑2)) → 𝑃 ∥ (2 · 1)))
145124, 126, 140, 143, 144syl31anc 1400 . . . . . . . . . . . . 13 ((𝑘 ∈ (ℤ≥‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → ((𝑃↑𝑀) = (((2↑𝑘)↑2) − (1↑2)) → 𝑃 ∥ (2 · 1)))
146 2t1e2 12474 . . . . . . . . . . . . . . . . . 18 (2 · 1) = 2
147146breq2i 5110 . . . . . . . . . . . . . . . . 17 (𝑃 ∥ (2 · 1) ↔ 𝑃 ∥ 2)
148 prmuz2 16833 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ ℙ → 𝑃 ∈ (ℤ≥‘2))
14934, 148syl 18 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ (ℤ≥‘2))
150 2prm 16829 . . . . . . . . . . . . . . . . . 18 2 ∈ ℙ
151 dvdsprm 16841 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℤ≥‘2) ∧ 2 ∈ ℙ) → (𝑃 ∥ 2 ↔ 𝑃 = 2))
152149, 150, 151sylancl 598 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∥ 2 ↔ 𝑃 = 2))
153147, 152bitrid 286 . . . . . . . . . . . . . . . 16 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∥ (2 · 1) ↔ 𝑃 = 2))
154 eldifsn 4747 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ (ℙ ∖ {2}) ↔ (𝑃 ∈ ℙ ∧ 𝑃 ≠ 2))
155 eqneqall 2966 . . . . . . . . . . . . . . . . . 18 (𝑃 = 2 → (𝑃 ≠ 2 → 𝑀 = 1))
156155com12 33 . . . . . . . . . . . . . . . . 17 (𝑃 ≠ 2 → (𝑃 = 2 → 𝑀 = 1))
157154, 156simplbiim 514 . . . . . . . . . . . . . . . 16 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 = 2 → 𝑀 = 1))
158153, 157sylbid 243 . . . . . . . . . . . . . . 15 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∥ (2 · 1) → 𝑀 = 1))
1591583ad2ant1 1151 . . . . . . . . . . . . . 14 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑃 ∥ (2 · 1) → 𝑀 = 1))
160159adantl 487 . . . . . . . . . . . . 13 ((𝑘 ∈ (ℤ≥‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → (𝑃 ∥ (2 · 1) → 𝑀 = 1))
161145, 160syld 48 . . . . . . . . . . . 12 ((𝑘 ∈ (ℤ≥‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → ((𝑃↑𝑀) = (((2↑𝑘)↑2) − (1↑2)) → 𝑀 = 1))
162120, 161biimtrid 245 . . . . . . . . . . 11 ((𝑘 ∈ (ℤ≥‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → ((((2↑𝑘)↑2) − (1↑2)) = (𝑃↑𝑀) → 𝑀 = 1))
163119, 162biimtrid 245 . . . . . . . . . 10 ((𝑘 ∈ (ℤ≥‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → ((((2↑𝑘)↑2) − 1) = (𝑃↑𝑀) → 𝑀 = 1))
164163ex 418 . . . . . . . . 9 (𝑘 ∈ (ℤ≥‘2) → ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((((2↑𝑘)↑2) − 1) = (𝑃↑𝑀) → 𝑀 = 1)))
165115, 164jaoi 871 . . . . . . . 8 ((𝑘 = 1 ∨ 𝑘 ∈ (ℤ≥‘2)) → ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((((2↑𝑘)↑2) − 1) = (𝑃↑𝑀) → 𝑀 = 1)))
16618, 165sylbi 220 . . . . . . 7 (𝑘 ∈ ℕ → ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((((2↑𝑘)↑2) − 1) = (𝑃↑𝑀) → 𝑀 = 1)))
167166impcom 413 . . . . . 6 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) → ((((2↑𝑘)↑2) − 1) = (𝑃↑𝑀) → 𝑀 = 1))
168167adantr 486 . . . . 5 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) ∧ (2 · 𝑘) = 𝑁) → ((((2↑𝑘)↑2) − 1) = (𝑃↑𝑀) → 𝑀 = 1))
16917, 168sylbid 243 . . . 4 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) ∧ (2 · 𝑘) = 𝑁) → (((2↑𝑁) − 1) = (𝑃↑𝑀) → 𝑀 = 1))
170169rexlimdva2 3165 . . 3 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (∃𝑘 ∈ ℕ (2 · 𝑘) = 𝑁 → (((2↑𝑁) − 1) = (𝑃↑𝑀) → 𝑀 = 1)))
1712, 170sylbid 243 . 2 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2 ∥ 𝑁 → (((2↑𝑁) − 1) = (𝑃↑𝑀) → 𝑀 = 1)))
1721713imp 1128 1 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 2 ∥ 𝑁 ∧ ((2↑𝑁) − 1) = (𝑃↑𝑀)) → 𝑀 = 1)
Colors of variables:    wff setvar class
This proof depends on syntax axioms:   → wi 4   ↔ wb 209   ∧ wa 401   ∨ wo 861   ∧ w3a 1103   = wceq 1570   ∈ wcel 2145   ≠ wne 2955  ∃wrex 3086   ∖ cdif 3895  {csn 4583   class class class wbr 5102  ‘cfv 6527  (class class class)co 7408  ℂcc 11169  ℝcr 11170  0cc0 11171  1c1 11172   + caddc 11174   · cmul 11176   < clt 11314   ≤ cle 11315   − cmin 11512   / cdiv 11942  ℕcn 12304  2c2 12366  3c3 12367  4c4 12368  ℕ0cn0 12575  ℤcz 12662  ℤ≥cuz 12934  ℝ+crp 13089  ⌊cfl 13898  ↑cexp 14172   ∥ cdvds 16389  ℙcprime 16808  logclog 26845
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1828  ax-4 1842  ax-5 1943  ax-6 2000  ax-7 2041  ax-8 2147  ax-9 2155  ax-10 2178  ax-11 2194  ax-12 2213  ax-ext 2732  ax-rep 5231  ax-sep 5248  ax-nul 5259  ax-pow 5326  ax-pr 5390  ax-un 7734  ax-inf2 9620  ax-cnex 11227  ax-resscn 11228  ax-1cn 11229  ax-icn 11230  ax-addcl 11231  ax-addrcl 11232  ax-mulcl 11233  ax-mulrcl 11234  ax-mulcom 11235  ax-addass 11236  ax-mulass 11237  ax-distr 11238  ax-i2m1 11239  ax-1ne0 11240  ax-1rid 11241  ax-rnegex 11242  ax-rrecex 11243  ax-cnre 11244  ax-pre-lttri 11245  ax-pre-lttrn 11246  ax-pre-ltadd 11247  ax-pre-mulgt0 11248  ax-pre-sup 11249  ax-addf 11250
This proof depends on definitions:  df-bi 210  df-an 402  df-or 862  df-3or 1104  df-3an 1105  df-tru 1573  df-fal 1583  df-ex 1813  df-nf 1817  df-sb 2100  df-mo 2564  df-eu 2594  df-clab 2739  df-cleq 2752  df-clel 2835  df-nfc 2909  df-ne 2956  df-nel 3062  df-ral 3077  df-rex 3087  df-rmo 3365  df-reu 3366  df-rab 3413  df-v 3452  df-sbc 3739  df-csb 3847  df-dif 3901  df-un 3903  df-in 3905  df-ss 3915  df-pss 3918  df-nul 4279  df-if 4482  df-pw 4558  df-sn 4584  df-pr 4586  df-tp 4588  df-op 4590  df-uni 4867  df-int 4907  df-iun 4952  df-iin 4953  df-br 5103  df-opab 5167  df-mpt 5186  df-tr 5212  df-id 5542  df-eprel 5547  df-po 5555  df-so 5556  df-fr 5600  df-se 5601  df-we 5602  df-xp 5653  df-rel 5654  df-cnv 5655  df-co 5656  df-dm 5657  df-rn 5658  df-res 5659  df-ima 5660  df-pred 6293  df-ord 6354  df-on 6355  df-lim 6356  df-suc 6357  df-iota 6483  df-fun 6529  df-fn 6530  df-f 6531  df-f1 6532  df-fo 6533  df-f1o 6534  df-fv 6535  df-isom 6536  df-riota 7365  df-ov 7411  df-oprab 7412  df-mpo 7413  df-of 7676  df-om 7861  df-1st 7984  df-2nd 7985  df-supp 8156  df-frecs 8277  df-wrecs 8308  df-recs 8357  df-rdg 8396  df-1o 8454  df-2o 8455  df-er 8695  df-map 8827  df-pm 8828  df-ixp 8904  df-en 8952  df-dom 8953  df-sdom 8954  df-fin 8955  df-fsupp 9332  df-fi 9381  df-sup 9412  df-inf 9413  df-oi 9482  df-card 9991  df-pnf 11316  df-mnf 11317  df-xr 11318  df-ltxr 11319  df-le 11320  df-sub 11514  df-neg 11515  df-div 11943  df-nn 12305  df-2 12374  df-3 12375  df-4 12376  df-5 12377  df-6 12378  df-7 12379  df-8 12380  df-9 12381  df-n0 12576  df-z 12663  df-dec 12784  df-uz 12935  df-q 13045  df-rp 13090  df-xneg 13210  df-xadd 13211  df-xmul 13212  df-ioo 13449  df-ioc 13450  df-ico 13451  df-icc 13452  df-fz 13609  df-fzo 13757  df-fl 13900  df-mod 13978  df-seq 14113  df-exp 14173  df-fac 14385  df-bc 14414  df-hash 14442  df-shft 15187  df-cj 15233  df-re 15234  df-im 15235  df-sqrt 15369  df-abs 15370  df-limsup 15605  df-clim 15622  df-rlim 15623  df-sum 15821  df-ef 16200  df-sin 16202  df-cos 16203  df-pi 16205  df-dvds 16390  df-gcd 16632  df-prm 16809  df-pc 16976  df-struct 17286  df-sets 17303  df-slot 17321  df-ndx 17333  df-base 17349  df-ress 17370  df-plusg 17402  df-mulr 17403  df-starv 17404  df-sca 17405  df-vsca 17406  df-ip 17407  df-tset 17408  df-ple 17409  df-ds 17411  df-unif 17412  df-hom 17413  df-cco 17414  df-rest 17554  df-topn 17555  df-0g 17573  df-gsum 17574  df-topgen 17575  df-pt 17576  df-prds 17579  df-xrs 17635  df-qtop 17640  df-imas 17641  df-xps 17643  df-mre 17717  df-mrc 17718  df-acs 17720  df-mgm 18777  df-sgrp 18869  df-mnd 18885  df-submnd 18940  df-mulg 19239  df-cntz 19492  df-cmn 19957  df-psmet 21631  df-xmet 21632  df-met 21633  df-bl 21634  df-mopn 21635  df-fbas 21636  df-fg 21637  df-cnfld 21640  df-top 23173  df-topon 23190  df-topsp 23212  df-bases 23225  df-cld 23298  df-ntr 23299  df-cls 23300  df-nei 23377  df-lp 23415  df-perf 23416  df-cn 23506  df-cnp 23507  df-haus 23594  df-tx 23842  df-hmeo 24035  df-fil 24126  df-fm 24218  df-flim 24219  df-flf 24220  df-xms 24600  df-ms 24601  df-tms 24602  df-cncf 25160  df-limc 26147  df-dv 26148  df-log 26847
This theorem is used by:  lighneal  48618
  Copyright terms: Public domain W3C validator