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 48060
Description: Lemma 2 for lighneal 48065. (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 16317 . . . 4 (𝑁 ∈ ℕ → (2 ∥ 𝑁 ↔ ∃𝑘 ∈ ℕ (2 · 𝑘) = 𝑁))
213ad2ant3 1136 . . 3 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2 ∥ 𝑁 ↔ ∃𝑘 ∈ ℕ (2 · 𝑘) = 𝑁))
3 oveq2 7372 . . . . . . . . 9 (𝑁 = (2 · 𝑘) → (2↑𝑁) = (2↑(2 · 𝑘)))
43eqcoms 2745 . . . . . . . 8 ((2 · 𝑘) = 𝑁 → (2↑𝑁) = (2↑(2 · 𝑘)))
5 2cnd 12256 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → 2 ∈ ℂ)
6 nncn 12179 . . . . . . . . . . . 12 (𝑘 ∈ ℕ → 𝑘 ∈ ℂ)
75, 6mulcomd 11163 . . . . . . . . . . 11 (𝑘 ∈ ℕ → (2 · 𝑘) = (𝑘 · 2))
87oveq2d 7380 . . . . . . . . . 10 (𝑘 ∈ ℕ → (2↑(2 · 𝑘)) = (2↑(𝑘 · 2)))
9 2nn0 12451 . . . . . . . . . . . 12 2 ∈ ℕ0
109a1i 11 . . . . . . . . . . 11 (𝑘 ∈ ℕ → 2 ∈ ℕ0)
11 nnnn0 12441 . . . . . . . . . . 11 (𝑘 ∈ ℕ → 𝑘 ∈ ℕ0)
125, 10, 11expmuld 14108 . . . . . . . . . 10 (𝑘 ∈ ℕ → (2↑(𝑘 · 2)) = ((2↑𝑘)↑2))
138, 12eqtrd 2772 . . . . . . . . 9 (𝑘 ∈ ℕ → (2↑(2 · 𝑘)) = ((2↑𝑘)↑2))
1413adantl 481 . . . . . . . 8 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) → (2↑(2 · 𝑘)) = ((2↑𝑘)↑2))
154, 14sylan9eqr 2794 . . . . . . 7 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) ∧ (2 · 𝑘) = 𝑁) → (2↑𝑁) = ((2↑𝑘)↑2))
1615oveq1d 7379 . . . . . 6 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) ∧ (2 · 𝑘) = 𝑁) → ((2↑𝑁) − 1) = (((2↑𝑘)↑2) − 1))
1716eqeq1d 2739 . . . . 5 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ ℕ) ∧ (2 · 𝑘) = 𝑁) → (((2↑𝑁) − 1) = (𝑃𝑀) ↔ (((2↑𝑘)↑2) − 1) = (𝑃𝑀)))
18 elnn1uz2 12872 . . . . . . . 8 (𝑘 ∈ ℕ ↔ (𝑘 = 1 ∨ 𝑘 ∈ (ℤ‘2)))
19 oveq2 7372 . . . . . . . . . . . . . . . . 17 (𝑘 = 1 → (2↑𝑘) = (2↑1))
20 2cn 12253 . . . . . . . . . . . . . . . . . 18 2 ∈ ℂ
21 exp1 14026 . . . . . . . . . . . . . . . . . 18 (2 ∈ ℂ → (2↑1) = 2)
2220, 21ax-mp 5 . . . . . . . . . . . . . . . . 17 (2↑1) = 2
2319, 22eqtrdi 2788 . . . . . . . . . . . . . . . 16 (𝑘 = 1 → (2↑𝑘) = 2)
2423oveq1d 7379 . . . . . . . . . . . . . . 15 (𝑘 = 1 → ((2↑𝑘)↑2) = (2↑2))
2524oveq1d 7379 . . . . . . . . . . . . . 14 (𝑘 = 1 → (((2↑𝑘)↑2) − 1) = ((2↑2) − 1))
26 sq2 14156 . . . . . . . . . . . . . . . 16 (2↑2) = 4
2726oveq1i 7374 . . . . . . . . . . . . . . 15 ((2↑2) − 1) = (4 − 1)
28 4m1e3 12302 . . . . . . . . . . . . . . 15 (4 − 1) = 3
2927, 28eqtri 2760 . . . . . . . . . . . . . 14 ((2↑2) − 1) = 3
3025, 29eqtrdi 2788 . . . . . . . . . . . . 13 (𝑘 = 1 → (((2↑𝑘)↑2) − 1) = 3)
3130eqeq1d 2739 . . . . . . . . . . . 12 (𝑘 = 1 → ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) ↔ 3 = (𝑃𝑀)))
3231adantr 480 . . . . . . . . . . 11 ((𝑘 = 1 ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) ↔ 3 = (𝑃𝑀)))
33 eqcom 2744 . . . . . . . . . . . . . 14 (3 = (𝑃𝑀) ↔ (𝑃𝑀) = 3)
34 eldifi 4072 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℙ)
35 prmnn 16640 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
36 nnre 12178 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ ℕ → 𝑃 ∈ ℝ)
3734, 35, 363syl 18 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℝ)
38373ad2ant1 1134 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑃 ∈ ℝ)
39 nnnn0 12441 . . . . . . . . . . . . . . . . . . 19 (𝑀 ∈ ℕ → 𝑀 ∈ ℕ0)
40393ad2ant2 1135 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑀 ∈ ℕ0)
4138, 40reexpcld 14122 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑃𝑀) ∈ ℝ)
4241adantr 480 . . . . . . . . . . . . . . . 16 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑃𝑀) = 3) → (𝑃𝑀) ∈ ℝ)
43 simpr 484 . . . . . . . . . . . . . . . 16 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑃𝑀) = 3) → (𝑃𝑀) = 3)
4442, 43eqled 11246 . . . . . . . . . . . . . . 15 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (𝑃𝑀) = 3) → (𝑃𝑀) ≤ 3)
4544ex 412 . . . . . . . . . . . . . 14 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑃𝑀) = 3 → (𝑃𝑀) ≤ 3))
4633, 45biimtrid 242 . . . . . . . . . . . . 13 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (3 = (𝑃𝑀) → (𝑃𝑀) ≤ 3))
4735nnred 12186 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ ℙ → 𝑃 ∈ ℝ)
48 prmgt1 16664 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ ℙ → 1 < 𝑃)
4947, 48jca 511 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ ℙ → (𝑃 ∈ ℝ ∧ 1 < 𝑃))
5034, 49syl 17 . . . . . . . . . . . . . . . 16 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∈ ℝ ∧ 1 < 𝑃))
51503ad2ant1 1134 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑃 ∈ ℝ ∧ 1 < 𝑃))
52 nnz 12542 . . . . . . . . . . . . . . . 16 (𝑀 ∈ ℕ → 𝑀 ∈ ℤ)
53523ad2ant2 1135 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑀 ∈ ℤ)
54 3rp 12945 . . . . . . . . . . . . . . . 16 3 ∈ ℝ+
5554a1i 11 . . . . . . . . . . . . . . 15 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 3 ∈ ℝ+)
56 efexple 27241 . . . . . . . . . . . . . . 15 (((𝑃 ∈ ℝ ∧ 1 < 𝑃) ∧ 𝑀 ∈ ℤ ∧ 3 ∈ ℝ+) → ((𝑃𝑀) ≤ 3 ↔ 𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃)))))
5751, 53, 55, 56syl3anc 1374 . . . . . . . . . . . . . 14 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑃𝑀) ≤ 3 ↔ 𝑀 ≤ (⌊‘((log‘3) / (log‘𝑃)))))
58 oddprmge3 16667 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ (ℤ‘3))
59 eluzle 12798 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℤ‘3) → 3 ≤ 𝑃)
6058, 59syl 17 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ (ℙ ∖ {2}) → 3 ≤ 𝑃)
6154a1i 11 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → 3 ∈ ℝ+)
62 nnrp 12951 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ ℕ → 𝑃 ∈ ℝ+)
6334, 35, 623syl 18 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℝ+)
6461, 63logled 26588 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ (ℙ ∖ {2}) → (3 ≤ 𝑃 ↔ (log‘3) ≤ (log‘𝑃)))
6560, 64mpbid 232 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ (ℙ ∖ {2}) → (log‘3) ≤ (log‘𝑃))
66653ad2ant1 1134 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (log‘3) ≤ (log‘𝑃))
67 relogcl 26536 . . . . . . . . . . . . . . . . . 18 (3 ∈ ℝ+ → (log‘3) ∈ ℝ)
6854, 67ax-mp 5 . . . . . . . . . . . . . . . . 17 (log‘3) ∈ ℝ
69 rplogcl 26565 . . . . . . . . . . . . . . . . . . 19 ((𝑃 ∈ ℝ ∧ 1 < 𝑃) → (log‘𝑃) ∈ ℝ+)
7034, 49, 693syl 18 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ (ℙ ∖ {2}) → (log‘𝑃) ∈ ℝ+)
71703ad2ant1 1134 . . . . . . . . . . . . . . . . 17 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (log‘𝑃) ∈ ℝ+)
72 divle1le 13011 . . . . . . . . . . . . . . . . 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 13787 . . . . . . . . . . . . . . . . 17 (((log‘3) ∈ ℝ ∧ (log‘𝑃) ∈ ℝ+) → (⌊‘((log‘3) / (log‘𝑃))) ≤ ((log‘3) / (log‘𝑃)))
7668, 71, 75sylancr 588 . . . . . . . . . . . . . . . 16 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((log‘3) / (log‘𝑃))) ≤ ((log‘3) / (log‘𝑃)))
77 nnre 12178 . . . . . . . . . . . . . . . . . . 19 (𝑀 ∈ ℕ → 𝑀 ∈ ℝ)
78773ad2ant2 1135 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑀 ∈ ℝ)
7968a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 (𝑃 ∈ (ℙ ∖ {2}) → (log‘3) ∈ ℝ)
8062relogcld 26584 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑃 ∈ ℕ → (log‘𝑃) ∈ ℝ)
8134, 35, 803syl 18 . . . . . . . . . . . . . . . . . . . . . 22 (𝑃 ∈ (ℙ ∖ {2}) → (log‘𝑃) ∈ ℝ)
8235nnrpd 12981 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑃 ∈ ℙ → 𝑃 ∈ ℝ+)
83 1red 11142 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑃 ∈ ℙ → 1 ∈ ℝ)
8483, 48gtned 11278 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑃 ∈ ℙ → 𝑃 ≠ 1)
8582, 84jca 511 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑃 ∈ ℙ → (𝑃 ∈ ℝ+𝑃 ≠ 1))
86 logne0 26540 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑃 ∈ ℝ+𝑃 ≠ 1) → (log‘𝑃) ≠ 0)
8734, 85, 863syl 18 . . . . . . . . . . . . . . . . . . . . . 22 (𝑃 ∈ (ℙ ∖ {2}) → (log‘𝑃) ≠ 0)
8879, 81, 87redivcld 11980 . . . . . . . . . . . . . . . . . . . . 21 (𝑃 ∈ (ℙ ∖ {2}) → ((log‘3) / (log‘𝑃)) ∈ ℝ)
8988flcld 13754 . . . . . . . . . . . . . . . . . . . 20 (𝑃 ∈ (ℙ ∖ {2}) → (⌊‘((log‘3) / (log‘𝑃))) ∈ ℤ)
9089zred 12630 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ (ℙ ∖ {2}) → (⌊‘((log‘3) / (log‘𝑃))) ∈ ℝ)
91903ad2ant1 1134 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (⌊‘((log‘3) / (log‘𝑃))) ∈ ℝ)
92883ad2ant1 1134 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((log‘3) / (log‘𝑃)) ∈ ℝ)
93 letr 11237 . . . . . . . . . . . . . . . . . 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 11142 . . . . . . . . . . . . . . . . . . . 20 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 1 ∈ ℝ)
96 letr 11237 . . . . . . . . . . . . . . . . . . . 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 12202 . . . . . . . . . . . . . . . . . . . . 21 (𝑀 ∈ ℕ → 1 ≤ 𝑀)
99 eqcom 2744 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑀 = 1 ↔ 1 = 𝑀)
100 1red 11142 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑀 ∈ ℕ → 1 ∈ ℝ)
101100, 77letri3d 11285 . . . . . . . . . . . . . . . . . . . . . . 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 14154 . . . . . . . . . . . . . 14 (1↑2) = 1
117116eqcomi 2746 . . . . . . . . . . . . 13 1 = (1↑2)
118117oveq2i 7375 . . . . . . . . . . . 12 (((2↑𝑘)↑2) − 1) = (((2↑𝑘)↑2) − (1↑2))
119118eqeq1i 2742 . . . . . . . . . . 11 ((((2↑𝑘)↑2) − 1) = (𝑃𝑀) ↔ (((2↑𝑘)↑2) − (1↑2)) = (𝑃𝑀))
120 eqcom 2744 . . . . . . . . . . . 12 ((((2↑𝑘)↑2) − (1↑2)) = (𝑃𝑀) ↔ (𝑃𝑀) = (((2↑𝑘)↑2) − (1↑2)))
1219a1i 11 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (ℤ‘2) → 2 ∈ ℕ0)
122 eluzge2nn0 12839 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (ℤ‘2) → 𝑘 ∈ ℕ0)
123121, 122nn0expcld 14205 . . . . . . . . . . . . . . 15 (𝑘 ∈ (ℤ‘2) → (2↑𝑘) ∈ ℕ0)
124123adantr 480 . . . . . . . . . . . . . 14 ((𝑘 ∈ (ℤ‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → (2↑𝑘) ∈ ℕ0)
125 1nn0 12450 . . . . . . . . . . . . . . 15 1 ∈ ℕ0
126125a1i 11 . . . . . . . . . . . . . 14 ((𝑘 ∈ (ℤ‘2) ∧ (𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ)) → 1 ∈ ℕ0)
127 1p1e2 12298 . . . . . . . . . . . . . . . . 17 (1 + 1) = 2
12822eqcomi 2746 . . . . . . . . . . . . . . . . 17 2 = (2↑1)
129127, 128eqtri 2760 . . . . . . . . . . . . . . . 16 (1 + 1) = (2↑1)
130 eluz2gt1 12867 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ (ℤ‘2) → 1 < 𝑘)
131 2re 12252 . . . . . . . . . . . . . . . . . . 19 2 ∈ ℝ
132131a1i 11 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ‘2) → 2 ∈ ℝ)
133 1zzd 12555 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ‘2) → 1 ∈ ℤ)
134 eluzelz 12795 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ‘2) → 𝑘 ∈ ℤ)
135 1lt2 12344 . . . . . . . . . . . . . . . . . . 19 1 < 2
136135a1i 11 . . . . . . . . . . . . . . . . . 18 (𝑘 ∈ (ℤ‘2) → 1 < 2)
137132, 133, 134, 136ltexp2d 14210 . . . . . . . . . . . . . . . . 17 (𝑘 ∈ (ℤ‘2) → (1 < 𝑘 ↔ (2↑1) < (2↑𝑘)))
138130, 137mpbid 232 . . . . . . . . . . . . . . . 16 (𝑘 ∈ (ℤ‘2) → (2↑1) < (2↑𝑘))
139129, 138eqbrtrid 5121 . . . . . . . . . . . . . . 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 16855 . . . . . . . . . . . . . 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 12336 . . . . . . . . . . . . . . . . . 18 (2 · 1) = 2
147146breq2i 5094 . . . . . . . . . . . . . . . . 17 (𝑃 ∥ (2 · 1) ↔ 𝑃 ∥ 2)
148 prmuz2 16662 . . . . . . . . . . . . . . . . . . 19 (𝑃 ∈ ℙ → 𝑃 ∈ (ℤ‘2))
14934, 148syl 17 . . . . . . . . . . . . . . . . . 18 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ (ℤ‘2))
150 2prm 16658 . . . . . . . . . . . . . . . . . 18 2 ∈ ℙ
151 dvdsprm 16670 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ (ℤ‘2) ∧ 2 ∈ ℙ) → (𝑃 ∥ 2 ↔ 𝑃 = 2))
152149, 150, 151sylancl 587 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∥ 2 ↔ 𝑃 = 2))
153147, 152bitrid 283 . . . . . . . . . . . . . . . 16 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∥ (2 · 1) ↔ 𝑃 = 2))
154 eldifsn 4732 . . . . . . . . . . . . . . . . 17 (𝑃 ∈ (ℙ ∖ {2}) ↔ (𝑃 ∈ ℙ ∧ 𝑃 ≠ 2))
155 eqneqall 2944 . . . . . . . . . . . . . . . . . 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 3141 . . 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 2933  wrex 3062  cdif 3887  {csn 4568   class class class wbr 5086  cfv 6496  (class class class)co 7364  cc 11033  cr 11034  0cc0 11035  1c1 11036   + caddc 11038   · cmul 11040   < clt 11176  cle 11177  cmin 11374   / cdiv 11804  cn 12171  2c2 12233  3c3 12234  4c4 12235  0cn0 12434  cz 12521  cuz 12785  +crp 12939  cfl 13746  cexp 14020  cdvds 16218  cprime 16637  logclog 26515
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 2185  ax-ext 2709  ax-rep 5213  ax-sep 5232  ax-nul 5242  ax-pow 5306  ax-pr 5374  ax-un 7686  ax-inf2 9559  ax-cnex 11091  ax-resscn 11092  ax-1cn 11093  ax-icn 11094  ax-addcl 11095  ax-addrcl 11096  ax-mulcl 11097  ax-mulrcl 11098  ax-mulcom 11099  ax-addass 11100  ax-mulass 11101  ax-distr 11102  ax-i2m1 11103  ax-1ne0 11104  ax-1rid 11105  ax-rnegex 11106  ax-rrecex 11107  ax-cnre 11108  ax-pre-lttri 11109  ax-pre-lttrn 11110  ax-pre-ltadd 11111  ax-pre-mulgt0 11112  ax-pre-sup 11113  ax-addf 11114
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 2540  df-eu 2570  df-clab 2716  df-cleq 2729  df-clel 2812  df-nfc 2886  df-ne 2934  df-nel 3038  df-ral 3053  df-rex 3063  df-rmo 3343  df-reu 3344  df-rab 3391  df-v 3432  df-sbc 3730  df-csb 3839  df-dif 3893  df-un 3895  df-in 3897  df-ss 3907  df-pss 3910  df-nul 4275  df-if 4468  df-pw 4544  df-sn 4569  df-pr 4571  df-tp 4573  df-op 4575  df-uni 4852  df-int 4891  df-iun 4936  df-iin 4937  df-br 5087  df-opab 5149  df-mpt 5168  df-tr 5194  df-id 5523  df-eprel 5528  df-po 5536  df-so 5537  df-fr 5581  df-se 5582  df-we 5583  df-xp 5634  df-rel 5635  df-cnv 5636  df-co 5637  df-dm 5638  df-rn 5639  df-res 5640  df-ima 5641  df-pred 6263  df-ord 6324  df-on 6325  df-lim 6326  df-suc 6327  df-iota 6452  df-fun 6498  df-fn 6499  df-f 6500  df-f1 6501  df-fo 6502  df-f1o 6503  df-fv 6504  df-isom 6505  df-riota 7321  df-ov 7367  df-oprab 7368  df-mpo 7369  df-of 7628  df-om 7815  df-1st 7939  df-2nd 7940  df-supp 8108  df-frecs 8228  df-wrecs 8259  df-recs 8308  df-rdg 8346  df-1o 8402  df-2o 8403  df-er 8640  df-map 8772  df-pm 8773  df-ixp 8843  df-en 8891  df-dom 8892  df-sdom 8893  df-fin 8894  df-fsupp 9272  df-fi 9321  df-sup 9352  df-inf 9353  df-oi 9422  df-card 9860  df-pnf 11178  df-mnf 11179  df-xr 11180  df-ltxr 11181  df-le 11182  df-sub 11376  df-neg 11377  df-div 11805  df-nn 12172  df-2 12241  df-3 12242  df-4 12243  df-5 12244  df-6 12245  df-7 12246  df-8 12247  df-9 12248  df-n0 12435  df-z 12522  df-dec 12642  df-uz 12786  df-q 12896  df-rp 12940  df-xneg 13060  df-xadd 13061  df-xmul 13062  df-ioo 13299  df-ioc 13300  df-ico 13301  df-icc 13302  df-fz 13459  df-fzo 13606  df-fl 13748  df-mod 13826  df-seq 13961  df-exp 14021  df-fac 14233  df-bc 14262  df-hash 14290  df-shft 15026  df-cj 15058  df-re 15059  df-im 15060  df-sqrt 15194  df-abs 15195  df-limsup 15430  df-clim 15447  df-rlim 15448  df-sum 15646  df-ef 16029  df-sin 16031  df-cos 16032  df-pi 16034  df-dvds 16219  df-gcd 16461  df-prm 16638  df-pc 16805  df-struct 17114  df-sets 17131  df-slot 17149  df-ndx 17161  df-base 17177  df-ress 17198  df-plusg 17230  df-mulr 17231  df-starv 17232  df-sca 17233  df-vsca 17234  df-ip 17235  df-tset 17236  df-ple 17237  df-ds 17239  df-unif 17240  df-hom 17241  df-cco 17242  df-rest 17382  df-topn 17383  df-0g 17401  df-gsum 17402  df-topgen 17403  df-pt 17404  df-prds 17407  df-xrs 17463  df-qtop 17468  df-imas 17469  df-xps 17471  df-mre 17545  df-mrc 17546  df-acs 17548  df-mgm 18605  df-sgrp 18684  df-mnd 18700  df-submnd 18749  df-mulg 19041  df-cntz 19289  df-cmn 19754  df-psmet 21341  df-xmet 21342  df-met 21343  df-bl 21344  df-mopn 21345  df-fbas 21346  df-fg 21347  df-cnfld 21350  df-top 22856  df-topon 22873  df-topsp 22895  df-bases 22908  df-cld 22981  df-ntr 22982  df-cls 22983  df-nei 23060  df-lp 23098  df-perf 23099  df-cn 23189  df-cnp 23190  df-haus 23277  df-tx 23524  df-hmeo 23717  df-fil 23808  df-fm 23900  df-flim 23901  df-flf 23902  df-xms 24282  df-ms 24283  df-tms 24284  df-cncf 24842  df-limc 25830  df-dv 25831  df-log 26517
This theorem is referenced by:  lighneal  48065
  Copyright terms: Public domain W3C validator