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

Theorem lighneallem3 40062
Description: Lemma 3 for lighneal 40066. (Contributed by AV, 11-Aug-2021.)
Assertion
Ref Expression
lighneallem3 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (¬ 2 ∥ 𝑁 ∧ 2 ∥ 𝑀) ∧ ((2↑𝑁) − 1) = (𝑃𝑀)) → 𝑀 = 1)

Proof of Theorem lighneallem3
Dummy variables 𝑘 𝑗 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 oveq2 6557 . . . . . . . . . . . . 13 (𝑁 = 1 → (2↑𝑁) = (2↑1))
2 2cn 10968 . . . . . . . . . . . . . 14 2 ∈ ℂ
3 exp1 12728 . . . . . . . . . . . . . 14 (2 ∈ ℂ → (2↑1) = 2)
42, 3ax-mp 5 . . . . . . . . . . . . 13 (2↑1) = 2
51, 4syl6eq 2660 . . . . . . . . . . . 12 (𝑁 = 1 → (2↑𝑁) = 2)
65oveq1d 6564 . . . . . . . . . . 11 (𝑁 = 1 → ((2↑𝑁) − 1) = (2 − 1))
7 2m1e1 11012 . . . . . . . . . . 11 (2 − 1) = 1
86, 7syl6eq 2660 . . . . . . . . . 10 (𝑁 = 1 → ((2↑𝑁) − 1) = 1)
98adantl 481 . . . . . . . . 9 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) ∧ 𝑁 = 1) → ((2↑𝑁) − 1) = 1)
109eqeq1d 2612 . . . . . . . 8 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) ∧ 𝑁 = 1) → (((2↑𝑁) − 1) = (𝑃𝑀) ↔ 1 = (𝑃𝑀)))
11 eldifi 3694 . . . . . . . . . . . . 13 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℙ)
12 prmnn 15226 . . . . . . . . . . . . 13 (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
13 nnnn0 11176 . . . . . . . . . . . . 13 (𝑃 ∈ ℕ → 𝑃 ∈ ℕ0)
1411, 12, 133syl 18 . . . . . . . . . . . 12 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℕ0)
1514nn0zd 11356 . . . . . . . . . . 11 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℤ)
16 iddvdsexp 14843 . . . . . . . . . . 11 ((𝑃 ∈ ℤ ∧ 𝑀 ∈ ℕ) → 𝑃 ∥ (𝑃𝑀))
1715, 16sylan 487 . . . . . . . . . 10 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) → 𝑃 ∥ (𝑃𝑀))
18 breq2 4587 . . . . . . . . . . . . 13 (1 = (𝑃𝑀) → (𝑃 ∥ 1 ↔ 𝑃 ∥ (𝑃𝑀)))
1918adantl 481 . . . . . . . . . . . 12 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) ∧ 1 = (𝑃𝑀)) → (𝑃 ∥ 1 ↔ 𝑃 ∥ (𝑃𝑀)))
20 dvds1 14879 . . . . . . . . . . . . . . 15 (𝑃 ∈ ℕ0 → (𝑃 ∥ 1 ↔ 𝑃 = 1))
2114, 20syl 17 . . . . . . . . . . . . . 14 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∥ 1 ↔ 𝑃 = 1))
22 eleq1 2676 . . . . . . . . . . . . . . . 16 (𝑃 = 1 → (𝑃 ∈ ℙ ↔ 1 ∈ ℙ))
23 1nprm 15230 . . . . . . . . . . . . . . . . 17 ¬ 1 ∈ ℙ
2423pm2.21i 115 . . . . . . . . . . . . . . . 16 (1 ∈ ℙ → 𝑀 = 1)
2522, 24syl6bi 242 . . . . . . . . . . . . . . 15 (𝑃 = 1 → (𝑃 ∈ ℙ → 𝑀 = 1))
2611, 25syl5com 31 . . . . . . . . . . . . . 14 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 = 1 → 𝑀 = 1))
2721, 26sylbid 229 . . . . . . . . . . . . 13 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃 ∥ 1 → 𝑀 = 1))
2827ad2antrr 758 . . . . . . . . . . . 12 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) ∧ 1 = (𝑃𝑀)) → (𝑃 ∥ 1 → 𝑀 = 1))
2919, 28sylbird 249 . . . . . . . . . . 11 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) ∧ 1 = (𝑃𝑀)) → (𝑃 ∥ (𝑃𝑀) → 𝑀 = 1))
3029ex 449 . . . . . . . . . 10 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) → (1 = (𝑃𝑀) → (𝑃 ∥ (𝑃𝑀) → 𝑀 = 1)))
3117, 30mpid 43 . . . . . . . . 9 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) → (1 = (𝑃𝑀) → 𝑀 = 1))
3231adantr 480 . . . . . . . 8 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) ∧ 𝑁 = 1) → (1 = (𝑃𝑀) → 𝑀 = 1))
3310, 32sylbid 229 . . . . . . 7 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) ∧ 𝑁 = 1) → (((2↑𝑁) − 1) = (𝑃𝑀) → 𝑀 = 1))
3433ex 449 . . . . . 6 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) → (𝑁 = 1 → (((2↑𝑁) − 1) = (𝑃𝑀) → 𝑀 = 1)))
3534com23 84 . . . . 5 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) → (((2↑𝑁) − 1) = (𝑃𝑀) → (𝑁 = 1 → 𝑀 = 1)))
3635a1d 25 . . . 4 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) → ((¬ 2 ∥ 𝑁 ∧ 2 ∥ 𝑀) → (((2↑𝑁) − 1) = (𝑃𝑀) → (𝑁 = 1 → 𝑀 = 1))))
37363adant3 1074 . . 3 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((¬ 2 ∥ 𝑁 ∧ 2 ∥ 𝑀) → (((2↑𝑁) − 1) = (𝑃𝑀) → (𝑁 = 1 → 𝑀 = 1))))
38373imp 1249 . 2 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (¬ 2 ∥ 𝑁 ∧ 2 ∥ 𝑀) ∧ ((2↑𝑁) − 1) = (𝑃𝑀)) → (𝑁 = 1 → 𝑀 = 1))
39 neqne 2790 . . . . . . . . . . . 12 𝑁 = 1 → 𝑁 ≠ 1)
4039anim2i 591 . . . . . . . . . . 11 ((𝑁 ∈ ℕ ∧ ¬ 𝑁 = 1) → (𝑁 ∈ ℕ ∧ 𝑁 ≠ 1))
41 eluz2b3 11638 . . . . . . . . . . 11 (𝑁 ∈ (ℤ‘2) ↔ (𝑁 ∈ ℕ ∧ 𝑁 ≠ 1))
4240, 41sylibr 223 . . . . . . . . . 10 ((𝑁 ∈ ℕ ∧ ¬ 𝑁 = 1) → 𝑁 ∈ (ℤ‘2))
43 oddge22np1 14911 . . . . . . . . . 10 (𝑁 ∈ (ℤ‘2) → (¬ 2 ∥ 𝑁 ↔ ∃𝑗 ∈ ℕ ((2 · 𝑗) + 1) = 𝑁))
4442, 43syl 17 . . . . . . . . 9 ((𝑁 ∈ ℕ ∧ ¬ 𝑁 = 1) → (¬ 2 ∥ 𝑁 ↔ ∃𝑗 ∈ ℕ ((2 · 𝑗) + 1) = 𝑁))
45443ad2antl3 1218 . . . . . . . 8 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ ¬ 𝑁 = 1) → (¬ 2 ∥ 𝑁 ↔ ∃𝑗 ∈ ℕ ((2 · 𝑗) + 1) = 𝑁))
46 oveq2 6557 . . . . . . . . . . . . . . . . . 18 (𝑁 = ((2 · 𝑗) + 1) → (2↑𝑁) = (2↑((2 · 𝑗) + 1)))
4746oveq1d 6564 . . . . . . . . . . . . . . . . 17 (𝑁 = ((2 · 𝑗) + 1) → ((2↑𝑁) − 1) = ((2↑((2 · 𝑗) + 1)) − 1))
4847eqcoms 2618 . . . . . . . . . . . . . . . 16 (((2 · 𝑗) + 1) = 𝑁 → ((2↑𝑁) − 1) = ((2↑((2 · 𝑗) + 1)) − 1))
492a1i 11 . . . . . . . . . . . . . . . . . . . . 21 (𝑗 ∈ ℕ → 2 ∈ ℂ)
50 2nn0 11186 . . . . . . . . . . . . . . . . . . . . . . 23 2 ∈ ℕ0
5150a1i 11 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 ∈ ℕ → 2 ∈ ℕ0)
52 nnnn0 11176 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 ∈ ℕ → 𝑗 ∈ ℕ0)
5351, 52nn0mulcld 11233 . . . . . . . . . . . . . . . . . . . . 21 (𝑗 ∈ ℕ → (2 · 𝑗) ∈ ℕ0)
5449, 53expp1d 12871 . . . . . . . . . . . . . . . . . . . 20 (𝑗 ∈ ℕ → (2↑((2 · 𝑗) + 1)) = ((2↑(2 · 𝑗)) · 2))
5551, 53nn0expcld 12893 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 ∈ ℕ → (2↑(2 · 𝑗)) ∈ ℕ0)
5655nn0cnd 11230 . . . . . . . . . . . . . . . . . . . . 21 (𝑗 ∈ ℕ → (2↑(2 · 𝑗)) ∈ ℂ)
5756, 49mulcomd 9940 . . . . . . . . . . . . . . . . . . . 20 (𝑗 ∈ ℕ → ((2↑(2 · 𝑗)) · 2) = (2 · (2↑(2 · 𝑗))))
5854, 57eqtrd 2644 . . . . . . . . . . . . . . . . . . 19 (𝑗 ∈ ℕ → (2↑((2 · 𝑗) + 1)) = (2 · (2↑(2 · 𝑗))))
5958oveq1d 6564 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ ℕ → ((2↑((2 · 𝑗) + 1)) − 1) = ((2 · (2↑(2 · 𝑗))) − 1))
60 npcan1 10334 . . . . . . . . . . . . . . . . . . . . . . 23 ((2↑(2 · 𝑗)) ∈ ℂ → (((2↑(2 · 𝑗)) − 1) + 1) = (2↑(2 · 𝑗)))
6156, 60syl 17 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 ∈ ℕ → (((2↑(2 · 𝑗)) − 1) + 1) = (2↑(2 · 𝑗)))
6261eqcomd 2616 . . . . . . . . . . . . . . . . . . . . 21 (𝑗 ∈ ℕ → (2↑(2 · 𝑗)) = (((2↑(2 · 𝑗)) − 1) + 1))
6362oveq2d 6565 . . . . . . . . . . . . . . . . . . . 20 (𝑗 ∈ ℕ → (2 · (2↑(2 · 𝑗))) = (2 · (((2↑(2 · 𝑗)) − 1) + 1)))
64 peano2cnm 10226 . . . . . . . . . . . . . . . . . . . . . 22 ((2↑(2 · 𝑗)) ∈ ℂ → ((2↑(2 · 𝑗)) − 1) ∈ ℂ)
6556, 64syl 17 . . . . . . . . . . . . . . . . . . . . 21 (𝑗 ∈ ℕ → ((2↑(2 · 𝑗)) − 1) ∈ ℂ)
66 1cnd 9935 . . . . . . . . . . . . . . . . . . . . 21 (𝑗 ∈ ℕ → 1 ∈ ℂ)
6749, 65, 66adddid 9943 . . . . . . . . . . . . . . . . . . . 20 (𝑗 ∈ ℕ → (2 · (((2↑(2 · 𝑗)) − 1) + 1)) = ((2 · ((2↑(2 · 𝑗)) − 1)) + (2 · 1)))
6863, 67eqtrd 2644 . . . . . . . . . . . . . . . . . . 19 (𝑗 ∈ ℕ → (2 · (2↑(2 · 𝑗))) = ((2 · ((2↑(2 · 𝑗)) − 1)) + (2 · 1)))
6968oveq1d 6564 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ ℕ → ((2 · (2↑(2 · 𝑗))) − 1) = (((2 · ((2↑(2 · 𝑗)) − 1)) + (2 · 1)) − 1))
7049, 65mulcld 9939 . . . . . . . . . . . . . . . . . . . 20 (𝑗 ∈ ℕ → (2 · ((2↑(2 · 𝑗)) − 1)) ∈ ℂ)
71 ax-1cn 9873 . . . . . . . . . . . . . . . . . . . . . 22 1 ∈ ℂ
722, 71mulcli 9924 . . . . . . . . . . . . . . . . . . . . 21 (2 · 1) ∈ ℂ
7372a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑗 ∈ ℕ → (2 · 1) ∈ ℂ)
7470, 73, 66addsubassd 10291 . . . . . . . . . . . . . . . . . . 19 (𝑗 ∈ ℕ → (((2 · ((2↑(2 · 𝑗)) − 1)) + (2 · 1)) − 1) = ((2 · ((2↑(2 · 𝑗)) − 1)) + ((2 · 1) − 1)))
75 2t1e2 11053 . . . . . . . . . . . . . . . . . . . . . . 23 (2 · 1) = 2
7675oveq1i 6559 . . . . . . . . . . . . . . . . . . . . . 22 ((2 · 1) − 1) = (2 − 1)
7776, 7eqtri 2632 . . . . . . . . . . . . . . . . . . . . 21 ((2 · 1) − 1) = 1
7877a1i 11 . . . . . . . . . . . . . . . . . . . 20 (𝑗 ∈ ℕ → ((2 · 1) − 1) = 1)
7978oveq2d 6565 . . . . . . . . . . . . . . . . . . 19 (𝑗 ∈ ℕ → ((2 · ((2↑(2 · 𝑗)) − 1)) + ((2 · 1) − 1)) = ((2 · ((2↑(2 · 𝑗)) − 1)) + 1))
8074, 79eqtrd 2644 . . . . . . . . . . . . . . . . . 18 (𝑗 ∈ ℕ → (((2 · ((2↑(2 · 𝑗)) − 1)) + (2 · 1)) − 1) = ((2 · ((2↑(2 · 𝑗)) − 1)) + 1))
8159, 69, 803eqtrd 2648 . . . . . . . . . . . . . . . . 17 (𝑗 ∈ ℕ → ((2↑((2 · 𝑗) + 1)) − 1) = ((2 · ((2↑(2 · 𝑗)) − 1)) + 1))
8281ad2antlr 759 . . . . . . . . . . . . . . . 16 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → ((2↑((2 · 𝑗) + 1)) − 1) = ((2 · ((2↑(2 · 𝑗)) − 1)) + 1))
8348, 82sylan9eqr 2666 . . . . . . . . . . . . . . 15 (((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) ∧ ((2 · 𝑗) + 1) = 𝑁) → ((2↑𝑁) − 1) = ((2 · ((2↑(2 · 𝑗)) − 1)) + 1))
8483eqeq1d 2612 . . . . . . . . . . . . . 14 (((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) ∧ ((2 · 𝑗) + 1) = 𝑁) → (((2↑𝑁) − 1) = (𝑃𝑀) ↔ ((2 · ((2↑(2 · 𝑗)) − 1)) + 1) = (𝑃𝑀)))
85143ad2ant1 1075 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑃 ∈ ℕ0)
86 nnnn0 11176 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑀 ∈ ℕ → 𝑀 ∈ ℕ0)
87863ad2ant2 1076 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑀 ∈ ℕ0)
8885, 87nn0expcld 12893 . . . . . . . . . . . . . . . . . . . . 21 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑃𝑀) ∈ ℕ0)
8988nn0cnd 11230 . . . . . . . . . . . . . . . . . . . 20 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑃𝑀) ∈ ℂ)
9089adantr 480 . . . . . . . . . . . . . . . . . . 19 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) → (𝑃𝑀) ∈ ℂ)
91 1cnd 9935 . . . . . . . . . . . . . . . . . . 19 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) → 1 ∈ ℂ)
9270adantl 481 . . . . . . . . . . . . . . . . . . 19 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) → (2 · ((2↑(2 · 𝑗)) − 1)) ∈ ℂ)
9390, 91, 923jca 1235 . . . . . . . . . . . . . . . . . 18 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) → ((𝑃𝑀) ∈ ℂ ∧ 1 ∈ ℂ ∧ (2 · ((2↑(2 · 𝑗)) − 1)) ∈ ℂ))
9493adantr 480 . . . . . . . . . . . . . . . . 17 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → ((𝑃𝑀) ∈ ℂ ∧ 1 ∈ ℂ ∧ (2 · ((2↑(2 · 𝑗)) − 1)) ∈ ℂ))
95 subadd2 10164 . . . . . . . . . . . . . . . . 17 (((𝑃𝑀) ∈ ℂ ∧ 1 ∈ ℂ ∧ (2 · ((2↑(2 · 𝑗)) − 1)) ∈ ℂ) → (((𝑃𝑀) − 1) = (2 · ((2↑(2 · 𝑗)) − 1)) ↔ ((2 · ((2↑(2 · 𝑗)) − 1)) + 1) = (𝑃𝑀)))
9694, 95syl 17 . . . . . . . . . . . . . . . 16 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → (((𝑃𝑀) − 1) = (2 · ((2↑(2 · 𝑗)) − 1)) ↔ ((2 · ((2↑(2 · 𝑗)) − 1)) + 1) = (𝑃𝑀)))
97 nncn 10905 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑃 ∈ ℕ → 𝑃 ∈ ℂ)
9811, 12, 973syl 18 . . . . . . . . . . . . . . . . . . . . . 22 (𝑃 ∈ (ℙ ∖ {2}) → 𝑃 ∈ ℂ)
99983ad2ant1 1075 . . . . . . . . . . . . . . . . . . . . 21 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑃 ∈ ℂ)
10099, 87pwm1geoser 14439 . . . . . . . . . . . . . . . . . . . 20 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((𝑃𝑀) − 1) = ((𝑃 − 1) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)))
101100adantr 480 . . . . . . . . . . . . . . . . . . 19 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) → ((𝑃𝑀) − 1) = ((𝑃 − 1) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)))
102101eqeq1d 2612 . . . . . . . . . . . . . . . . . 18 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) → (((𝑃𝑀) − 1) = (2 · ((2↑(2 · 𝑗)) − 1)) ↔ ((𝑃 − 1) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) = (2 · ((2↑(2 · 𝑗)) − 1))))
103102adantr 480 . . . . . . . . . . . . . . . . 17 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → (((𝑃𝑀) − 1) = (2 · ((2↑(2 · 𝑗)) − 1)) ↔ ((𝑃 − 1) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) = (2 · ((2↑(2 · 𝑗)) − 1))))
10499ad2antrr 758 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → 𝑃 ∈ ℂ)
105 1cnd 9935 . . . . . . . . . . . . . . . . . . . . 21 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → 1 ∈ ℂ)
106104, 105subcld 10271 . . . . . . . . . . . . . . . . . . . 20 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → (𝑃 − 1) ∈ ℂ)
107 fzfid 12634 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (0...(𝑀 − 1)) ∈ Fin)
10885adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ (0...(𝑀 − 1))) → 𝑃 ∈ ℕ0)
109 elfznn0 12302 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑘 ∈ (0...(𝑀 − 1)) → 𝑘 ∈ ℕ0)
110109adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ (0...(𝑀 − 1))) → 𝑘 ∈ ℕ0)
111108, 110nn0expcld 12893 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ (0...(𝑀 − 1))) → (𝑃𝑘) ∈ ℕ0)
112111nn0zd 11356 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑘 ∈ (0...(𝑀 − 1))) → (𝑃𝑘) ∈ ℤ)
113107, 112fsumzcl 14313 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘) ∈ ℤ)
114113zcnd 11359 . . . . . . . . . . . . . . . . . . . . 21 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘) ∈ ℂ)
115114ad2antrr 758 . . . . . . . . . . . . . . . . . . . 20 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘) ∈ ℂ)
116106, 115mulcld 9939 . . . . . . . . . . . . . . . . . . 19 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → ((𝑃 − 1) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) ∈ ℂ)
11756ad2antlr 759 . . . . . . . . . . . . . . . . . . . 20 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → (2↑(2 · 𝑗)) ∈ ℂ)
118117, 105subcld 10271 . . . . . . . . . . . . . . . . . . 19 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → ((2↑(2 · 𝑗)) − 1) ∈ ℂ)
119 2rp 11713 . . . . . . . . . . . . . . . . . . . . 21 2 ∈ ℝ+
120119a1i 11 . . . . . . . . . . . . . . . . . . . 20 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → 2 ∈ ℝ+)
121120rpcnne0d 11757 . . . . . . . . . . . . . . . . . . 19 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → (2 ∈ ℂ ∧ 2 ≠ 0))
122 divmul2 10568 . . . . . . . . . . . . . . . . . . 19 ((((𝑃 − 1) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) ∈ ℂ ∧ ((2↑(2 · 𝑗)) − 1) ∈ ℂ ∧ (2 ∈ ℂ ∧ 2 ≠ 0)) → ((((𝑃 − 1) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) / 2) = ((2↑(2 · 𝑗)) − 1) ↔ ((𝑃 − 1) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) = (2 · ((2↑(2 · 𝑗)) − 1))))
123116, 118, 121, 122syl3anc 1318 . . . . . . . . . . . . . . . . . 18 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → ((((𝑃 − 1) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) / 2) = ((2↑(2 · 𝑗)) − 1) ↔ ((𝑃 − 1) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) = (2 · ((2↑(2 · 𝑗)) − 1))))
124 div23 10583 . . . . . . . . . . . . . . . . . . . . 21 (((𝑃 − 1) ∈ ℂ ∧ Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘) ∈ ℂ ∧ (2 ∈ ℂ ∧ 2 ≠ 0)) → (((𝑃 − 1) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) / 2) = (((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)))
125106, 115, 121, 124syl3anc 1318 . . . . . . . . . . . . . . . . . . . 20 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → (((𝑃 − 1) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) / 2) = (((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)))
126125eqeq1d 2612 . . . . . . . . . . . . . . . . . . 19 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → ((((𝑃 − 1) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) / 2) = ((2↑(2 · 𝑗)) − 1) ↔ (((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) = ((2↑(2 · 𝑗)) − 1)))
12751nn0zd 11356 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑗 ∈ ℕ → 2 ∈ ℤ)
128 2nn 11062 . . . . . . . . . . . . . . . . . . . . . . . . . 26 2 ∈ ℕ
129128a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑗 ∈ ℕ → 2 ∈ ℕ)
130 id 22 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑗 ∈ ℕ → 𝑗 ∈ ℕ)
131129, 130nnmulcld 10945 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑗 ∈ ℕ → (2 · 𝑗) ∈ ℕ)
132 iddvdsexp 14843 . . . . . . . . . . . . . . . . . . . . . . . 24 ((2 ∈ ℤ ∧ (2 · 𝑗) ∈ ℕ) → 2 ∥ (2↑(2 · 𝑗)))
133127, 131, 132syl2anc 691 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 ∈ ℕ → 2 ∥ (2↑(2 · 𝑗)))
134133notnotd 137 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 ∈ ℕ → ¬ ¬ 2 ∥ (2↑(2 · 𝑗)))
13555nn0zd 11356 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑗 ∈ ℕ → (2↑(2 · 𝑗)) ∈ ℤ)
136 oddm1even 14905 . . . . . . . . . . . . . . . . . . . . . . 23 ((2↑(2 · 𝑗)) ∈ ℤ → (¬ 2 ∥ (2↑(2 · 𝑗)) ↔ 2 ∥ ((2↑(2 · 𝑗)) − 1)))
137135, 136syl 17 . . . . . . . . . . . . . . . . . . . . . 22 (𝑗 ∈ ℕ → (¬ 2 ∥ (2↑(2 · 𝑗)) ↔ 2 ∥ ((2↑(2 · 𝑗)) − 1)))
138134, 137mtbid 313 . . . . . . . . . . . . . . . . . . . . 21 (𝑗 ∈ ℕ → ¬ 2 ∥ ((2↑(2 · 𝑗)) − 1))
139138ad2antlr 759 . . . . . . . . . . . . . . . . . . . 20 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → ¬ 2 ∥ ((2↑(2 · 𝑗)) − 1))
140 breq2 4587 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) = ((2↑(2 · 𝑗)) − 1) → (2 ∥ (((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) ↔ 2 ∥ ((2↑(2 · 𝑗)) − 1)))
141140notbid 307 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) = ((2↑(2 · 𝑗)) − 1) → (¬ 2 ∥ (((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) ↔ ¬ 2 ∥ ((2↑(2 · 𝑗)) − 1)))
142141adantl 481 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) ∧ (((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) = ((2↑(2 · 𝑗)) − 1)) → (¬ 2 ∥ (((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) ↔ ¬ 2 ∥ ((2↑(2 · 𝑗)) − 1)))
143 fzfid 12634 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → (0...(𝑀 − 1)) ∈ Fin)
144112ad4ant14 1285 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) ∧ 𝑘 ∈ (0...(𝑀 − 1))) → (𝑃𝑘) ∈ ℤ)
145 elnn0 11171 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑘 ∈ ℕ0 ↔ (𝑘 ∈ ℕ ∨ 𝑘 = 0))
146 eldifsn 4260 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 (𝑃 ∈ (ℙ ∖ {2}) ↔ (𝑃 ∈ ℙ ∧ 𝑃 ≠ 2))
147 simpr 476 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 40 ((𝑃 ∈ ℙ ∧ 𝑃 ≠ 2) → 𝑃 ≠ 2)
148147necomd 2837 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 39 ((𝑃 ∈ ℙ ∧ 𝑃 ≠ 2) → 2 ≠ 𝑃)
149146, 148sylbi 206 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 (𝑃 ∈ (ℙ ∖ {2}) → 2 ≠ 𝑃)
150149adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ((𝑘 ∈ ℕ ∧ 𝑃 ∈ (ℙ ∖ {2})) → 2 ≠ 𝑃)
151150neneqd 2787 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ((𝑘 ∈ ℕ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ¬ 2 = 𝑃)
152 2prm 15243 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 2 ∈ ℙ
15311adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ((𝑘 ∈ ℕ ∧ 𝑃 ∈ (ℙ ∖ {2})) → 𝑃 ∈ ℙ)
154 simpl 472 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ((𝑘 ∈ ℕ ∧ 𝑃 ∈ (ℙ ∖ {2})) → 𝑘 ∈ ℕ)
155 prmdvdsexpb 15266 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ((2 ∈ ℙ ∧ 𝑃 ∈ ℙ ∧ 𝑘 ∈ ℕ) → (2 ∥ (𝑃𝑘) ↔ 2 = 𝑃))
156152, 153, 154, 155mp3an2i 1421 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ((𝑘 ∈ ℕ ∧ 𝑃 ∈ (ℙ ∖ {2})) → (2 ∥ (𝑃𝑘) ↔ 2 = 𝑃))
157151, 156mtbird 314 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝑘 ∈ ℕ ∧ 𝑃 ∈ (ℙ ∖ {2})) → ¬ 2 ∥ (𝑃𝑘))
158157ex 449 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑘 ∈ ℕ → (𝑃 ∈ (ℙ ∖ {2}) → ¬ 2 ∥ (𝑃𝑘)))
159 n2dvds1 14942 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ¬ 2 ∥ 1
160 oveq2 6557 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 (𝑘 = 0 → (𝑃𝑘) = (𝑃↑0))
16198exp0d 12864 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 38 (𝑃 ∈ (ℙ ∖ {2}) → (𝑃↑0) = 1)
162160, 161sylan9eq 2664 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 37 ((𝑘 = 0 ∧ 𝑃 ∈ (ℙ ∖ {2})) → (𝑃𝑘) = 1)
163162breq2d 4595 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 36 ((𝑘 = 0 ∧ 𝑃 ∈ (ℙ ∖ {2})) → (2 ∥ (𝑃𝑘) ↔ 2 ∥ 1))
164159, 163mtbiri 316 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 35 ((𝑘 = 0 ∧ 𝑃 ∈ (ℙ ∖ {2})) → ¬ 2 ∥ (𝑃𝑘))
165164ex 449 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 34 (𝑘 = 0 → (𝑃 ∈ (ℙ ∖ {2}) → ¬ 2 ∥ (𝑃𝑘)))
166158, 165jaoi 393 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝑘 ∈ ℕ ∨ 𝑘 = 0) → (𝑃 ∈ (ℙ ∖ {2}) → ¬ 2 ∥ (𝑃𝑘)))
167145, 166sylbi 206 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑘 ∈ ℕ0 → (𝑃 ∈ (ℙ ∖ {2}) → ¬ 2 ∥ (𝑃𝑘)))
168109, 167syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑘 ∈ (0...(𝑀 − 1)) → (𝑃 ∈ (ℙ ∖ {2}) → ¬ 2 ∥ (𝑃𝑘)))
169168com12 32 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑃 ∈ (ℙ ∖ {2}) → (𝑘 ∈ (0...(𝑀 − 1)) → ¬ 2 ∥ (𝑃𝑘)))
1701693ad2ant1 1075 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (𝑘 ∈ (0...(𝑀 − 1)) → ¬ 2 ∥ (𝑃𝑘)))
171170ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → (𝑘 ∈ (0...(𝑀 − 1)) → ¬ 2 ∥ (𝑃𝑘)))
172171imp 444 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) ∧ 𝑘 ∈ (0...(𝑀 − 1))) → ¬ 2 ∥ (𝑃𝑘))
173 nnm1nn0 11211 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑀 ∈ ℕ → (𝑀 − 1) ∈ ℕ0)
174 hashfz0 13079 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 ((𝑀 − 1) ∈ ℕ0 → (#‘(0...(𝑀 − 1))) = ((𝑀 − 1) + 1))
175173, 174syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑀 ∈ ℕ → (#‘(0...(𝑀 − 1))) = ((𝑀 − 1) + 1))
176 nncn 10905 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑀 ∈ ℕ → 𝑀 ∈ ℂ)
177 1cnd 9935 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑀 ∈ ℕ → 1 ∈ ℂ)
178176, 177npcand 10275 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑀 ∈ ℕ → ((𝑀 − 1) + 1) = 𝑀)
179175, 178eqtr2d 2645 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑀 ∈ ℕ → 𝑀 = (#‘(0...(𝑀 − 1))))
1801793ad2ant2 1076 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → 𝑀 = (#‘(0...(𝑀 − 1))))
181180adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) → 𝑀 = (#‘(0...(𝑀 − 1))))
182181breq2d 4595 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) → (2 ∥ 𝑀 ↔ 2 ∥ (#‘(0...(𝑀 − 1)))))
183182biimpa 500 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → 2 ∥ (#‘(0...(𝑀 − 1))))
184143, 144, 172, 183evensumodd 14950 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → 2 ∥ Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘))
185184olcd 407 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → (2 ∥ ((𝑃 − 1) / 2) ∨ 2 ∥ Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)))
186152a1i 11 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) → 2 ∈ ℙ)
187 oddn2prm 15355 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑃 ∈ (ℙ ∖ {2}) → ¬ 2 ∥ 𝑃)
188 oddm1d2 14922 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑃 ∈ ℤ → (¬ 2 ∥ 𝑃 ↔ ((𝑃 − 1) / 2) ∈ ℤ))
18915, 188syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝑃 ∈ (ℙ ∖ {2}) → (¬ 2 ∥ 𝑃 ↔ ((𝑃 − 1) / 2) ∈ ℤ))
190187, 189mpbid 221 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑃 ∈ (ℙ ∖ {2}) → ((𝑃 − 1) / 2) ∈ ℤ)
191190adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) → ((𝑃 − 1) / 2) ∈ ℤ)
192 fzfid 12634 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) → (0...(𝑀 − 1)) ∈ Fin)
19314ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) ∧ 𝑘 ∈ (0...(𝑀 − 1))) → 𝑃 ∈ ℕ0)
194109adantl 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) ∧ 𝑘 ∈ (0...(𝑀 − 1))) → 𝑘 ∈ ℕ0)
195193, 194nn0expcld 12893 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) ∧ 𝑘 ∈ (0...(𝑀 − 1))) → (𝑃𝑘) ∈ ℕ0)
196195nn0zd 11356 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) ∧ 𝑘 ∈ (0...(𝑀 − 1))) → (𝑃𝑘) ∈ ℤ)
197192, 196fsumzcl 14313 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) → Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘) ∈ ℤ)
198186, 191, 1973jca 1235 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ) → (2 ∈ ℙ ∧ ((𝑃 − 1) / 2) ∈ ℤ ∧ Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘) ∈ ℤ))
1991983adant3 1074 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2 ∈ ℙ ∧ ((𝑃 − 1) / 2) ∈ ℤ ∧ Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘) ∈ ℤ))
200 euclemma 15263 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((2 ∈ ℙ ∧ ((𝑃 − 1) / 2) ∈ ℤ ∧ Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘) ∈ ℤ) → (2 ∥ (((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) ↔ (2 ∥ ((𝑃 − 1) / 2) ∨ 2 ∥ Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘))))
201199, 200syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (2 ∥ (((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) ↔ (2 ∥ ((𝑃 − 1) / 2) ∨ 2 ∥ Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘))))
202201ad2antrr 758 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → (2 ∥ (((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) ↔ (2 ∥ ((𝑃 − 1) / 2) ∨ 2 ∥ Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘))))
203185, 202mpbird 246 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → 2 ∥ (((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)))
204203pm2.24d 146 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → (¬ 2 ∥ (((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) → 𝑀 = 1))
205204adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) ∧ (((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) = ((2↑(2 · 𝑗)) − 1)) → (¬ 2 ∥ (((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) → 𝑀 = 1))
206142, 205sylbird 249 . . . . . . . . . . . . . . . . . . . . 21 (((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) ∧ (((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) = ((2↑(2 · 𝑗)) − 1)) → (¬ 2 ∥ ((2↑(2 · 𝑗)) − 1) → 𝑀 = 1))
207206ex 449 . . . . . . . . . . . . . . . . . . . 20 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → ((((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) = ((2↑(2 · 𝑗)) − 1) → (¬ 2 ∥ ((2↑(2 · 𝑗)) − 1) → 𝑀 = 1)))
208139, 207mpid 43 . . . . . . . . . . . . . . . . . . 19 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → ((((𝑃 − 1) / 2) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) = ((2↑(2 · 𝑗)) − 1) → 𝑀 = 1))
209126, 208sylbid 229 . . . . . . . . . . . . . . . . . 18 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → ((((𝑃 − 1) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) / 2) = ((2↑(2 · 𝑗)) − 1) → 𝑀 = 1))
210123, 209sylbird 249 . . . . . . . . . . . . . . . . 17 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → (((𝑃 − 1) · Σ𝑘 ∈ (0...(𝑀 − 1))(𝑃𝑘)) = (2 · ((2↑(2 · 𝑗)) − 1)) → 𝑀 = 1))
211103, 210sylbid 229 . . . . . . . . . . . . . . . 16 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → (((𝑃𝑀) − 1) = (2 · ((2↑(2 · 𝑗)) − 1)) → 𝑀 = 1))
21296, 211sylbird 249 . . . . . . . . . . . . . . 15 ((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) → (((2 · ((2↑(2 · 𝑗)) − 1)) + 1) = (𝑃𝑀) → 𝑀 = 1))
213212adantr 480 . . . . . . . . . . . . . 14 (((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) ∧ ((2 · 𝑗) + 1) = 𝑁) → (((2 · ((2↑(2 · 𝑗)) − 1)) + 1) = (𝑃𝑀) → 𝑀 = 1))
21484, 213sylbid 229 . . . . . . . . . . . . 13 (((((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) ∧ 2 ∥ 𝑀) ∧ ((2 · 𝑗) + 1) = 𝑁) → (((2↑𝑁) − 1) = (𝑃𝑀) → 𝑀 = 1))
215214exp31 628 . . . . . . . . . . . 12 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) → (2 ∥ 𝑀 → (((2 · 𝑗) + 1) = 𝑁 → (((2↑𝑁) − 1) = (𝑃𝑀) → 𝑀 = 1))))
216215com23 84 . . . . . . . . . . 11 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ 𝑗 ∈ ℕ) → (((2 · 𝑗) + 1) = 𝑁 → (2 ∥ 𝑀 → (((2↑𝑁) − 1) = (𝑃𝑀) → 𝑀 = 1))))
217216rexlimdva 3013 . . . . . . . . . 10 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (∃𝑗 ∈ ℕ ((2 · 𝑗) + 1) = 𝑁 → (2 ∥ 𝑀 → (((2↑𝑁) − 1) = (𝑃𝑀) → 𝑀 = 1))))
218217com34 89 . . . . . . . . 9 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (∃𝑗 ∈ ℕ ((2 · 𝑗) + 1) = 𝑁 → (((2↑𝑁) − 1) = (𝑃𝑀) → (2 ∥ 𝑀𝑀 = 1))))
219218adantr 480 . . . . . . . 8 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ ¬ 𝑁 = 1) → (∃𝑗 ∈ ℕ ((2 · 𝑗) + 1) = 𝑁 → (((2↑𝑁) − 1) = (𝑃𝑀) → (2 ∥ 𝑀𝑀 = 1))))
22045, 219sylbid 229 . . . . . . 7 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ ¬ 𝑁 = 1) → (¬ 2 ∥ 𝑁 → (((2↑𝑁) − 1) = (𝑃𝑀) → (2 ∥ 𝑀𝑀 = 1))))
221220com24 93 . . . . . 6 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ ¬ 𝑁 = 1) → (2 ∥ 𝑀 → (((2↑𝑁) − 1) = (𝑃𝑀) → (¬ 2 ∥ 𝑁𝑀 = 1))))
222221ex 449 . . . . 5 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (¬ 𝑁 = 1 → (2 ∥ 𝑀 → (((2↑𝑁) − 1) = (𝑃𝑀) → (¬ 2 ∥ 𝑁𝑀 = 1)))))
223222com25 97 . . . 4 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → (¬ 2 ∥ 𝑁 → (2 ∥ 𝑀 → (((2↑𝑁) − 1) = (𝑃𝑀) → (¬ 𝑁 = 1 → 𝑀 = 1)))))
224223impd 446 . . 3 ((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) → ((¬ 2 ∥ 𝑁 ∧ 2 ∥ 𝑀) → (((2↑𝑁) − 1) = (𝑃𝑀) → (¬ 𝑁 = 1 → 𝑀 = 1))))
2252243imp 1249 . 2 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (¬ 2 ∥ 𝑁 ∧ 2 ∥ 𝑀) ∧ ((2↑𝑁) − 1) = (𝑃𝑀)) → (¬ 𝑁 = 1 → 𝑀 = 1))
22638, 225pm2.61d 169 1 (((𝑃 ∈ (ℙ ∖ {2}) ∧ 𝑀 ∈ ℕ ∧ 𝑁 ∈ ℕ) ∧ (¬ 2 ∥ 𝑁 ∧ 2 ∥ 𝑀) ∧ ((2↑𝑁) − 1) = (𝑃𝑀)) → 𝑀 = 1)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 195  wo 382  wa 383  w3a 1031   = wceq 1475  wcel 1977  wne 2780  wrex 2897  cdif 3537  {csn 4125   class class class wbr 4583  cfv 5804  (class class class)co 6549  cc 9813  0cc0 9815  1c1 9816   + caddc 9818   · cmul 9820  cmin 10145   / cdiv 10563  cn 10897  2c2 10947  0cn0 11169  cz 11254  cuz 11563  +crp 11708  ...cfz 12197  cexp 12722  #chash 12979  Σcsu 14264  cdvds 14821  cprime 15223
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1713  ax-4 1728  ax-5 1827  ax-6 1875  ax-7 1922  ax-8 1979  ax-9 1986  ax-10 2006  ax-11 2021  ax-12 2034  ax-13 2234  ax-ext 2590  ax-rep 4699  ax-sep 4709  ax-nul 4717  ax-pow 4769  ax-pr 4833  ax-un 6847  ax-inf2 8421  ax-cnex 9871  ax-resscn 9872  ax-1cn 9873  ax-icn 9874  ax-addcl 9875  ax-addrcl 9876  ax-mulcl 9877  ax-mulrcl 9878  ax-mulcom 9879  ax-addass 9880  ax-mulass 9881  ax-distr 9882  ax-i2m1 9883  ax-1ne0 9884  ax-1rid 9885  ax-rnegex 9886  ax-rrecex 9887  ax-cnre 9888  ax-pre-lttri 9889  ax-pre-lttrn 9890  ax-pre-ltadd 9891  ax-pre-mulgt0 9892  ax-pre-sup 9893
This theorem depends on definitions:  df-bi 196  df-or 384  df-an 385  df-3or 1032  df-3an 1033  df-tru 1478  df-fal 1481  df-ex 1696  df-nf 1701  df-sb 1868  df-eu 2462  df-mo 2463  df-clab 2597  df-cleq 2603  df-clel 2606  df-nfc 2740  df-ne 2782  df-nel 2783  df-ral 2901  df-rex 2902  df-reu 2903  df-rmo 2904  df-rab 2905  df-v 3175  df-sbc 3403  df-csb 3500  df-dif 3543  df-un 3545  df-in 3547  df-ss 3554  df-pss 3556  df-nul 3875  df-if 4037  df-pw 4110  df-sn 4126  df-pr 4128  df-tp 4130  df-op 4132  df-uni 4373  df-int 4411  df-iun 4457  df-br 4584  df-opab 4644  df-mpt 4645  df-tr 4681  df-eprel 4949  df-id 4953  df-po 4959  df-so 4960  df-fr 4997  df-se 4998  df-we 4999  df-xp 5044  df-rel 5045  df-cnv 5046  df-co 5047  df-dm 5048  df-rn 5049  df-res 5050  df-ima 5051  df-pred 5597  df-ord 5643  df-on 5644  df-lim 5645  df-suc 5646  df-iota 5768  df-fun 5806  df-fn 5807  df-f 5808  df-f1 5809  df-fo 5810  df-f1o 5811  df-fv 5812  df-isom 5813  df-riota 6511  df-ov 6552  df-oprab 6553  df-mpt2 6554  df-om 6958  df-1st 7059  df-2nd 7060  df-wrecs 7294  df-recs 7355  df-rdg 7393  df-1o 7447  df-2o 7448  df-oadd 7451  df-er 7629  df-en 7842  df-dom 7843  df-sdom 7844  df-fin 7845  df-sup 8231  df-inf 8232  df-oi 8298  df-card 8648  df-cda 8873  df-pnf 9955  df-mnf 9956  df-xr 9957  df-ltxr 9958  df-le 9959  df-sub 10147  df-neg 10148  df-div 10564  df-nn 10898  df-2 10956  df-3 10957  df-n0 11170  df-z 11255  df-uz 11564  df-rp 11709  df-fz 12198  df-fzo 12335  df-fl 12455  df-mod 12531  df-seq 12664  df-exp 12723  df-hash 12980  df-cj 13687  df-re 13688  df-im 13689  df-sqrt 13823  df-abs 13824  df-clim 14067  df-sum 14265  df-dvds 14822  df-gcd 15055  df-prm 15224
This theorem is referenced by:  lighneal  40066
  Copyright terms: Public domain W3C validator