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 42107
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 42106 . . 3 (𝜑𝐸:(ℕ0 × ℕ0)⟶ℕ)
6 neneq 2931 . . . . . . . . . . . . . . . . 17 (𝑏𝑑 → ¬ 𝑏 = 𝑑)
76orcd 873 . . . . . . . . . . . . . . . 16 (𝑏𝑑 → (¬ 𝑏 = 𝑑 ∨ ¬ 𝑎 = 𝑐))
8 simpr 484 . . . . . . . . . . . . . . . . . 18 ((𝑏 = 𝑑𝑎𝑐) → 𝑎𝑐)
98neneqd 2930 . . . . . . . . . . . . . . . . 17 ((𝑏 = 𝑑𝑎𝑐) → ¬ 𝑎 = 𝑐)
109olcd 874 . . . . . . . . . . . . . . . 16 ((𝑏 = 𝑑𝑎𝑐) → (¬ 𝑏 = 𝑑 ∨ ¬ 𝑎 = 𝑐))
117, 10jaoi 857 . . . . . . . . . . . . . . 15 ((𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)) → (¬ 𝑏 = 𝑑 ∨ ¬ 𝑎 = 𝑐))
12 neqne 2933 . . . . . . . . . . . . . . . . 17 𝑏 = 𝑑𝑏𝑑)
1312orcd 873 . . . . . . . . . . . . . . . 16 𝑏 = 𝑑 → (𝑏𝑑 ∨ (𝑏 = 𝑑𝑎𝑐)))
14 neqne 2933 . . . . . . . . . . . . . . . . . . 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 7402 . . . . . . . . . . . . . . . 16 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) ∧ 𝑝 = 𝑄) → (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))))
3028oveq1d 7402 . . . . . . . . . . . . . . . 16 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) ∧ 𝑝 = 𝑄) → (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) = (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
3129, 30neeq12d 2986 . . . . . . . . . . . . . . 15 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) ∧ 𝑝 = 𝑄) → ((𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
32 0cnd 11167 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 0 ∈ ℂ)
33 prmnn 16644 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑃 ∈ ℙ → 𝑃 ∈ ℕ)
342, 33syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑𝑃 ∈ ℕ)
351, 34jca 511 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → (𝑁 ∈ ℕ ∧ 𝑃 ∈ ℕ))
36 nndivdvds 16231 . . . . . . . . . . . . . . . . . . . . . . . . . . 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 14210 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑁 / 𝑃)↑𝑏) ∈ ℕ)
4527, 44pccld 16821 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ0)
4645nn0cnd 12505 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) ∈ ℂ)
47 simplr 768 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝑑 ∈ ℕ0)
4842, 47nnexpcld 14210 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑁 / 𝑃)↑𝑑) ∈ ℕ)
4927, 48pccld 16821 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)) ∈ ℕ0)
5049nn0cnd 12505 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)) ∈ ℂ)
51 simpr 484 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝑏𝑑)
5243nn0cnd 12505 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝑏 ∈ ℂ)
5347nn0cnd 12505 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝑑 ∈ ℂ)
5427, 42pccld 16821 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt (𝑁 / 𝑃)) ∈ ℕ0)
5554nn0cnd 12505 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt (𝑁 / 𝑃)) ∈ ℂ)
56 simp-5l 784 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → 𝜑)
57 aks6d1c2p2.6 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑𝑄𝑁)
581nncnd 12202 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑𝑁 ∈ ℂ)
5934nncnd 12202 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑𝑃 ∈ ℂ)
6034nnne0d 12236 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑𝑃 ≠ 0)
6158, 59, 60divcan2d 11960 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝜑 → (𝑃 · (𝑁 / 𝑃)) = 𝑁)
6261eqcomd 2735 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑𝑁 = (𝑃 · (𝑁 / 𝑃)))
6362breq2d 5119 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑 → (𝑄𝑁𝑄 ∥ (𝑃 · (𝑁 / 𝑃))))
6457, 63mpbid 232 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑𝑄 ∥ (𝑃 · (𝑁 / 𝑃)))
6534nnzd 12556 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑𝑃 ∈ ℤ)
6638nnzd 12556 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑 → (𝑁 / 𝑃) ∈ ℤ)
67 euclemma 16683 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑄 ∈ ℙ ∧ 𝑃 ∈ ℤ ∧ (𝑁 / 𝑃) ∈ ℤ) → (𝑄 ∥ (𝑃 · (𝑁 / 𝑃)) ↔ (𝑄𝑃𝑄 ∥ (𝑁 / 𝑃))))
6826, 65, 66, 67syl3anc 1373 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑 → (𝑄 ∥ (𝑃 · (𝑁 / 𝑃)) ↔ (𝑄𝑃𝑄 ∥ (𝑁 / 𝑃))))
6968biimpd 229 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → (𝑄 ∥ (𝑃 · (𝑁 / 𝑃)) → (𝑄𝑃𝑄 ∥ (𝑁 / 𝑃))))
7064, 69mpd 15 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → (𝑄𝑃𝑄 ∥ (𝑁 / 𝑃)))
71 aks6d1c2p2.7 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑𝑃𝑄)
72 necom 2978 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝑃𝑄𝑄𝑃)
7372imbi2i 336 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 ((𝜑𝑃𝑄) ↔ (𝜑𝑄𝑃))
7471, 73mpbi 230 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝜑𝑄𝑃)
7574neneqd 2930 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑 → ¬ 𝑄 = 𝑃)
76 1red 11175 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝜑 → 1 ∈ ℝ)
77 prmgt1 16667 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 33 (𝑄 ∈ ℙ → 1 < 𝑄)
7826, 77syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 32 (𝜑 → 1 < 𝑄)
7976, 78ltned 11310 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31 (𝜑 → 1 ≠ 𝑄)
8079necomd 2980 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝜑𝑄 ≠ 1)
8180neneqd 2930 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝜑 → ¬ 𝑄 = 1)
8275, 81jca 511 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑 → (¬ 𝑄 = 𝑃 ∧ ¬ 𝑄 = 1))
83 pm4.56 990 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((¬ 𝑄 = 𝑃 ∧ ¬ 𝑄 = 1) ↔ ¬ (𝑄 = 𝑃𝑄 = 1))
8482, 83sylib 218 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → ¬ (𝑄 = 𝑃𝑄 = 1))
85 prmnn 16644 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑄 ∈ ℙ → 𝑄 ∈ ℕ)
8626, 85syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝜑𝑄 ∈ ℕ)
87 dvdsprime 16657 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝑃 ∈ ℙ ∧ 𝑄 ∈ ℕ) → (𝑄𝑃 ↔ (𝑄 = 𝑃𝑄 = 1)))
882, 86, 87syl2anc 584 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝜑 → (𝑄𝑃 ↔ (𝑄 = 𝑃𝑄 = 1)))
8984, 88mtbird 325 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → ¬ 𝑄𝑃)
9070, 89orcnd 878 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑𝑄 ∥ (𝑁 / 𝑃))
9126, 38jca 511 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝜑 → (𝑄 ∈ ℙ ∧ (𝑁 / 𝑃) ∈ ℕ))
92 pcelnn 16841 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑄 ∈ ℙ ∧ (𝑁 / 𝑃) ∈ ℕ) → ((𝑄 pCnt (𝑁 / 𝑃)) ∈ ℕ ↔ 𝑄 ∥ (𝑁 / 𝑃)))
9391, 92syl 17 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝜑 → ((𝑄 pCnt (𝑁 / 𝑃)) ∈ ℕ ↔ 𝑄 ∥ (𝑁 / 𝑃)))
9490, 93mpbird 257 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝜑 → (𝑄 pCnt (𝑁 / 𝑃)) ∈ ℕ)
9556, 94syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt (𝑁 / 𝑃)) ∈ ℕ)
9695nnne0d 12236 . . . . . . . . . . . . . . . . . . . . . 22 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt (𝑁 / 𝑃)) ≠ 0)
9752, 53, 55, 96mulcan2d 11812 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑏 · (𝑄 pCnt (𝑁 / 𝑃))) = (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))) ↔ 𝑏 = 𝑑))
9897necon3bid 2969 . . . . . . . . . . . . . . . . . . . 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 12921 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑁 / 𝑃) ∈ ℕ → (𝑁 / 𝑃) ∈ ℚ)
10241, 101syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑁 / 𝑃) ∈ ℚ)
1031ad4antr 732 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑁 ∈ ℕ)
104103nncnd 12202 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑁 ∈ ℂ)
10534adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 ((𝜑𝑎 ∈ ℕ0) → 𝑃 ∈ ℕ)
106105adantr 480 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → 𝑃 ∈ ℕ)
107106ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑃 ∈ ℕ)
108107nncnd 12202 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑃 ∈ ℂ)
109103nnne0d 12236 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑁 ≠ 0)
110107nnne0d 12236 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑃 ≠ 0)
111104, 108, 109, 110divne0d 11974 . . . . . . . . . . . . . . . . . . . . . . . 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 12555 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑏 ∈ ℤ)
115100, 112, 1143jca 1128 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∈ ℙ ∧ ((𝑁 / 𝑃) ∈ ℚ ∧ (𝑁 / 𝑃) ≠ 0) ∧ 𝑏 ∈ ℤ))
116 pcexp 16830 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑄 ∈ ℙ ∧ ((𝑁 / 𝑃) ∈ ℚ ∧ (𝑁 / 𝑃) ≠ 0) ∧ 𝑏 ∈ ℤ) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) = (𝑏 · (𝑄 pCnt (𝑁 / 𝑃))))
117115, 116syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) = (𝑏 · (𝑄 pCnt (𝑁 / 𝑃))))
118117adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) = (𝑏 · (𝑄 pCnt (𝑁 / 𝑃))))
119118eqcomd 2735 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑏 · (𝑄 pCnt (𝑁 / 𝑃))) = (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)))
120 simpr 484 . . . . . . . . . . . . . . . . . . . . . . . 24 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑑 ∈ ℕ0)
121120nn0zd 12555 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑑 ∈ ℤ)
122100, 112, 1213jca 1128 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∈ ℙ ∧ ((𝑁 / 𝑃) ∈ ℚ ∧ (𝑁 / 𝑃) ≠ 0) ∧ 𝑑 ∈ ℤ))
123 pcexp 16830 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑄 ∈ ℙ ∧ ((𝑁 / 𝑃) ∈ ℚ ∧ (𝑁 / 𝑃) ≠ 0) ∧ 𝑑 ∈ ℤ) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)) = (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))))
124122, 123syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)) = (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))))
125124adantr 480 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)) = (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))))
126125eqcomd 2735 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑑 · (𝑄 pCnt (𝑁 / 𝑃))) = (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)))
12799, 119, 1263netr3d 3001 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏)) ≠ (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑)))
12832, 46, 50, 127addneintrd 11381 . . . . . . . . . . . . . . . . 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 16687 . . . . . . . . . . . . . . . . . . . . . . . 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 14210 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → (𝑃𝑎) ∈ ℕ)
138137ad2antrr 726 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑎) ∈ ℕ)
139100, 138jca 511 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∈ ℙ ∧ (𝑃𝑎) ∈ ℕ))
140 pceq0 16842 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑄 ∈ ℙ ∧ (𝑃𝑎) ∈ ℕ) → ((𝑄 pCnt (𝑃𝑎)) = 0 ↔ ¬ 𝑄 ∥ (𝑃𝑎)))
141139, 140syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑄 pCnt (𝑃𝑎)) = 0 ↔ ¬ 𝑄 ∥ (𝑃𝑎)))
142135, 141mpbird 257 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 pCnt (𝑃𝑎)) = 0)
143142eqcomd 2735 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 0 = (𝑄 pCnt (𝑃𝑎)))
144143oveq1d 7402 . . . . . . . . . . . . . . . . . 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 16687 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝑄 ∈ ℙ ∧ 𝑃 ∈ ℙ ∧ 𝑐 ∈ ℕ0) → (𝑄 ∥ (𝑃𝑐) → 𝑄 = 𝑃))
148100, 130, 146, 147syl3anc 1373 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∥ (𝑃𝑐) → 𝑄 = 𝑃))
149129, 148mtod 198 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ¬ 𝑄 ∥ (𝑃𝑐))
150107, 146nnexpcld 14210 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑐) ∈ ℕ)
151100, 150jca 511 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 ∈ ℙ ∧ (𝑃𝑐) ∈ ℕ))
152 pceq0 16842 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑄 ∈ ℙ ∧ (𝑃𝑐) ∈ ℕ) → ((𝑄 pCnt (𝑃𝑐)) = 0 ↔ ¬ 𝑄 ∥ (𝑃𝑐)))
153151, 152syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑄 pCnt (𝑃𝑐)) = 0 ↔ ¬ 𝑄 ∥ (𝑃𝑐)))
154149, 153mpbird 257 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑄 pCnt (𝑃𝑐)) = 0)
155154eqcomd 2735 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 0 = (𝑄 pCnt (𝑃𝑐)))
156155oveq1d 7402 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (0 + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))) = ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
157156adantr 480 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (0 + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))) = ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
158128, 145, 1573netr3d 3001 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑄 pCnt (𝑃𝑎)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))) ≠ ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))))
159107nnzd 12556 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑃 ∈ ℤ)
160159, 131jca 511 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃 ∈ ℤ ∧ 𝑎 ∈ ℕ0))
161 zexpcl 14041 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑃 ∈ ℤ ∧ 𝑎 ∈ ℕ0) → (𝑃𝑎) ∈ ℤ)
162160, 161syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑎) ∈ ℤ)
163131nn0zd 12555 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → 𝑎 ∈ ℤ)
164108, 110, 163expne0d 14117 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑎) ≠ 0)
165162, 164jca 511 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑎) ∈ ℤ ∧ (𝑃𝑎) ≠ 0))
16641nnzd 12556 . . . . . . . . . . . . . . . . . . . . . . 23 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑁 / 𝑃) ∈ ℤ)
167166, 113jca 511 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃) ∈ ℤ ∧ 𝑏 ∈ ℕ0))
168 zexpcl 14041 . . . . . . . . . . . . . . . . . . . . . 22 (((𝑁 / 𝑃) ∈ ℤ ∧ 𝑏 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑏) ∈ ℤ)
169167, 168syl 17 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑏) ∈ ℤ)
170104, 108, 110divcld 11958 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑁 / 𝑃) ∈ ℂ)
171170, 111, 114expne0d 14117 . . . . . . . . . . . . . . . . . . . . 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 16822 . . . . . . . . . . . . . . . . . . 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 2735 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑄 pCnt (𝑃𝑎)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑏))) = (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))))
178150nnzd 12556 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑐) ∈ ℤ)
179150nnne0d 12236 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃𝑐) ≠ 0)
180178, 179jca 511 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑐) ∈ ℤ ∧ (𝑃𝑐) ≠ 0))
18141, 120nnexpcld 14210 . . . . . . . . . . . . . . . . . . . . . 22 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑑) ∈ ℕ)
182181nnzd 12556 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑑) ∈ ℤ)
183181nnne0d 12236 . . . . . . . . . . . . . . . . . . . . 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 16822 . . . . . . . . . . . . . . . . . . 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 2735 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ((𝑄 pCnt (𝑃𝑐)) + (𝑄 pCnt ((𝑁 / 𝑃)↑𝑑))) = (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
190158, 177, 1893netr3d 3001 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → (𝑄 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑄 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
19127, 31, 190rspcedvd 3590 . . . . . . . . . . . . . 14 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ 𝑏𝑑) → ∃𝑝 ∈ ℙ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
1922ad5antr 734 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑃 ∈ ℙ)
193 simpr 484 . . . . . . . . . . . . . . . . 17 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) ∧ 𝑝 = 𝑃) → 𝑝 = 𝑃)
194193oveq1d 7402 . . . . . . . . . . . . . . . 16 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) ∧ 𝑝 = 𝑃) → (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))))
195193oveq1d 7402 . . . . . . . . . . . . . . . 16 (((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) ∧ 𝑝 = 𝑃) → (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) = (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
196194, 195neeq12d 2986 . . . . . . . . . . . . . . 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 14210 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃𝑎) ∈ ℕ)
201197, 200pccld 16821 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑎)) ∈ ℕ0)
202201nn0cnd 12505 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑎)) ∈ ℂ)
203 simpllr 775 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑐 ∈ ℕ0)
204198, 203nnexpcld 14210 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃𝑐) ∈ ℕ)
205197, 204pccld 16821 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑐)) ∈ ℕ0)
206205nn0cnd 12505 . . . . . . . . . . . . . . . . . 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 14210 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑁 / 𝑃)↑𝑏) ∈ ℕ)
210197, 209pccld 16821 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ0)
211210nn0cnd 12505 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏)) ∈ ℂ)
2128adantl 481 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑎𝑐)
213197, 199jca 511 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 ∈ ℙ ∧ 𝑎 ∈ ℕ0))
214 pcidlem 16843 . . . . . . . . . . . . . . . . . . . . 21 ((𝑃 ∈ ℙ ∧ 𝑎 ∈ ℕ0) → (𝑃 pCnt (𝑃𝑎)) = 𝑎)
215213, 214syl 17 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑎)) = 𝑎)
216215eqcomd 2735 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑎 = (𝑃 pCnt (𝑃𝑎)))
217197, 203jca 511 . . . . . . . . . . . . . . . . . . . . 21 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 ∈ ℙ ∧ 𝑐 ∈ ℕ0))
218 pcidlem 16843 . . . . . . . . . . . . . . . . . . . . 21 ((𝑃 ∈ ℙ ∧ 𝑐 ∈ ℕ0) → (𝑃 pCnt (𝑃𝑐)) = 𝑐)
219217, 218syl 17 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑐)) = 𝑐)
220219eqcomd 2735 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑐 = (𝑃 pCnt (𝑃𝑐)))
221212, 216, 2203netr3d 3001 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt (𝑃𝑎)) ≠ (𝑃 pCnt (𝑃𝑐)))
222202, 206, 211, 221addneintr2d 11382 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))) ≠ ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))))
223 eqidd 2730 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))) = ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))))
224 simprl 770 . . . . . . . . . . . . . . . . . . . 20 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → 𝑏 = 𝑑)
225224oveq2d 7403 . . . . . . . . . . . . . . . . . . 19 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑁 / 𝑃)↑𝑏) = ((𝑁 / 𝑃)↑𝑑))
226225oveq2d 7403 . . . . . . . . . . . . . . . . . 18 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏)) = (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑)))
227226oveq2d 7403 . . . . . . . . . . . . . . . . 17 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))) = ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑))))
228222, 223, 2273netr3d 3001 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))) ≠ ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑))))
229130, 165, 1723jca 1128 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃 ∈ ℙ ∧ ((𝑃𝑎) ∈ ℤ ∧ (𝑃𝑎) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑏) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑏) ≠ 0)))
230 pcmul 16822 . . . . . . . . . . . . . . . . . . 19 ((𝑃 ∈ ℙ ∧ ((𝑃𝑎) ∈ ℤ ∧ (𝑃𝑎) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑏) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑏) ≠ 0)) → (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))))
231229, 230syl 17 . . . . . . . . . . . . . . . . . 18 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = ((𝑃 pCnt (𝑃𝑎)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑏))))
232231eqcomd 2735 . . . . . . . . . . . . . . . . 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 16822 . . . . . . . . . . . . . . . . . . 19 ((𝑃 ∈ ℙ ∧ ((𝑃𝑐) ∈ ℤ ∧ (𝑃𝑐) ≠ 0) ∧ (((𝑁 / 𝑃)↑𝑑) ∈ ℤ ∧ ((𝑁 / 𝑃)↑𝑑) ≠ 0)) → (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) = ((𝑃 pCnt (𝑃𝑐)) + (𝑃 pCnt ((𝑁 / 𝑃)↑𝑑))))
236235eqcomd 2735 . . . . . . . . . . . . . . . . . 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 3001 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑏 = 𝑑𝑎𝑐)) → (𝑃 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑃 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
240192, 196, 239rspcedvd 3590 . . . . . . . . . . . . . 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 2961 . . . . . . . . . . . . . . . . 17 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ↔ ¬ ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
244 simpr 484 . . . . . . . . . . . . . . . . . . . . . . . . 25 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → 𝑏 ∈ ℕ0)
24540, 244nnexpcld 14210 . . . . . . . . . . . . . . . . . . . . . . . 24 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → ((𝑁 / 𝑃)↑𝑏) ∈ ℕ)
246137, 245nnmulcld 12239 . . . . . . . . . . . . . . . . . . . . . . 23 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ)
247246adantr 480 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) → ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ)
248247adantr 480 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ)
249248nnnn0d 12503 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ0)
250150, 181nnmulcld 12239 . . . . . . . . . . . . . . . . . . . . 21 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ∈ ℕ)
251250nnnn0d 12503 . . . . . . . . . . . . . . . . . . . 20 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ∈ ℕ0)
252249, 251jca 511 . . . . . . . . . . . . . . . . . . 19 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ∈ ℕ0 ∧ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)) ∈ ℕ0))
253 pc11 16851 . . . . . . . . . . . . . . . . . . 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 3082 . . . . . . . . . . . . . . . . . 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 2962 . . . . . . . . . . . . . . . 16 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (¬ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) = (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))) ↔ (𝑝 pCnt ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏))) ≠ (𝑝 pCnt ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))))
263262rexbidv 3157 . . . . . . . . . . . . . . 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 7403 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑎𝑙 = 𝑏)) → (𝑃𝑘) = (𝑃𝑎))
271 simprr 772 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑎𝑙 = 𝑏)) → 𝑙 = 𝑏)
272271oveq2d 7403 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑎𝑙 = 𝑏)) → ((𝑁 / 𝑃)↑𝑙) = ((𝑁 / 𝑃)↑𝑏))
273270, 272oveq12d 7405 . . . . . . . . . . . . . 14 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑎𝑙 = 𝑏)) → ((𝑃𝑘) · ((𝑁 / 𝑃)↑𝑙)) = ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)))
274268, 273, 131, 113, 248ovmpod 7541 . . . . . . . . . . . . 13 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑎𝐸𝑏) = ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)))
275 simprl 770 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑐𝑙 = 𝑑)) → 𝑘 = 𝑐)
276275oveq2d 7403 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑐𝑙 = 𝑑)) → (𝑃𝑘) = (𝑃𝑐))
277 simprr 772 . . . . . . . . . . . . . . . 16 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑐𝑙 = 𝑑)) → 𝑙 = 𝑑)
278277oveq2d 7403 . . . . . . . . . . . . . . 15 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑐𝑙 = 𝑑)) → ((𝑁 / 𝑃)↑𝑙) = ((𝑁 / 𝑃)↑𝑑))
279276, 278oveq12d 7405 . . . . . . . . . . . . . 14 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ (𝑘 = 𝑐𝑙 = 𝑑)) → ((𝑃𝑘) · ((𝑁 / 𝑃)↑𝑙)) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))
280268, 279, 146, 120, 250ovmpod 7541 . . . . . . . . . . . . 13 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (𝑐𝐸𝑑) = ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑)))
281274, 280neeq12d 2986 . . . . . . . . . . . 12 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑎𝐸𝑏) ≠ (𝑐𝐸𝑑) ↔ ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
282281adantr 480 . . . . . . . . . . 11 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ ¬ (𝑎 = 𝑐𝑏 = 𝑑)) → ((𝑎𝐸𝑏) ≠ (𝑐𝐸𝑑) ↔ ((𝑃𝑎) · ((𝑁 / 𝑃)↑𝑏)) ≠ ((𝑃𝑐) · ((𝑁 / 𝑃)↑𝑑))))
283267, 282mpbird 257 . . . . . . . . . 10 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ ¬ (𝑎 = 𝑐𝑏 = 𝑑)) → (𝑎𝐸𝑏) ≠ (𝑐𝐸𝑑))
284283neneqd 2930 . . . . . . . . 9 ((((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) ∧ ¬ (𝑎 = 𝑐𝑏 = 𝑑)) → ¬ (𝑎𝐸𝑏) = (𝑐𝐸𝑑))
285284ex 412 . . . . . . . 8 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → (¬ (𝑎 = 𝑐𝑏 = 𝑑) → ¬ (𝑎𝐸𝑏) = (𝑐𝐸𝑑)))
286285con4d 115 . . . . . . 7 (((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) ∧ 𝑑 ∈ ℕ0) → ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑)))
287286ralrimiva 3125 . . . . . 6 ((((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) ∧ 𝑐 ∈ ℕ0) → ∀𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑)))
288287ralrimiva 3125 . . . . 5 (((𝜑𝑎 ∈ ℕ0) ∧ 𝑏 ∈ ℕ0) → ∀𝑐 ∈ ℕ0𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑)))
289288ralrimiva 3125 . . . 4 ((𝜑𝑎 ∈ ℕ0) → ∀𝑏 ∈ ℕ0𝑐 ∈ ℕ0𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑)))
290289ralrimiva 3125 . . 3 (𝜑 → ∀𝑎 ∈ ℕ0𝑏 ∈ ℕ0𝑐 ∈ ℕ0𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑)))
2915, 290jca 511 . 2 (𝜑 → (𝐸:(ℕ0 × ℕ0)⟶ℕ ∧ ∀𝑎 ∈ ℕ0𝑏 ∈ ℕ0𝑐 ∈ ℕ0𝑑 ∈ ℕ0 ((𝑎𝐸𝑏) = (𝑐𝐸𝑑) → (𝑎 = 𝑐𝑏 = 𝑑))))
292 f1opr 7445 . 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 2925  wral 3044  wrex 3053   class class class wbr 5107   × cxp 5636  wf 6507  1-1wf1 6508  (class class class)co 7387  cmpo 7389  0cc0 11068  1c1 11069   + caddc 11071   · cmul 11073   < clt 11208   / cdiv 11835  cn 12186  0cn0 12442  cz 12529  cq 12907  cexp 14026  cdvds 16222  cprime 16641   pCnt cpc 16807
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 2701  ax-sep 5251  ax-nul 5261  ax-pow 5320  ax-pr 5387  ax-un 7711  ax-cnex 11124  ax-resscn 11125  ax-1cn 11126  ax-icn 11127  ax-addcl 11128  ax-addrcl 11129  ax-mulcl 11130  ax-mulrcl 11131  ax-mulcom 11132  ax-addass 11133  ax-mulass 11134  ax-distr 11135  ax-i2m1 11136  ax-1ne0 11137  ax-1rid 11138  ax-rnegex 11139  ax-rrecex 11140  ax-cnre 11141  ax-pre-lttri 11142  ax-pre-lttrn 11143  ax-pre-ltadd 11144  ax-pre-mulgt0 11145  ax-pre-sup 11146
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 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-nel 3030  df-ral 3045  df-rex 3054  df-rmo 3354  df-reu 3355  df-rab 3406  df-v 3449  df-sbc 3754  df-csb 3863  df-dif 3917  df-un 3919  df-in 3921  df-ss 3931  df-pss 3934  df-nul 4297  df-if 4489  df-pw 4565  df-sn 4590  df-pr 4592  df-op 4596  df-uni 4872  df-iun 4957  df-br 5108  df-opab 5170  df-mpt 5189  df-tr 5215  df-id 5533  df-eprel 5538  df-po 5546  df-so 5547  df-fr 5591  df-we 5593  df-xp 5644  df-rel 5645  df-cnv 5646  df-co 5647  df-dm 5648  df-rn 5649  df-res 5650  df-ima 5651  df-pred 6274  df-ord 6335  df-on 6336  df-lim 6337  df-suc 6338  df-iota 6464  df-fun 6513  df-fn 6514  df-f 6515  df-f1 6516  df-fo 6517  df-f1o 6518  df-fv 6519  df-riota 7344  df-ov 7390  df-oprab 7391  df-mpo 7392  df-om 7843  df-1st 7968  df-2nd 7969  df-frecs 8260  df-wrecs 8291  df-recs 8340  df-rdg 8378  df-1o 8434  df-2o 8435  df-er 8671  df-en 8919  df-dom 8920  df-sdom 8921  df-fin 8922  df-sup 9393  df-inf 9394  df-pnf 11210  df-mnf 11211  df-xr 11212  df-ltxr 11213  df-le 11214  df-sub 11407  df-neg 11408  df-div 11836  df-nn 12187  df-2 12249  df-3 12250  df-n0 12443  df-z 12530  df-uz 12794  df-q 12908  df-rp 12952  df-fz 13469  df-fl 13754  df-mod 13832  df-seq 13967  df-exp 14027  df-cj 15065  df-re 15066  df-im 15067  df-sqrt 15201  df-abs 15202  df-dvds 16223  df-gcd 16465  df-prm 16642  df-pc 16808
This theorem is referenced by:  aks6d1c2  42118
  Copyright terms: Public domain W3C validator