Users' Mathboxes Mathbox for metakunt < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  aks6d1c2p2 Structured version   Visualization version   GIF version

Theorem aks6d1c2p2 42114
Description: Injective condition for countability argument assuming that 𝑁 is not a prime power. (Contributed by metakunt, 7-Jan-2025.)
Hypotheses
Ref Expression
aks6d1c2p2.1 (𝜑𝑁 ∈ ℕ)
aks6d1c2p2.2 (𝜑𝑃 ∈ ℙ)
aks6d1c2p2.3 (𝜑𝑃𝑁)
aks6d1c2p2.4 𝐸 = (𝑘 ∈ ℕ0, 𝑙 ∈ ℕ0 ↦ ((𝑃𝑘) · ((𝑁 / 𝑃)↑𝑙)))
aks6d1c2p2.5 (𝜑𝑄 ∈ ℙ)
aks6d1c2p2.6 (𝜑𝑄𝑁)
aks6d1c2p2.7 (𝜑𝑃𝑄)
Assertion
Ref Expression
aks6d1c2p2 (𝜑𝐸:(ℕ0 × ℕ0)–1-1→ℕ)
Distinct variable groups:   𝑘,𝑁,𝑙   𝑃,𝑘,𝑙   𝜑,𝑘,𝑙
Allowed substitution hints:   𝑄(𝑘,𝑙)   𝐸(𝑘,𝑙)

Proof of Theorem aks6d1c2p2
Dummy variables 𝑎 𝑏 𝑐 𝑑 𝑝 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 aks6d1c2p2.1 . . . 4 (𝜑𝑁 ∈ ℕ)
2 aks6d1c2p2.2 . . . 4 (𝜑𝑃 ∈ ℙ)
3 aks6d1c2p2.3 . . . 4 (𝜑𝑃𝑁)
4 aks6d1c2p2.4 . . . 4 𝐸 = (𝑘 ∈ ℕ0, 𝑙 ∈ ℕ0 ↦ ((𝑃𝑘) · ((𝑁 / 𝑃)↑𝑙)))
51, 2, 3, 4aks6d1c2p1 42113 . . 3 (𝜑𝐸:(ℕ0 × ℕ0)⟶ℕ)
6 neneq 2932 . . . . . . . . . . . . . . . . 17 (𝑏𝑑 → ¬ 𝑏 = 𝑑)
76orcd 873 . . . . . . . . . . . . . . . 16 (𝑏𝑑 → (¬ 𝑏 = 𝑑 ∨ ¬ 𝑎 = 𝑐))
8 simpr 484 . . . . . . . . . . . . . . . . . 18 ((𝑏 = 𝑑𝑎𝑐) → 𝑎𝑐)
98neneqd 2931 . . . . . . . . . . . . . . . . 17 ((𝑏 = 𝑑𝑎𝑐) → ¬ 𝑎 = 𝑐)
109olcd 874 . . . . . . . . . . . . . . . 16 ((𝑏 = 𝑑𝑎𝑐) → (¬ 𝑏 = 𝑑 ∨ ¬ 𝑎 = 𝑐))
117, 10jaoi 857 . . . . . . . . . . . . . . 15 ((𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)) → (¬ 𝑏 = 𝑑 ∨ ¬ 𝑎 = 𝑐))
12 neqne 2934 . . . . . . . . . . . . . . . . 17 𝑏 = 𝑑𝑏𝑑)
1312orcd 873 . . . . . . . . . . . . . . . 16 𝑏 = 𝑑 → (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)))
14 neqne 2934 . . . . . . . . . . . . . . . . . . 19 𝑎 = 𝑐𝑎𝑐)
1514anim1ci 616 . . . . . . . . . . . . . . . . . 18 ((¬ 𝑎 = 𝑐𝑏 = 𝑑) → (𝑏 = 𝑑𝑎𝑐))
1615olcd 874 . . . . . . . . . . . . . . . . 17 ((¬ 𝑎 = 𝑐𝑏 = 𝑑) → (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)))
1713adantl 481 . . . . . . . . . . . . . . . . 17 ((¬ 𝑎 = 𝑐 ∧ ¬ 𝑏 = 𝑑) → (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)))
1816, 17pm2.61dan 812 . . . . . . . . . . . . . . . 16 𝑎 = 𝑐 → (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)))
1913, 18jaoi 857 . . . . . . . . . . . . . . 15 ((¬ 𝑏 = 𝑑 ∨ ¬ 𝑎 = 𝑐) → (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)))
2011, 19impbii 209 . . . . . . . . . . . . . 14 ((𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)) ↔ (¬ 𝑏 = 𝑑 ∨ ¬ 𝑎 = 𝑐))
21 orcom 870 . . . . . . . . . . . . . 14 ((¬ 𝑏 = 𝑑 ∨ ¬ 𝑎 = 𝑐) ↔ (¬ 𝑎 = 𝑐 ∨ ¬ 𝑏 = 𝑑))
2220, 21bitri 275 . . . . . . . . . . . . 13 ((𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)) ↔ (¬ 𝑎 = 𝑐 ∨ ¬ 𝑏 = 𝑑))
23 ianor 983 . . . . . . . . . . . . . 14 (¬ (𝑎 = 𝑐𝑏 = 𝑑) ↔ (¬ 𝑎 = 𝑐 ∨ ¬ 𝑏 = 𝑑))
2423bicomi 224 . . . . . . . . . . . . 13 ((¬ 𝑎 = 𝑐 ∨ ¬ 𝑏 = 𝑑) ↔ ¬ (𝑎 = 𝑐𝑏 = 𝑑))
2522, 24bitri 275 . . . . . . . . . . . 12 ((𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)) ↔ ¬ (𝑎 = 𝑐𝑏 = 𝑑))
26 aks6d1c2p2.5 . . . . . . . . . . . . . . . 16 (𝜑𝑄 ∈ ℙ)
2726ad5antr 734 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝑄 ∈ ℙ)
28 simpr 484 . . . . . . . . . . . . . . . . 17 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) ∧ 𝑝 = 𝑄) → 𝑝 = 𝑄)
2928oveq1d 7405 . . . . . . . . . . . . . . . 16 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) ∧ 𝑝 = 𝑄) → (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))))
3028oveq1d 7405 . . . . . . . . . . . . . . . 16 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) ∧ 𝑝 = 𝑄) → (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) = (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
3129, 30neeq12d 2987 . . . . . . . . . . . . . . 15 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) ∧ 𝑝 = 𝑄) → ((𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
32 0cnd 11174 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 0 ∈ ℂ)
33 prmnn 16651 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
342, 33syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑𝑃 ∈ ℕ)
351, 34jca 511 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → (𝑁 ∈ ℕ ∧ 𝑃 ∈ ℕ))
36 nndivdvds 16238 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑁 ∈ ℕ ∧ 𝑃 ∈ ℕ) → (𝑃𝑁 ↔ (𝑁 / 𝑃) ∈ ℕ))
3735, 36syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → (𝑃𝑁 ↔ (𝑁 / 𝑃) ∈ ℕ))
383, 37mpbid 232 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (𝑁 / 𝑃) ∈ ℕ)
3938adantr 480 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑎 ∈ ℕ0) → (𝑁 / 𝑃) ∈ ℕ)
4039adantr 480 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → (𝑁 / 𝑃) ∈ ℕ)
4140ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑁 / 𝑃) ∈ ℕ)
4241adantr 480 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑁 / 𝑃) ∈ ℕ)
43 simp-4r 783 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝑏 ∈ ℕ0)
4442, 43nnexpcld 14217 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑁 / 𝑃)↑𝑏) ∈ ℕ)
4527, 44pccld 16828 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ0)
4645nn0cnd 12512 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) ∈ ℂ)
47 simplr 768 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝑑 ∈ ℕ0)
4842, 47nnexpcld 14217 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑁 / 𝑃)↑𝑑) ∈ ℕ)
4927, 48pccld 16828 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)) ∈ ℕ0)
5049nn0cnd 12512 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)) ∈ ℂ)
51 simpr 484 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝑏𝑑)
5243nn0cnd 12512 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝑏 ∈ ℂ)
5347nn0cnd 12512 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝑑 ∈ ℂ)
5427, 42pccld 16828 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt (𝑁 / 𝑃)) ∈ ℕ0)
5554nn0cnd 12512 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt (𝑁 / 𝑃)) ∈ ℂ)
56 simp-5l 784 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝜑)
57 aks6d1c2p2.6 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑𝑄𝑁)
581nncnd 12209 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑𝑁 ∈ ℂ)
5934nncnd 12209 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑𝑃 ∈ ℂ)
6034nnne0d 12243 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑𝑃 ≠ 0)
6158, 59, 60divcan2d 11967 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝜑 → (𝑃 · (𝑁 / 𝑃)) = 𝑁)
6261eqcomd 2736 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑𝑁 = (𝑃 · (𝑁 / 𝑃)))
6362breq2d 5122 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑 → (𝑄𝑁𝑄 ∥ (𝑃 · (𝑁 / 𝑃))))
6457, 63mpbid 232 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑𝑄 ∥ (𝑃 · (𝑁 / 𝑃)))
6534nnzd 12563 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑𝑃 ∈ ℤ)
6638nnzd 12563 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑 → (𝑁 / 𝑃) ∈ ℤ)
67 euclemma 16690 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑄 ∈ ℙ ∧ 𝑃 ∈ ℤ ∧ (𝑁 / 𝑃) ∈ ℤ) → (𝑄 ∥ (𝑃 · (𝑁 / 𝑃)) ↔ (𝑄𝑃𝑄 ∥ (𝑁 / 𝑃))))
6826, 65, 66, 67syl3anc 1373 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑 → (𝑄 ∥ (𝑃 · (𝑁 / 𝑃)) ↔ (𝑄𝑃𝑄 ∥ (𝑁 / 𝑃))))
6968biimpd 229 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → (𝑄 ∥ (𝑃 · (𝑁 / 𝑃)) → (𝑄𝑃𝑄 ∥ (𝑁 / 𝑃))))
7064, 69mpd 15 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → (𝑄𝑃𝑄 ∥ (𝑁 / 𝑃)))
71 aks6d1c2p2.7 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑𝑃𝑄)
72 necom 2979 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑃𝑄𝑄𝑃)
7372imbi2i 336 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝜑𝑃𝑄) ↔ (𝜑𝑄𝑃))
7471, 73mpbi 230 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝜑𝑄𝑃)
7574neneqd 2931 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑 → ¬ 𝑄 = 𝑃)
76 1red 11182 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝜑 → 1 ∈ ℝ)
77 prmgt1 16674 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑄 ∈ ℙ → 1 < 𝑄)
7826, 77syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝜑 → 1 < 𝑄)
7976, 78ltned 11317 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑 → 1 ≠ 𝑄)
8079necomd 2981 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝜑𝑄 ≠ 1)
8180neneqd 2931 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑 → ¬ 𝑄 = 1)
8275, 81jca 511 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑 → (¬ 𝑄 = 𝑃 ∧ ¬ 𝑄 = 1))
83 pm4.56 990 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((¬ 𝑄 = 𝑃 ∧ ¬ 𝑄 = 1) ↔ ¬ (𝑄 = 𝑃𝑄 = 1))
8482, 83sylib 218 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → ¬ (𝑄 = 𝑃𝑄 = 1))
85 prmnn 16651 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑄 ∈ ℙ → 𝑄 ∈ ℕ)
8626, 85syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑𝑄 ∈ ℕ)
87 dvdsprime 16664 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑃 ∈ ℙ ∧ 𝑄 ∈ ℕ) → (𝑄𝑃 ↔ (𝑄 = 𝑃𝑄 = 1)))
882, 86, 87syl2anc 584 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → (𝑄𝑃 ↔ (𝑄 = 𝑃𝑄 = 1)))
8984, 88mtbird 325 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → ¬ 𝑄𝑃)
9070, 89orcnd 878 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑𝑄 ∥ (𝑁 / 𝑃))
9126, 38jca 511 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → (𝑄 ∈ ℙ ∧ (𝑁 / 𝑃) ∈ ℕ))
92 pcelnn 16848 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑄 ∈ ℙ ∧ (𝑁 / 𝑃) ∈ ℕ) → ((𝑄 pCnt (𝑁 / 𝑃)) ∈ ℕ ↔ 𝑄 ∥ (𝑁 / 𝑃)))
9391, 92syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → ((𝑄 pCnt (𝑁 / 𝑃)) ∈ ℕ ↔ 𝑄 ∥ (𝑁 / 𝑃)))
9490, 93mpbird 257 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → (𝑄 pCnt (𝑁 / 𝑃)) ∈ ℕ)
9556, 94syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt (𝑁 / 𝑃)) ∈ ℕ)
9695nnne0d 12243 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt (𝑁 / 𝑃)) ≠ 0)
9752, 53, 55, 96mulcan2d 11819 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑏 · (𝑄 pCnt (𝑁 / 𝑃))) = (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))) ↔ 𝑏 = 𝑑))
9897necon3bid 2970 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑏 · (𝑄 pCnt (𝑁 / 𝑃))) ≠ (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))) ↔ 𝑏𝑑))
9951, 98mpbird 257 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑏 · (𝑄 pCnt (𝑁 / 𝑃))) ≠ (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))))
10026ad4antr 732 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑄 ∈ ℙ)
101 nnq 12928 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑁 / 𝑃) ∈ ℕ → (𝑁 / 𝑃) ∈ ℚ)
10241, 101syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑁 / 𝑃) ∈ ℚ)
1031ad4antr 732 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑁 ∈ ℕ)
104103nncnd 12209 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑁 ∈ ℂ)
10534adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑎 ∈ ℕ0) → 𝑃 ∈ ℕ)
106105adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → 𝑃 ∈ ℕ)
107106ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑃 ∈ ℕ)
108107nncnd 12209 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑃 ∈ ℂ)
109103nnne0d 12243 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑁 ≠ 0)
110107nnne0d 12243 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑃 ≠ 0)
111104, 108, 109, 110divne0d 11981 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑁 / 𝑃) ≠ 0)
112102, 111jca 511 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃) ∈ ℚ ∧ (𝑁 / 𝑃) ≠ 0))
113 simpllr 775 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑏 ∈ ℕ0)
114113nn0zd 12562 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑏 ∈ ℤ)
115100, 112, 1143jca 1128 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∈ ℙ ∧ ((𝑁 / 𝑃) ∈ ℚ ∧ (𝑁 / 𝑃) ≠ 0) ∧ 𝑏 ∈ ℤ))
116 pcexp 16837 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑄 ∈ ℙ ∧ ((𝑁 / 𝑃) ∈ ℚ ∧ (𝑁 / 𝑃) ≠ 0) ∧ 𝑏 ∈ ℤ) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) = (𝑏 · (𝑄 pCnt (𝑁 / 𝑃))))
117115, 116syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) = (𝑏 · (𝑄 pCnt (𝑁 / 𝑃))))
118117adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) = (𝑏 · (𝑄 pCnt (𝑁 / 𝑃))))
119118eqcomd 2736 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑏 · (𝑄 pCnt (𝑁 / 𝑃))) = (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)))
120 simpr 484 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑑 ∈ ℕ0)
121120nn0zd 12562 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑑 ∈ ℤ)
122100, 112, 1213jca 1128 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∈ ℙ ∧ ((𝑁 / 𝑃) ∈ ℚ ∧ (𝑁 / 𝑃) ≠ 0) ∧ 𝑑 ∈ ℤ))
123 pcexp 16837 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑄 ∈ ℙ ∧ ((𝑁 / 𝑃) ∈ ℚ ∧ (𝑁 / 𝑃) ≠ 0) ∧ 𝑑 ∈ ℤ) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)) = (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))))
124122, 123syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)) = (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))))
125124adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)) = (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))))
126125eqcomd 2736 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))) = (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)))
12799, 119, 1263netr3d 3002 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) ≠ (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)))
12832, 46, 50, 127addneintrd 11388 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (0 + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))) ≠ (0 + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
12975ad4antr 732 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ¬ 𝑄 = 𝑃)
1302ad4antr 732 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑃 ∈ ℙ)
131 simp-4r 783 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑎 ∈ ℕ0)
132 prmdvdsexpr 16694 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑄 ∈ ℙ ∧ 𝑃 ∈ ℙ ∧ 𝑎 ∈ ℕ0) → (𝑄 ∥ (𝑃𝑎) → 𝑄 = 𝑃))
133100, 130, 131, 132syl3anc 1373 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∥ (𝑃𝑎) → 𝑄 = 𝑃))
134133con3d 152 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (¬ 𝑄 = 𝑃 → ¬ 𝑄 ∥ (𝑃𝑎)))
135129, 134mpd 15 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ¬ 𝑄 ∥ (𝑃𝑎))
136 simplr 768 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → 𝑎 ∈ ℕ0)
137106, 136nnexpcld 14217 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → (𝑃𝑎) ∈ ℕ)
138137ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑎) ∈ ℕ)
139100, 138jca 511 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∈ ℙ ∧ (𝑃𝑎) ∈ ℕ))
140 pceq0 16849 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑄 ∈ ℙ ∧ (𝑃𝑎) ∈ ℕ) → ((𝑄 pCnt (𝑃𝑎)) = 0 ↔ ¬ 𝑄 ∥ (𝑃𝑎)))
141139, 140syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑄 pCnt (𝑃𝑎)) = 0 ↔ ¬ 𝑄 ∥ (𝑃𝑎)))
142135, 141mpbird 257 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 pCnt (𝑃𝑎)) = 0)
143142eqcomd 2736 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 0 = (𝑄 pCnt (𝑃𝑎)))
144143oveq1d 7405 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (0 + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))) = ((𝑄 pCnt (𝑃𝑎)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))))
145144adantr 480 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (0 + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))) = ((𝑄 pCnt (𝑃𝑎)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))))
146 simplr 768 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑐 ∈ ℕ0)
147 prmdvdsexpr 16694 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑄 ∈ ℙ ∧ 𝑃 ∈ ℙ ∧ 𝑐 ∈ ℕ0) → (𝑄 ∥ (𝑃𝑐) → 𝑄 = 𝑃))
148100, 130, 146, 147syl3anc 1373 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∥ (𝑃𝑐) → 𝑄 = 𝑃))
149129, 148mtod 198 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ¬ 𝑄 ∥ (𝑃𝑐))
150107, 146nnexpcld 14217 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑐) ∈ ℕ)
151100, 150jca 511 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∈ ℙ ∧ (𝑃𝑐) ∈ ℕ))
152 pceq0 16849 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑄 ∈ ℙ ∧ (𝑃𝑐) ∈ ℕ) → ((𝑄 pCnt (𝑃𝑐)) = 0 ↔ ¬ 𝑄 ∥ (𝑃𝑐)))
153151, 152syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑄 pCnt (𝑃𝑐)) = 0 ↔ ¬ 𝑄 ∥ (𝑃𝑐)))
154149, 153mpbird 257 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 pCnt (𝑃𝑐)) = 0)
155154eqcomd 2736 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 0 = (𝑄 pCnt (𝑃𝑐)))
156155oveq1d 7405 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (0 + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))) = ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
157156adantr 480 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (0 + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))) = ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
158128, 145, 1573netr3d 3002 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑄 pCnt (𝑃𝑎)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))) ≠ ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
159107nnzd 12563 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑃 ∈ ℤ)
160159, 131jca 511 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃 ∈ ℤ ∧ 𝑎 ∈ ℕ0))
161 zexpcl 14048 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑃 ∈ ℤ ∧ 𝑎 ∈ ℕ0) → (𝑃𝑎) ∈ ℤ)
162160, 161syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑎) ∈ ℤ)
163131nn0zd 12562 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑎 ∈ ℤ)
164108, 110, 163expne0d 14124 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑎) ≠ 0)
165162, 164jca 511 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑎) ∈ ℤ ∧ (𝑃𝑎) ≠ 0))
16641nnzd 12563 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑁 / 𝑃) ∈ ℤ)
167166, 113jca 511 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃) ∈ ℤ ∧ 𝑏 ∈ ℕ0))
168 zexpcl 14048 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑁 / 𝑃) ∈ ℤ ∧ 𝑏 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑏) ∈ ℤ)
169167, 168syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑏) ∈ ℤ)
170104, 108, 110divcld 11965 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑁 / 𝑃) ∈ ℂ)
171170, 111, 114expne0d 14124 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑏) ≠ 0)
172169, 171jca 511 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑁 / 𝑃)↑𝑏) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑏) ≠ 0))
173100, 165, 1723jca 1128 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∈ ℙ ∧ ((𝑃𝑎) ∈ ℤ ∧ (𝑃𝑎) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑏) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑏) ≠ 0)))
174 pcmul 16829 . . . . . . . . . . . . . . . . . . 19 ((𝑄 ∈ ℙ ∧ ((𝑃𝑎) ∈ ℤ ∧ (𝑃𝑎) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑏) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑏) ≠ 0)) → (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = ((𝑄 pCnt (𝑃𝑎)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))))
175173, 174syl 17 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = ((𝑄 pCnt (𝑃𝑎)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))))
176175adantr 480 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = ((𝑄 pCnt (𝑃𝑎)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))))
177176eqcomd 2736 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑄 pCnt (𝑃𝑎)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))) = (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))))
178150nnzd 12563 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑐) ∈ ℤ)
179150nnne0d 12243 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑐) ≠ 0)
180178, 179jca 511 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑐) ∈ ℤ ∧ (𝑃𝑐) ≠ 0))
18141, 120nnexpcld 14217 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑑) ∈ ℕ)
182181nnzd 12563 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑑) ∈ ℤ)
183181nnne0d 12243 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑑) ≠ 0)
184182, 183jca 511 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑁 / 𝑃)↑𝑑) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑑) ≠ 0))
185100, 180, 1843jca 1128 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∈ ℙ ∧ ((𝑃𝑐) ∈ ℤ ∧ (𝑃𝑐) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑑) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑑) ≠ 0)))
186 pcmul 16829 . . . . . . . . . . . . . . . . . . 19 ((𝑄 ∈ ℙ ∧ ((𝑃𝑐) ∈ ℤ ∧ (𝑃𝑐) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑑) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑑) ≠ 0)) → (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) = ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
187185, 186syl 17 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) = ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
188187adantr 480 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) = ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
189188eqcomd 2736 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))) = (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
190158, 177, 1893netr3d 3002 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
19127, 31, 190rspcedvd 3593 . . . . . . . . . . . . . 14 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ∃𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
1922ad5antr 734 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑃 ∈ ℙ)
193 simpr 484 . . . . . . . . . . . . . . . . 17 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) ∧ 𝑝 = 𝑃) → 𝑝 = 𝑃)
194193oveq1d 7405 . . . . . . . . . . . . . . . 16 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) ∧ 𝑝 = 𝑃) → (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))))
195193oveq1d 7405 . . . . . . . . . . . . . . . 16 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) ∧ 𝑝 = 𝑃) → (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) = (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
196194, 195neeq12d 2987 . . . . . . . . . . . . . . 15 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) ∧ 𝑝 = 𝑃) → ((𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
197130adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑃 ∈ ℙ)
198197, 33syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑃 ∈ ℕ)
199 simp-5r 785 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑎 ∈ ℕ0)
200198, 199nnexpcld 14217 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃𝑎) ∈ ℕ)
201197, 200pccld 16828 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑎)) ∈ ℕ0)
202201nn0cnd 12512 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑎)) ∈ ℂ)
203 simpllr 775 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑐 ∈ ℕ0)
204198, 203nnexpcld 14217 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃𝑐) ∈ ℕ)
205197, 204pccld 16828 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑐)) ∈ ℕ0)
206205nn0cnd 12512 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑐)) ∈ ℂ)
20741adantr 480 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑁 / 𝑃) ∈ ℕ)
208 simp-4r 783 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑏 ∈ ℕ0)
209207, 208nnexpcld 14217 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑁 / 𝑃)↑𝑏) ∈ ℕ)
210197, 209pccld 16828 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ0)
211210nn0cnd 12512 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏)) ∈ ℂ)
2128adantl 481 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑎𝑐)
213197, 199jca 511 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 ∈ ℙ ∧ 𝑎 ∈ ℕ0))
214 pcidlem 16850 . . . . . . . . . . . . . . . . . . . . 21 ((𝑃 ∈ ℙ ∧ 𝑎 ∈ ℕ0) → (𝑃 pCnt (𝑃𝑎)) = 𝑎)
215213, 214syl 17 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑎)) = 𝑎)
216215eqcomd 2736 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑎 = (𝑃 pCnt (𝑃𝑎)))
217197, 203jca 511 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 ∈ ℙ ∧ 𝑐 ∈ ℕ0))
218 pcidlem 16850 . . . . . . . . . . . . . . . . . . . . 21 ((𝑃 ∈ ℙ ∧ 𝑐 ∈ ℕ0) → (𝑃 pCnt (𝑃𝑐)) = 𝑐)
219217, 218syl 17 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑐)) = 𝑐)
220219eqcomd 2736 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑐 = (𝑃 pCnt (𝑃𝑐)))
221212, 216, 2203netr3d 3002 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑎)) ≠ (𝑃 pCnt (𝑃𝑐)))
222202, 206, 211, 221addneintr2d 11389 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))) ≠ ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))))
223 eqidd 2731 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))) = ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))))
224 simprl 770 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑏 = 𝑑)
225224oveq2d 7406 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑁 / 𝑃)↑𝑏) = ((𝑁 / 𝑃)↑𝑑))
226225oveq2d 7406 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏)) = (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑)))
227226oveq2d 7406 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))) = ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑))))
228222, 223, 2273netr3d 3002 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))) ≠ ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑))))
229130, 165, 1723jca 1128 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃 ∈ ℙ ∧ ((𝑃𝑎) ∈ ℤ ∧ (𝑃𝑎) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑏) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑏) ≠ 0)))
230 pcmul 16829 . . . . . . . . . . . . . . . . . . 19 ((𝑃 ∈ ℙ ∧ ((𝑃𝑎) ∈ ℤ ∧ (𝑃𝑎) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑏) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑏) ≠ 0)) → (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))))
231229, 230syl 17 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))))
232231eqcomd 2736 . . . . . . . . . . . . . . . . 17 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))) = (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))))
233232adantr 480 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))) = (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))))
234130, 180, 1843jca 1128 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃 ∈ ℙ ∧ ((𝑃𝑐) ∈ ℤ ∧ (𝑃𝑐) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑑) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑑) ≠ 0)))
235 pcmul 16829 . . . . . . . . . . . . . . . . . . 19 ((𝑃 ∈ ℙ ∧ ((𝑃𝑐) ∈ ℤ ∧ (𝑃𝑐) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑑) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑑) ≠ 0)) → (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) = ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑))))
236235eqcomd 2736 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ ℙ ∧ ((𝑃𝑐) ∈ ℤ ∧ (𝑃𝑐) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑑) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑑) ≠ 0)) → ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑))) = (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
237234, 236syl 17 . . . . . . . . . . . . . . . . 17 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑))) = (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
238237adantr 480 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑))) = (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
239228, 233, 2383netr3d 3002 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
240192, 196, 239rspcedvd 3593 . . . . . . . . . . . . . 14 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ∃𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
241191, 240jaodan 959 . . . . . . . . . . . . 13 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐))) → ∃𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
242 biidd 262 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
243242necon3abid 2962 . . . . . . . . . . . . . . . . 17 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ¬ ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
244 simpr 484 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → 𝑏 ∈ ℕ0)
24540, 244nnexpcld 14217 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑏) ∈ ℕ)
246137, 245nnmulcld 12246 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ)
247246adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) → ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ)
248247adantr 480 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ)
249248nnnn0d 12510 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ0)
250150, 181nnmulcld 12246 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ∈ ℕ)
251250nnnn0d 12510 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ∈ ℕ0)
252249, 251jca 511 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ0 ∧ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ∈ ℕ0))
253 pc11 16858 . . . . . . . . . . . . . . . . . . 19 ((((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ0 ∧ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ∀𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
254252, 253syl 17 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ∀𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
255254notbid 318 . . . . . . . . . . . . . . . . 17 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (¬ ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ¬ ∀𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
256243, 255bitrd 279 . . . . . . . . . . . . . . . 16 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ¬ ∀𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
257 rexnal 3083 . . . . . . . . . . . . . . . . . 18 (∃𝑝 ∈ ℙ ¬ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ ¬ ∀𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
258257bicomi 224 . . . . . . . . . . . . . . . . 17 (¬ ∀𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ ∃𝑝 ∈ ℙ ¬ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
259258a1i 11 . . . . . . . . . . . . . . . 16 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (¬ ∀𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ ∃𝑝 ∈ ℙ ¬ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
260256, 259bitrd 279 . . . . . . . . . . . . . . 15 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ∃𝑝 ∈ ℙ ¬ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
261 biidd 262 . . . . . . . . . . . . . . . . 17 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
262261necon3bbid 2963 . . . . . . . . . . . . . . . 16 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (¬ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
263262rexbidv 3158 . . . . . . . . . . . . . . 15 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (∃𝑝 ∈ ℙ ¬ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ ∃𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
264260, 263bitrd 279 . . . . . . . . . . . . . 14 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ∃𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
265264adantr 480 . . . . . . . . . . . . 13 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐))) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ∃𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
266241, 265mpbird 257 . . . . . . . . . . . 12 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐))) → ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))
26725, 266sylan2br 595 . . . . . . . . . . 11 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ ¬ (𝑎 = 𝑐𝑏 = 𝑑)) → ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))
2684a1i 11 . . . . . . . . . . . . . 14 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝐸 = (𝑘 ∈ ℕ0, 𝑙 ∈ ℕ0 ↦ ((𝑃𝑘) · ((𝑁 / 𝑃)↑𝑙))))
269 simprl 770 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑎𝑙 = 𝑏)) → 𝑘 = 𝑎)
270269oveq2d 7406 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑎𝑙 = 𝑏)) → (𝑃𝑘) = (𝑃𝑎))
271 simprr 772 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑎𝑙 = 𝑏)) → 𝑙 = 𝑏)
272271oveq2d 7406 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑎𝑙 = 𝑏)) → ((𝑁 / 𝑃)↑𝑙) = ((𝑁 / 𝑃)↑𝑏))
273270, 272oveq12d 7408 . . . . . . . . . . . . . 14 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑎𝑙 = 𝑏)) → ((𝑃𝑘) · ((𝑁 / 𝑃)↑𝑙)) = ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)))
274268, 273, 131, 113, 248ovmpod 7544 . . . . . . . . . . . . 13 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑎𝐸𝑏) = ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)))
275 simprl 770 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑐𝑙 = 𝑑)) → 𝑘 = 𝑐)
276275oveq2d 7406 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑐𝑙 = 𝑑)) → (𝑃𝑘) = (𝑃𝑐))
277 simprr 772 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑐𝑙 = 𝑑)) → 𝑙 = 𝑑)
278277oveq2d 7406 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑐𝑙 = 𝑑)) → ((𝑁 / 𝑃)↑𝑙) = ((𝑁 / 𝑃)↑𝑑))
279276, 278oveq12d 7408 . . . . . . . . . . . . . 14 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑐𝑙 = 𝑑)) → ((𝑃𝑘) · ((𝑁 / 𝑃)↑𝑙)) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))
280268, 279, 146, 120, 250ovmpod 7544 . . . . . . . . . . . . 13 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑐𝐸𝑑) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))
281274, 280neeq12d 2987 . . . . . . . . . . . 12 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑎𝐸𝑏) ≠ (𝑐𝐸𝑑) ↔ ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
282281adantr 480 . . . . . . . . . . 11 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ ¬ (𝑎 = 𝑐𝑏 = 𝑑)) → ((𝑎𝐸𝑏) ≠ (𝑐𝐸𝑑) ↔ ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
283267, 282mpbird 257 . . . . . . . . . 10 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ ¬ (𝑎 = 𝑐𝑏 = 𝑑)) → (𝑎𝐸𝑏) ≠ (𝑐𝐸𝑑))
284283neneqd 2931 . . . . . . . . 9 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ ¬ (𝑎 = 𝑐𝑏 = 𝑑)) → ¬ (𝑎𝐸𝑏) = (𝑐𝐸𝑑))
285284ex 412 . . . . . . . 8 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (¬ (𝑎 = 𝑐𝑏 = 𝑑) → ¬ (𝑎𝐸𝑏) = (𝑐𝐸𝑑)))
286285con4d 115 . . . . . . 7 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑)))
287286ralrimiva 3126 . . . . . 6 ((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) → ∀𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑)))
288287ralrimiva 3126 . . . . 5 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → ∀𝑐 ∈ ℕ0𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑)))
289288ralrimiva 3126 . . . 4 ((𝜑𝑎 ∈ ℕ0) → ∀𝑏 ∈ ℕ0𝑐 ∈ ℕ0𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑)))
290289ralrimiva 3126 . . 3 (𝜑 → ∀𝑎 ∈ ℕ0𝑏 ∈ ℕ0𝑐 ∈ ℕ0𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑)))
2915, 290jca 511 . 2 (𝜑 → (𝐸:(ℕ0 × ℕ0)⟶ℕ ∧ ∀𝑎 ∈ ℕ0𝑏 ∈ ℕ0𝑐 ∈ ℕ0𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑))))
292 f1opr 7448 . 2 (𝐸:(ℕ0 × ℕ0)–1-1→ℕ ↔ (𝐸:(ℕ0 × ℕ0)⟶ℕ ∧ ∀𝑎 ∈ ℕ0𝑏 ∈ ℕ0𝑐 ∈ ℕ0𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑))))
293291, 292sylibr 234 1 (𝜑𝐸:(ℕ0 × ℕ0)–1-1→ℕ)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 206  wa 395  wo 847  w3a 1086   = wceq 1540  wcel 2109  wne 2926  wral 3045  wrex 3054   class class class wbr 5110   × cxp 5639  wf 6510  1-1wf1 6511  (class class class)co 7390  cmpo 7392  0cc0 11075  1c1 11076   + caddc 11078   · cmul 11080   < clt 11215   / cdiv 11842  cn 12193  0cn0 12449  cz 12536  cq 12914  cexp 14033  cdvds 16229  cprime 16648   pCnt cpc 16814
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2702  ax-sep 5254  ax-nul 5264  ax-pow 5323  ax-pr 5390  ax-un 7714  ax-cnex 11131  ax-resscn 11132  ax-1cn 11133  ax-icn 11134  ax-addcl 11135  ax-addrcl 11136  ax-mulcl 11137  ax-mulrcl 11138  ax-mulcom 11139  ax-addass 11140  ax-mulass 11141  ax-distr 11142  ax-i2m1 11143  ax-1ne0 11144  ax-1rid 11145  ax-rnegex 11146  ax-rrecex 11147  ax-cnre 11148  ax-pre-lttri 11149  ax-pre-lttrn 11150  ax-pre-ltadd 11151  ax-pre-mulgt0 11152  ax-pre-sup 11153
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2534  df-eu 2563  df-clab 2709  df-cleq 2722  df-clel 2804  df-nfc 2879  df-ne 2927  df-nel 3031  df-ral 3046  df-rex 3055  df-rmo 3356  df-reu 3357  df-rab 3409  df-v 3452  df-sbc 3757  df-csb 3866  df-dif 3920  df-un 3922  df-in 3924  df-ss 3934  df-pss 3937  df-nul 4300  df-if 4492  df-pw 4568  df-sn 4593  df-pr 4595  df-op 4599  df-uni 4875  df-iun 4960  df-br 5111  df-opab 5173  df-mpt 5192  df-tr 5218  df-id 5536  df-eprel 5541  df-po 5549  df-so 5550  df-fr 5594  df-we 5596  df-xp 5647  df-rel 5648  df-cnv 5649  df-co 5650  df-dm 5651  df-rn 5652  df-res 5653  df-ima 5654  df-pred 6277  df-ord 6338  df-on 6339  df-lim 6340  df-suc 6341  df-iota 6467  df-fun 6516  df-fn 6517  df-f 6518  df-f1 6519  df-fo 6520  df-f1o 6521  df-fv 6522  df-riota 7347  df-ov 7393  df-oprab 7394  df-mpo 7395  df-om 7846  df-1st 7971  df-2nd 7972  df-frecs 8263  df-wrecs 8294  df-recs 8343  df-rdg 8381  df-1o 8437  df-2o 8438  df-er 8674  df-en 8922  df-dom 8923  df-sdom 8924  df-fin 8925  df-sup 9400  df-inf 9401  df-pnf 11217  df-mnf 11218  df-xr 11219  df-ltxr 11220  df-le 11221  df-sub 11414  df-neg 11415  df-div 11843  df-nn 12194  df-2 12256  df-3 12257  df-n0 12450  df-z 12537  df-uz 12801  df-q 12915  df-rp 12959  df-fz 13476  df-fl 13761  df-mod 13839  df-seq 13974  df-exp 14034  df-cj 15072  df-re 15073  df-im 15074  df-sqrt 15208  df-abs 15209  df-dvds 16230  df-gcd 16472  df-prm 16649  df-pc 16815
This theorem is referenced by:  aks6d1c2  42125
  Copyright terms: Public domain W3C validator