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 42604
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 42603 . . 3 (𝜑𝐸:(ℕ0 × ℕ0)⟶ℕ)
6 neneq 2940 . . . . . . . . . . . . . . . . 17 (𝑏𝑑 → ¬ 𝑏 = 𝑑)
76orcd 879 . . . . . . . . . . . . . . . 16 (𝑏𝑑 → (¬ 𝑏 = 𝑑 ∨ ¬ 𝑎 = 𝑐))
8 simpr 485 . . . . . . . . . . . . . . . . . 18 ((𝑏 = 𝑑𝑎𝑐) → 𝑎𝑐)
98neneqd 2939 . . . . . . . . . . . . . . . . 17 ((𝑏 = 𝑑𝑎𝑐) → ¬ 𝑎 = 𝑐)
109olcd 880 . . . . . . . . . . . . . . . 16 ((𝑏 = 𝑑𝑎𝑐) → (¬ 𝑏 = 𝑑 ∨ ¬ 𝑎 = 𝑐))
117, 10jaoi 863 . . . . . . . . . . . . . . 15 ((𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)) → (¬ 𝑏 = 𝑑 ∨ ¬ 𝑎 = 𝑐))
12 neqne 2942 . . . . . . . . . . . . . . . . 17 𝑏 = 𝑑𝑏𝑑)
1312orcd 879 . . . . . . . . . . . . . . . 16 𝑏 = 𝑑 → (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)))
14 neqne 2942 . . . . . . . . . . . . . . . . . . 19 𝑎 = 𝑐𝑎𝑐)
1514anim1ci 622 . . . . . . . . . . . . . . . . . 18 ((¬ 𝑎 = 𝑐𝑏 = 𝑑) → (𝑏 = 𝑑𝑎𝑐))
1615olcd 880 . . . . . . . . . . . . . . . . 17 ((¬ 𝑎 = 𝑐𝑏 = 𝑑) → (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)))
1713adantl 482 . . . . . . . . . . . . . . . . 17 ((¬ 𝑎 = 𝑐 ∧ ¬ 𝑏 = 𝑑) → (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)))
1816, 17pm2.61dan 818 . . . . . . . . . . . . . . . 16 𝑎 = 𝑐 → (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)))
1913, 18jaoi 863 . . . . . . . . . . . . . . 15 ((¬ 𝑏 = 𝑑 ∨ ¬ 𝑎 = 𝑐) → (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)))
2011, 19impbii 210 . . . . . . . . . . . . . 14 ((𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)) ↔ (¬ 𝑏 = 𝑑 ∨ ¬ 𝑎 = 𝑐))
21 orcom 876 . . . . . . . . . . . . . 14 ((¬ 𝑏 = 𝑑 ∨ ¬ 𝑎 = 𝑐) ↔ (¬ 𝑎 = 𝑐 ∨ ¬ 𝑏 = 𝑑))
2220, 21bitri 276 . . . . . . . . . . . . 13 ((𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)) ↔ (¬ 𝑎 = 𝑐 ∨ ¬ 𝑏 = 𝑑))
23 ianor 989 . . . . . . . . . . . . . 14 (¬ (𝑎 = 𝑐𝑏 = 𝑑) ↔ (¬ 𝑎 = 𝑐 ∨ ¬ 𝑏 = 𝑑))
2423bicomi 225 . . . . . . . . . . . . 13 ((¬ 𝑎 = 𝑐 ∨ ¬ 𝑏 = 𝑑) ↔ ¬ (𝑎 = 𝑐𝑏 = 𝑑))
2522, 24bitri 276 . . . . . . . . . . . 12 ((𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)) ↔ ¬ (𝑎 = 𝑐𝑏 = 𝑑))
26 aks6d1c2p2.5 . . . . . . . . . . . . . . . 16 (𝜑𝑄 ∈ ℙ)
2726ad5antr 740 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝑄 ∈ ℙ)
28 simpr 485 . . . . . . . . . . . . . . . . 17 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) ∧ 𝑝 = 𝑄) → 𝑝 = 𝑄)
2928oveq1d 7371 . . . . . . . . . . . . . . . 16 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) ∧ 𝑝 = 𝑄) → (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))))
3028oveq1d 7371 . . . . . . . . . . . . . . . 16 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) ∧ 𝑝 = 𝑄) → (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) = (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
3129, 30neeq12d 2995 . . . . . . . . . . . . . . 15 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) ∧ 𝑝 = 𝑄) → ((𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
32 0cnd 11128 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 0 ∈ ℂ)
33 prmnn 16634 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
342, 33syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑𝑃 ∈ ℕ)
351, 34jca 516 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → (𝑁 ∈ ℕ ∧ 𝑃 ∈ ℕ))
36 nndivdvds 16221 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑁 ∈ ℕ ∧ 𝑃 ∈ ℕ) → (𝑃𝑁 ↔ (𝑁 / 𝑃) ∈ ℕ))
3735, 36syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → (𝑃𝑁 ↔ (𝑁 / 𝑃) ∈ ℕ))
383, 37mpbid 233 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → (𝑁 / 𝑃) ∈ ℕ)
3938adantr 481 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝜑𝑎 ∈ ℕ0) → (𝑁 / 𝑃) ∈ ℕ)
4039adantr 481 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → (𝑁 / 𝑃) ∈ ℕ)
4140ad2antrr 732 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑁 / 𝑃) ∈ ℕ)
4241adantr 481 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑁 / 𝑃) ∈ ℕ)
43 simp-4r 789 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝑏 ∈ ℕ0)
4442, 43nnexpcld 14198 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑁 / 𝑃)↑𝑏) ∈ ℕ)
4527, 44pccld 16812 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ0)
4645nn0cnd 12491 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) ∈ ℂ)
47 simplr 774 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝑑 ∈ ℕ0)
4842, 47nnexpcld 14198 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑁 / 𝑃)↑𝑑) ∈ ℕ)
4927, 48pccld 16812 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)) ∈ ℕ0)
5049nn0cnd 12491 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)) ∈ ℂ)
51 simpr 485 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝑏𝑑)
5243nn0cnd 12491 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝑏 ∈ ℂ)
5347nn0cnd 12491 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝑑 ∈ ℂ)
5427, 42pccld 16812 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt (𝑁 / 𝑃)) ∈ ℕ0)
5554nn0cnd 12491 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt (𝑁 / 𝑃)) ∈ ℂ)
56 simp-5l 790 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝜑)
57 aks6d1c2p2.6 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑𝑄𝑁)
581nncnd 12181 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑𝑁 ∈ ℂ)
5934nncnd 12181 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑𝑃 ∈ ℂ)
6034nnne0d 12218 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑𝑃 ≠ 0)
6158, 59, 60divcan2d 11924 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝜑 → (𝑃 · (𝑁 / 𝑃)) = 𝑁)
6261eqcomd 2745 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑𝑁 = (𝑃 · (𝑁 / 𝑃)))
6362breq2d 5084 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑 → (𝑄𝑁𝑄 ∥ (𝑃 · (𝑁 / 𝑃))))
6457, 63mpbid 233 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑𝑄 ∥ (𝑃 · (𝑁 / 𝑃)))
6534nnzd 12541 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑𝑃 ∈ ℤ)
6638nnzd 12541 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑 → (𝑁 / 𝑃) ∈ ℤ)
67 euclemma 16674 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑄 ∈ ℙ ∧ 𝑃 ∈ ℤ ∧ (𝑁 / 𝑃) ∈ ℤ) → (𝑄 ∥ (𝑃 · (𝑁 / 𝑃)) ↔ (𝑄𝑃𝑄 ∥ (𝑁 / 𝑃))))
6826, 65, 66, 67syl3anc 1379 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑 → (𝑄 ∥ (𝑃 · (𝑁 / 𝑃)) ↔ (𝑄𝑃𝑄 ∥ (𝑁 / 𝑃))))
6968biimpd 230 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → (𝑄 ∥ (𝑃 · (𝑁 / 𝑃)) → (𝑄𝑃𝑄 ∥ (𝑁 / 𝑃))))
7064, 69mpd 15 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → (𝑄𝑃𝑄 ∥ (𝑁 / 𝑃)))
71 aks6d1c2p2.7 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑𝑃𝑄)
72 necom 2987 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑃𝑄𝑄𝑃)
7372imbi2i 337 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝜑𝑃𝑄) ↔ (𝜑𝑄𝑃))
7471, 73mpbi 231 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝜑𝑄𝑃)
7574neneqd 2939 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑 → ¬ 𝑄 = 𝑃)
76 1red 11136 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝜑 → 1 ∈ ℝ)
77 prmgt1 16658 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑄 ∈ ℙ → 1 < 𝑄)
7826, 77syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝜑 → 1 < 𝑄)
7976, 78ltned 11273 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑 → 1 ≠ 𝑄)
8079necomd 2989 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝜑𝑄 ≠ 1)
8180neneqd 2939 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑 → ¬ 𝑄 = 1)
8275, 81jca 516 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑 → (¬ 𝑄 = 𝑃 ∧ ¬ 𝑄 = 1))
83 pm4.56 996 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((¬ 𝑄 = 𝑃 ∧ ¬ 𝑄 = 1) ↔ ¬ (𝑄 = 𝑃𝑄 = 1))
8482, 83sylib 219 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → ¬ (𝑄 = 𝑃𝑄 = 1))
85 prmnn 16634 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑄 ∈ ℙ → 𝑄 ∈ ℕ)
8626, 85syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑𝑄 ∈ ℕ)
87 dvdsprime 16647 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑃 ∈ ℙ ∧ 𝑄 ∈ ℕ) → (𝑄𝑃 ↔ (𝑄 = 𝑃𝑄 = 1)))
882, 86, 87syl2anc 590 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → (𝑄𝑃 ↔ (𝑄 = 𝑃𝑄 = 1)))
8984, 88mtbird 326 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → ¬ 𝑄𝑃)
9070, 89orcnd 884 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑𝑄 ∥ (𝑁 / 𝑃))
9126, 38jca 516 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → (𝑄 ∈ ℙ ∧ (𝑁 / 𝑃) ∈ ℕ))
92 pcelnn 16832 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑄 ∈ ℙ ∧ (𝑁 / 𝑃) ∈ ℕ) → ((𝑄 pCnt (𝑁 / 𝑃)) ∈ ℕ ↔ 𝑄 ∥ (𝑁 / 𝑃)))
9391, 92syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → ((𝑄 pCnt (𝑁 / 𝑃)) ∈ ℕ ↔ 𝑄 ∥ (𝑁 / 𝑃)))
9490, 93mpbird 258 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → (𝑄 pCnt (𝑁 / 𝑃)) ∈ ℕ)
9556, 94syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt (𝑁 / 𝑃)) ∈ ℕ)
9695nnne0d 12218 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt (𝑁 / 𝑃)) ≠ 0)
9752, 53, 55, 96mulcan2d 11775 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑏 · (𝑄 pCnt (𝑁 / 𝑃))) = (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))) ↔ 𝑏 = 𝑑))
9897necon3bid 2978 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑏 · (𝑄 pCnt (𝑁 / 𝑃))) ≠ (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))) ↔ 𝑏𝑑))
9951, 98mpbird 258 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑏 · (𝑄 pCnt (𝑁 / 𝑃))) ≠ (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))))
10026ad4antr 738 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑄 ∈ ℙ)
101 nnq 12903 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑁 / 𝑃) ∈ ℕ → (𝑁 / 𝑃) ∈ ℚ)
10241, 101syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑁 / 𝑃) ∈ ℚ)
1031ad4antr 738 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑁 ∈ ℕ)
104103nncnd 12181 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑁 ∈ ℂ)
10534adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑎 ∈ ℕ0) → 𝑃 ∈ ℕ)
106105adantr 481 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → 𝑃 ∈ ℕ)
107106ad2antrr 732 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑃 ∈ ℕ)
108107nncnd 12181 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑃 ∈ ℂ)
109103nnne0d 12218 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑁 ≠ 0)
110107nnne0d 12218 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑃 ≠ 0)
111104, 108, 109, 110divne0d 11938 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑁 / 𝑃) ≠ 0)
112102, 111jca 516 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃) ∈ ℚ ∧ (𝑁 / 𝑃) ≠ 0))
113 simpllr 781 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑏 ∈ ℕ0)
114113nn0zd 12540 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑏 ∈ ℤ)
115100, 112, 1143jca 1134 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∈ ℙ ∧ ((𝑁 / 𝑃) ∈ ℚ ∧ (𝑁 / 𝑃) ≠ 0) ∧ 𝑏 ∈ ℤ))
116 pcexp 16821 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑄 ∈ ℙ ∧ ((𝑁 / 𝑃) ∈ ℚ ∧ (𝑁 / 𝑃) ≠ 0) ∧ 𝑏 ∈ ℤ) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) = (𝑏 · (𝑄 pCnt (𝑁 / 𝑃))))
117115, 116syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) = (𝑏 · (𝑄 pCnt (𝑁 / 𝑃))))
118117adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) = (𝑏 · (𝑄 pCnt (𝑁 / 𝑃))))
119118eqcomd 2745 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑏 · (𝑄 pCnt (𝑁 / 𝑃))) = (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)))
120 simpr 485 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑑 ∈ ℕ0)
121120nn0zd 12540 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑑 ∈ ℤ)
122100, 112, 1213jca 1134 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∈ ℙ ∧ ((𝑁 / 𝑃) ∈ ℚ ∧ (𝑁 / 𝑃) ≠ 0) ∧ 𝑑 ∈ ℤ))
123 pcexp 16821 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑄 ∈ ℙ ∧ ((𝑁 / 𝑃) ∈ ℚ ∧ (𝑁 / 𝑃) ≠ 0) ∧ 𝑑 ∈ ℤ) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)) = (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))))
124122, 123syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)) = (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))))
125124adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)) = (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))))
126125eqcomd 2745 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))) = (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)))
12799, 119, 1263netr3d 3010 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) ≠ (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)))
12832, 46, 50, 127addneintrd 11344 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (0 + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))) ≠ (0 + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
12975ad4antr 738 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ¬ 𝑄 = 𝑃)
1302ad4antr 738 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑃 ∈ ℙ)
131 simp-4r 789 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑎 ∈ ℕ0)
132 prmdvdsexpr 16678 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑄 ∈ ℙ ∧ 𝑃 ∈ ℙ ∧ 𝑎 ∈ ℕ0) → (𝑄 ∥ (𝑃𝑎) → 𝑄 = 𝑃))
133100, 130, 131, 132syl3anc 1379 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∥ (𝑃𝑎) → 𝑄 = 𝑃))
134133con3d 152 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (¬ 𝑄 = 𝑃 → ¬ 𝑄 ∥ (𝑃𝑎)))
135129, 134mpd 15 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ¬ 𝑄 ∥ (𝑃𝑎))
136 simplr 774 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → 𝑎 ∈ ℕ0)
137106, 136nnexpcld 14198 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → (𝑃𝑎) ∈ ℕ)
138137ad2antrr 732 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑎) ∈ ℕ)
139100, 138jca 516 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∈ ℙ ∧ (𝑃𝑎) ∈ ℕ))
140 pceq0 16833 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑄 ∈ ℙ ∧ (𝑃𝑎) ∈ ℕ) → ((𝑄 pCnt (𝑃𝑎)) = 0 ↔ ¬ 𝑄 ∥ (𝑃𝑎)))
141139, 140syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑄 pCnt (𝑃𝑎)) = 0 ↔ ¬ 𝑄 ∥ (𝑃𝑎)))
142135, 141mpbird 258 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 pCnt (𝑃𝑎)) = 0)
143142eqcomd 2745 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 0 = (𝑄 pCnt (𝑃𝑎)))
144143oveq1d 7371 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (0 + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))) = ((𝑄 pCnt (𝑃𝑎)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))))
145144adantr 481 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (0 + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))) = ((𝑄 pCnt (𝑃𝑎)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))))
146 simplr 774 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑐 ∈ ℕ0)
147 prmdvdsexpr 16678 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑄 ∈ ℙ ∧ 𝑃 ∈ ℙ ∧ 𝑐 ∈ ℕ0) → (𝑄 ∥ (𝑃𝑐) → 𝑄 = 𝑃))
148100, 130, 146, 147syl3anc 1379 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∥ (𝑃𝑐) → 𝑄 = 𝑃))
149129, 148mtod 199 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ¬ 𝑄 ∥ (𝑃𝑐))
150107, 146nnexpcld 14198 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑐) ∈ ℕ)
151100, 150jca 516 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∈ ℙ ∧ (𝑃𝑐) ∈ ℕ))
152 pceq0 16833 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑄 ∈ ℙ ∧ (𝑃𝑐) ∈ ℕ) → ((𝑄 pCnt (𝑃𝑐)) = 0 ↔ ¬ 𝑄 ∥ (𝑃𝑐)))
153151, 152syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑄 pCnt (𝑃𝑐)) = 0 ↔ ¬ 𝑄 ∥ (𝑃𝑐)))
154149, 153mpbird 258 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 pCnt (𝑃𝑐)) = 0)
155154eqcomd 2745 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 0 = (𝑄 pCnt (𝑃𝑐)))
156155oveq1d 7371 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (0 + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))) = ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
157156adantr 481 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (0 + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))) = ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
158128, 145, 1573netr3d 3010 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑄 pCnt (𝑃𝑎)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))) ≠ ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
159107nnzd 12541 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑃 ∈ ℤ)
160159, 131jca 516 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃 ∈ ℤ ∧ 𝑎 ∈ ℕ0))
161 zexpcl 14029 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑃 ∈ ℤ ∧ 𝑎 ∈ ℕ0) → (𝑃𝑎) ∈ ℤ)
162160, 161syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑎) ∈ ℤ)
163131nn0zd 12540 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑎 ∈ ℤ)
164108, 110, 163expne0d 14105 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑎) ≠ 0)
165162, 164jca 516 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑎) ∈ ℤ ∧ (𝑃𝑎) ≠ 0))
16641nnzd 12541 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑁 / 𝑃) ∈ ℤ)
167166, 113jca 516 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃) ∈ ℤ ∧ 𝑏 ∈ ℕ0))
168 zexpcl 14029 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑁 / 𝑃) ∈ ℤ ∧ 𝑏 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑏) ∈ ℤ)
169167, 168syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑏) ∈ ℤ)
170104, 108, 110divcld 11922 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑁 / 𝑃) ∈ ℂ)
171170, 111, 114expne0d 14105 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑏) ≠ 0)
172169, 171jca 516 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑁 / 𝑃)↑𝑏) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑏) ≠ 0))
173100, 165, 1723jca 1134 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∈ ℙ ∧ ((𝑃𝑎) ∈ ℤ ∧ (𝑃𝑎) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑏) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑏) ≠ 0)))
174 pcmul 16813 . . . . . . . . . . . . . . . . . . 19 ((𝑄 ∈ ℙ ∧ ((𝑃𝑎) ∈ ℤ ∧ (𝑃𝑎) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑏) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑏) ≠ 0)) → (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = ((𝑄 pCnt (𝑃𝑎)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))))
175173, 174syl 17 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = ((𝑄 pCnt (𝑃𝑎)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))))
176175adantr 481 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = ((𝑄 pCnt (𝑃𝑎)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))))
177176eqcomd 2745 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑄 pCnt (𝑃𝑎)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))) = (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))))
178150nnzd 12541 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑐) ∈ ℤ)
179150nnne0d 12218 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑐) ≠ 0)
180178, 179jca 516 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑐) ∈ ℤ ∧ (𝑃𝑐) ≠ 0))
18141, 120nnexpcld 14198 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑑) ∈ ℕ)
182181nnzd 12541 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑑) ∈ ℤ)
183181nnne0d 12218 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑑) ≠ 0)
184182, 183jca 516 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑁 / 𝑃)↑𝑑) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑑) ≠ 0))
185100, 180, 1843jca 1134 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∈ ℙ ∧ ((𝑃𝑐) ∈ ℤ ∧ (𝑃𝑐) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑑) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑑) ≠ 0)))
186 pcmul 16813 . . . . . . . . . . . . . . . . . . 19 ((𝑄 ∈ ℙ ∧ ((𝑃𝑐) ∈ ℤ ∧ (𝑃𝑐) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑑) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑑) ≠ 0)) → (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) = ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
187185, 186syl 17 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) = ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
188187adantr 481 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) = ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
189188eqcomd 2745 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))) = (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
190158, 177, 1893netr3d 3010 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
19127, 31, 190rspcedvd 3562 . . . . . . . . . . . . . 14 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ∃𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
1922ad5antr 740 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑃 ∈ ℙ)
193 simpr 485 . . . . . . . . . . . . . . . . 17 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) ∧ 𝑝 = 𝑃) → 𝑝 = 𝑃)
194193oveq1d 7371 . . . . . . . . . . . . . . . 16 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) ∧ 𝑝 = 𝑃) → (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))))
195193oveq1d 7371 . . . . . . . . . . . . . . . 16 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) ∧ 𝑝 = 𝑃) → (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) = (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
196194, 195neeq12d 2995 . . . . . . . . . . . . . . 15 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) ∧ 𝑝 = 𝑃) → ((𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
197130adantr 481 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑃 ∈ ℙ)
198197, 33syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑃 ∈ ℕ)
199 simp-5r 791 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑎 ∈ ℕ0)
200198, 199nnexpcld 14198 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃𝑎) ∈ ℕ)
201197, 200pccld 16812 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑎)) ∈ ℕ0)
202201nn0cnd 12491 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑎)) ∈ ℂ)
203 simpllr 781 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑐 ∈ ℕ0)
204198, 203nnexpcld 14198 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃𝑐) ∈ ℕ)
205197, 204pccld 16812 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑐)) ∈ ℕ0)
206205nn0cnd 12491 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑐)) ∈ ℂ)
20741adantr 481 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑁 / 𝑃) ∈ ℕ)
208 simp-4r 789 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑏 ∈ ℕ0)
209207, 208nnexpcld 14198 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑁 / 𝑃)↑𝑏) ∈ ℕ)
210197, 209pccld 16812 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ0)
211210nn0cnd 12491 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏)) ∈ ℂ)
2128adantl 482 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑎𝑐)
213197, 199jca 516 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 ∈ ℙ ∧ 𝑎 ∈ ℕ0))
214 pcidlem 16834 . . . . . . . . . . . . . . . . . . . . 21 ((𝑃 ∈ ℙ ∧ 𝑎 ∈ ℕ0) → (𝑃 pCnt (𝑃𝑎)) = 𝑎)
215213, 214syl 17 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑎)) = 𝑎)
216215eqcomd 2745 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑎 = (𝑃 pCnt (𝑃𝑎)))
217197, 203jca 516 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 ∈ ℙ ∧ 𝑐 ∈ ℕ0))
218 pcidlem 16834 . . . . . . . . . . . . . . . . . . . . 21 ((𝑃 ∈ ℙ ∧ 𝑐 ∈ ℕ0) → (𝑃 pCnt (𝑃𝑐)) = 𝑐)
219217, 218syl 17 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑐)) = 𝑐)
220219eqcomd 2745 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑐 = (𝑃 pCnt (𝑃𝑐)))
221212, 216, 2203netr3d 3010 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑎)) ≠ (𝑃 pCnt (𝑃𝑐)))
222202, 206, 211, 221addneintr2d 11345 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))) ≠ ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))))
223 eqidd 2740 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))) = ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))))
224 simprl 776 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑏 = 𝑑)
225224oveq2d 7372 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑁 / 𝑃)↑𝑏) = ((𝑁 / 𝑃)↑𝑑))
226225oveq2d 7372 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏)) = (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑)))
227226oveq2d 7372 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))) = ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑))))
228222, 223, 2273netr3d 3010 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))) ≠ ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑))))
229130, 165, 1723jca 1134 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃 ∈ ℙ ∧ ((𝑃𝑎) ∈ ℤ ∧ (𝑃𝑎) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑏) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑏) ≠ 0)))
230 pcmul 16813 . . . . . . . . . . . . . . . . . . 19 ((𝑃 ∈ ℙ ∧ ((𝑃𝑎) ∈ ℤ ∧ (𝑃𝑎) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑏) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑏) ≠ 0)) → (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))))
231229, 230syl 17 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))))
232231eqcomd 2745 . . . . . . . . . . . . . . . . 17 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))) = (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))))
233232adantr 481 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))) = (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))))
234130, 180, 1843jca 1134 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃 ∈ ℙ ∧ ((𝑃𝑐) ∈ ℤ ∧ (𝑃𝑐) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑑) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑑) ≠ 0)))
235 pcmul 16813 . . . . . . . . . . . . . . . . . . 19 ((𝑃 ∈ ℙ ∧ ((𝑃𝑐) ∈ ℤ ∧ (𝑃𝑐) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑑) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑑) ≠ 0)) → (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) = ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑))))
236235eqcomd 2745 . . . . . . . . . . . . . . . . . 18 ((𝑃 ∈ ℙ ∧ ((𝑃𝑐) ∈ ℤ ∧ (𝑃𝑐) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑑) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑑) ≠ 0)) → ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑))) = (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
237234, 236syl 17 . . . . . . . . . . . . . . . . 17 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑))) = (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
238237adantr 481 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑))) = (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
239228, 233, 2383netr3d 3010 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
240192, 196, 239rspcedvd 3562 . . . . . . . . . . . . . 14 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ∃𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
241191, 240jaodan 965 . . . . . . . . . . . . 13 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐))) → ∃𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
242 biidd 263 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
243242necon3abid 2970 . . . . . . . . . . . . . . . . 17 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ¬ ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
244 simpr 485 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → 𝑏 ∈ ℕ0)
24540, 244nnexpcld 14198 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑏) ∈ ℕ)
246137, 245nnmulcld 12221 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ)
247246adantr 481 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) → ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ)
248247adantr 481 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ)
249248nnnn0d 12489 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ0)
250150, 181nnmulcld 12221 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ∈ ℕ)
251250nnnn0d 12489 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ∈ ℕ0)
252249, 251jca 516 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ0 ∧ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ∈ ℕ0))
253 pc11 16842 . . . . . . . . . . . . . . . . . . 19 ((((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ0 ∧ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ∀𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
254252, 253syl 17 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ∀𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
255254notbid 319 . . . . . . . . . . . . . . . . 17 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (¬ ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ¬ ∀𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
256243, 255bitrd 280 . . . . . . . . . . . . . . . 16 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ¬ ∀𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
257 rexnal 3091 . . . . . . . . . . . . . . . . . 18 (∃𝑝 ∈ ℙ ¬ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ ¬ ∀𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
258257bicomi 225 . . . . . . . . . . . . . . . . 17 (¬ ∀𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ ∃𝑝 ∈ ℙ ¬ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
259258a1i 11 . . . . . . . . . . . . . . . 16 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (¬ ∀𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ ∃𝑝 ∈ ℙ ¬ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
260256, 259bitrd 280 . . . . . . . . . . . . . . 15 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ∃𝑝 ∈ ℙ ¬ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
261 biidd 263 . . . . . . . . . . . . . . . . 17 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
262261necon3bbid 2971 . . . . . . . . . . . . . . . 16 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (¬ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
263262rexbidv 3163 . . . . . . . . . . . . . . 15 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (∃𝑝 ∈ ℙ ¬ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ ∃𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
264260, 263bitrd 280 . . . . . . . . . . . . . 14 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ∃𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
265264adantr 481 . . . . . . . . . . . . 13 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐))) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ∃𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
266241, 265mpbird 258 . . . . . . . . . . . 12 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐))) → ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))
26725, 266sylan2br 601 . . . . . . . . . . 11 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ ¬ (𝑎 = 𝑐𝑏 = 𝑑)) → ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))
2684a1i 11 . . . . . . . . . . . . . 14 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝐸 = (𝑘 ∈ ℕ0, 𝑙 ∈ ℕ0 ↦ ((𝑃𝑘) · ((𝑁 / 𝑃)↑𝑙))))
269 simprl 776 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑎𝑙 = 𝑏)) → 𝑘 = 𝑎)
270269oveq2d 7372 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑎𝑙 = 𝑏)) → (𝑃𝑘) = (𝑃𝑎))
271 simprr 778 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑎𝑙 = 𝑏)) → 𝑙 = 𝑏)
272271oveq2d 7372 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑎𝑙 = 𝑏)) → ((𝑁 / 𝑃)↑𝑙) = ((𝑁 / 𝑃)↑𝑏))
273270, 272oveq12d 7374 . . . . . . . . . . . . . 14 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑎𝑙 = 𝑏)) → ((𝑃𝑘) · ((𝑁 / 𝑃)↑𝑙)) = ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)))
274268, 273, 131, 113, 248ovmpod 7508 . . . . . . . . . . . . 13 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑎𝐸𝑏) = ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)))
275 simprl 776 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑐𝑙 = 𝑑)) → 𝑘 = 𝑐)
276275oveq2d 7372 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑐𝑙 = 𝑑)) → (𝑃𝑘) = (𝑃𝑐))
277 simprr 778 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑐𝑙 = 𝑑)) → 𝑙 = 𝑑)
278277oveq2d 7372 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑐𝑙 = 𝑑)) → ((𝑁 / 𝑃)↑𝑙) = ((𝑁 / 𝑃)↑𝑑))
279276, 278oveq12d 7374 . . . . . . . . . . . . . 14 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑐𝑙 = 𝑑)) → ((𝑃𝑘) · ((𝑁 / 𝑃)↑𝑙)) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))
280268, 279, 146, 120, 250ovmpod 7508 . . . . . . . . . . . . 13 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑐𝐸𝑑) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))
281274, 280neeq12d 2995 . . . . . . . . . . . 12 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑎𝐸𝑏) ≠ (𝑐𝐸𝑑) ↔ ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
282281adantr 481 . . . . . . . . . . 11 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ ¬ (𝑎 = 𝑐𝑏 = 𝑑)) → ((𝑎𝐸𝑏) ≠ (𝑐𝐸𝑑) ↔ ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
283267, 282mpbird 258 . . . . . . . . . 10 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ ¬ (𝑎 = 𝑐𝑏 = 𝑑)) → (𝑎𝐸𝑏) ≠ (𝑐𝐸𝑑))
284283neneqd 2939 . . . . . . . . 9 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ ¬ (𝑎 = 𝑐𝑏 = 𝑑)) → ¬ (𝑎𝐸𝑏) = (𝑐𝐸𝑑))
285284ex 413 . . . . . . . 8 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (¬ (𝑎 = 𝑐𝑏 = 𝑑) → ¬ (𝑎𝐸𝑏) = (𝑐𝐸𝑑)))
286285con4d 115 . . . . . . 7 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑)))
287286ralrimiva 3131 . . . . . 6 ((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) → ∀𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑)))
288287ralrimiva 3131 . . . . 5 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → ∀𝑐 ∈ ℕ0𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑)))
289288ralrimiva 3131 . . . 4 ((𝜑𝑎 ∈ ℕ0) → ∀𝑏 ∈ ℕ0𝑐 ∈ ℕ0𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑)))
290289ralrimiva 3131 . . 3 (𝜑 → ∀𝑎 ∈ ℕ0𝑏 ∈ ℕ0𝑐 ∈ ℕ0𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑)))
2915, 290jca 516 . 2 (𝜑 → (𝐸:(ℕ0 × ℕ0)⟶ℕ ∧ ∀𝑎 ∈ ℕ0𝑏 ∈ ℕ0𝑐 ∈ ℕ0𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑))))
292 f1opr 7412 . 2 (𝐸:(ℕ0 × ℕ0)–1-1→ℕ ↔ (𝐸:(ℕ0 × ℕ0)⟶ℕ ∧ ∀𝑎 ∈ ℕ0𝑏 ∈ ℕ0𝑐 ∈ ℕ0𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑))))
293291, 292sylibr 235 1 (𝜑𝐸:(ℕ0 × ℕ0)–1-1→ℕ)
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 207  wa 396  wo 853  w3a 1092   = wceq 1547  wcel 2119  wne 2934  wral 3053  wrex 3063   class class class wbr 5072   × cxp 5616  wf 6481  1-1wf1 6482  (class class class)co 7356  cmpo 7358  0cc0 11029  1c1 11030   + caddc 11032   · cmul 11034   < clt 11170   / cdiv 11798  cn 12165  0cn0 12428  cz 12515  cq 12889  cexp 14014  cdvds 16212  cprime 16631   pCnt cpc 16798
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1802  ax-4 1816  ax-5 1917  ax-6 1974  ax-7 2015  ax-8 2121  ax-9 2129  ax-10 2152  ax-11 2168  ax-12 2189  ax-ext 2711  ax-sep 5218  ax-nul 5228  ax-pow 5294  ax-pr 5362  ax-un 7678  ax-cnex 11085  ax-resscn 11086  ax-1cn 11087  ax-icn 11088  ax-addcl 11089  ax-addrcl 11090  ax-mulcl 11091  ax-mulrcl 11092  ax-mulcom 11093  ax-addass 11094  ax-mulass 11095  ax-distr 11096  ax-i2m1 11097  ax-1ne0 11098  ax-1rid 11099  ax-rnegex 11100  ax-rrecex 11101  ax-cnre 11102  ax-pre-lttri 11103  ax-pre-lttrn 11104  ax-pre-ltadd 11105  ax-pre-mulgt0 11106  ax-pre-sup 11107
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 854  df-3or 1093  df-3an 1094  df-tru 1550  df-fal 1560  df-ex 1787  df-nf 1791  df-sb 2074  df-mo 2543  df-eu 2573  df-clab 2718  df-cleq 2731  df-clel 2814  df-nfc 2888  df-ne 2935  df-nel 3039  df-ral 3054  df-rex 3064  df-rmo 3344  df-reu 3345  df-rab 3392  df-v 3433  df-sbc 3724  df-csb 3832  df-dif 3886  df-un 3888  df-in 3890  df-ss 3900  df-pss 3903  df-nul 4262  df-if 4455  df-pw 4531  df-sn 4556  df-pr 4558  df-op 4562  df-uni 4839  df-iun 4923  df-br 5073  df-opab 5135  df-mpt 5154  df-tr 5180  df-id 5513  df-eprel 5518  df-po 5526  df-so 5527  df-fr 5571  df-we 5573  df-xp 5624  df-rel 5625  df-cnv 5626  df-co 5627  df-dm 5628  df-rn 5629  df-res 5630  df-ima 5631  df-pred 6252  df-ord 6313  df-on 6314  df-lim 6315  df-suc 6316  df-iota 6441  df-fun 6487  df-fn 6488  df-f 6489  df-f1 6490  df-fo 6491  df-f1o 6492  df-fv 6493  df-riota 7313  df-ov 7359  df-oprab 7360  df-mpo 7361  df-om 7807  df-1st 7931  df-2nd 7932  df-frecs 8221  df-wrecs 8252  df-recs 8301  df-rdg 8339  df-1o 8395  df-2o 8396  df-er 8633  df-en 8884  df-dom 8885  df-sdom 8886  df-fin 8887  df-sup 9345  df-inf 9346  df-pnf 11172  df-mnf 11173  df-xr 11174  df-ltxr 11175  df-le 11176  df-sub 11370  df-neg 11371  df-div 11799  df-nn 12166  df-2 12235  df-3 12236  df-n0 12429  df-z 12516  df-uz 12780  df-q 12890  df-rp 12934  df-fz 13453  df-fl 13742  df-mod 13820  df-seq 13955  df-exp 14015  df-cj 15052  df-re 15053  df-im 15054  df-sqrt 15188  df-abs 15189  df-dvds 16213  df-gcd 16455  df-prm 16632  df-pc 16799
This theorem is referenced by:  aks6d1c2  42615
  Copyright terms: Public domain W3C validator