MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  pcadd Structured version   Visualization version   GIF version

Theorem pcadd 16827
Description: An inequality for the prime count of a sum. This is the source of the ultrametric inequality for the p-adic metric. (Contributed by Mario Carneiro, 9-Sep-2014.)
Hypotheses
Ref Expression
pcadd.1 (๐œ‘ โ†’ ๐‘ƒ โˆˆ โ„™)
pcadd.2 (๐œ‘ โ†’ ๐ด โˆˆ โ„š)
pcadd.3 (๐œ‘ โ†’ ๐ต โˆˆ โ„š)
pcadd.4 (๐œ‘ โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt ๐ต))
Assertion
Ref Expression
pcadd (๐œ‘ โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต)))

Proof of Theorem pcadd
Dummy variables ๐‘ฅ ๐‘ค ๐‘ฆ ๐‘ง are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 pcadd.2 . . 3 (๐œ‘ โ†’ ๐ด โˆˆ โ„š)
2 elq 12933 . . 3 (๐ด โˆˆ โ„š โ†” โˆƒ๐‘ฅ โˆˆ โ„ค โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ))
31, 2sylib 217 . 2 (๐œ‘ โ†’ โˆƒ๐‘ฅ โˆˆ โ„ค โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ))
4 pcadd.3 . . 3 (๐œ‘ โ†’ ๐ต โˆˆ โ„š)
5 elq 12933 . . 3 (๐ต โˆˆ โ„š โ†” โˆƒ๐‘ง โˆˆ โ„ค โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค))
64, 5sylib 217 . 2 (๐œ‘ โ†’ โˆƒ๐‘ง โˆˆ โ„ค โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค))
7 pcadd.1 . . . . . . . 8 (๐œ‘ โ†’ ๐‘ƒ โˆˆ โ„™)
8 pcxcl 16799 . . . . . . . 8 ((๐‘ƒ โˆˆ โ„™ โˆง ๐ด โˆˆ โ„š) โ†’ (๐‘ƒ pCnt ๐ด) โˆˆ โ„*)
97, 1, 8syl2anc 583 . . . . . . 7 (๐œ‘ โ†’ (๐‘ƒ pCnt ๐ด) โˆˆ โ„*)
109xrleidd 13132 . . . . . 6 (๐œ‘ โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt ๐ด))
1110adantr 480 . . . . 5 ((๐œ‘ โˆง ๐ต = 0) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt ๐ด))
12 oveq2 7410 . . . . . . 7 (๐ต = 0 โ†’ (๐ด + ๐ต) = (๐ด + 0))
13 qcn 12946 . . . . . . . . 9 (๐ด โˆˆ โ„š โ†’ ๐ด โˆˆ โ„‚)
141, 13syl 17 . . . . . . . 8 (๐œ‘ โ†’ ๐ด โˆˆ โ„‚)
1514addridd 11413 . . . . . . 7 (๐œ‘ โ†’ (๐ด + 0) = ๐ด)
1612, 15sylan9eqr 2786 . . . . . 6 ((๐œ‘ โˆง ๐ต = 0) โ†’ (๐ด + ๐ต) = ๐ด)
1716oveq2d 7418 . . . . 5 ((๐œ‘ โˆง ๐ต = 0) โ†’ (๐‘ƒ pCnt (๐ด + ๐ต)) = (๐‘ƒ pCnt ๐ด))
1811, 17breqtrrd 5167 . . . 4 ((๐œ‘ โˆง ๐ต = 0) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต)))
1918a1d 25 . . 3 ((๐œ‘ โˆง ๐ต = 0) โ†’ ((โˆƒ๐‘ฅ โˆˆ โ„ค โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ) โˆง โˆƒ๐‘ง โˆˆ โ„ค โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค)) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต))))
20 reeanv 3218 . . . 4 (โˆƒ๐‘ฅ โˆˆ โ„ค โˆƒ๐‘ง โˆˆ โ„ค (โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ) โˆง โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค)) โ†” (โˆƒ๐‘ฅ โˆˆ โ„ค โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ) โˆง โˆƒ๐‘ง โˆˆ โ„ค โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค)))
21 reeanv 3218 . . . . . 6 (โˆƒ๐‘ฆ โˆˆ โ„• โˆƒ๐‘ค โˆˆ โ„• (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)) โ†” (โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ) โˆง โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค)))
227ad3antrrr 727 . . . . . . . . 9 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ƒ โˆˆ โ„™)
23 prmnn 16614 . . . . . . . . . . . . . . . . 17 (๐‘ƒ โˆˆ โ„™ โ†’ ๐‘ƒ โˆˆ โ„•)
2422, 23syl 17 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ƒ โˆˆ โ„•)
25 simplrl 774 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ฅ โˆˆ โ„ค)
26 simprrl 778 . . . . . . . . . . . . . . . . . . 19 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ด = (๐‘ฅ / ๐‘ฆ))
27 pc0 16792 . . . . . . . . . . . . . . . . . . . . . 22 (๐‘ƒ โˆˆ โ„™ โ†’ (๐‘ƒ pCnt 0) = +โˆž)
2822, 27syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt 0) = +โˆž)
294ad3antrrr 727 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ต โˆˆ โ„š)
30 simpllr 773 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ต โ‰  0)
31 pcqcl 16794 . . . . . . . . . . . . . . . . . . . . . . . 24 ((๐‘ƒ โˆˆ โ„™ โˆง (๐ต โˆˆ โ„š โˆง ๐ต โ‰  0)) โ†’ (๐‘ƒ pCnt ๐ต) โˆˆ โ„ค)
3222, 29, 30, 31syl12anc 834 . . . . . . . . . . . . . . . . . . . . . . 23 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ต) โˆˆ โ„ค)
3332zred 12665 . . . . . . . . . . . . . . . . . . . . . 22 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ต) โˆˆ โ„)
34 ltpnf 13101 . . . . . . . . . . . . . . . . . . . . . . 23 ((๐‘ƒ pCnt ๐ต) โˆˆ โ„ โ†’ (๐‘ƒ pCnt ๐ต) < +โˆž)
35 rexr 11259 . . . . . . . . . . . . . . . . . . . . . . . 24 ((๐‘ƒ pCnt ๐ต) โˆˆ โ„ โ†’ (๐‘ƒ pCnt ๐ต) โˆˆ โ„*)
36 pnfxr 11267 . . . . . . . . . . . . . . . . . . . . . . . 24 +โˆž โˆˆ โ„*
37 xrltnle 11280 . . . . . . . . . . . . . . . . . . . . . . . 24 (((๐‘ƒ pCnt ๐ต) โˆˆ โ„* โˆง +โˆž โˆˆ โ„*) โ†’ ((๐‘ƒ pCnt ๐ต) < +โˆž โ†” ยฌ +โˆž โ‰ค (๐‘ƒ pCnt ๐ต)))
3835, 36, 37sylancl 585 . . . . . . . . . . . . . . . . . . . . . . 23 ((๐‘ƒ pCnt ๐ต) โˆˆ โ„ โ†’ ((๐‘ƒ pCnt ๐ต) < +โˆž โ†” ยฌ +โˆž โ‰ค (๐‘ƒ pCnt ๐ต)))
3934, 38mpbid 231 . . . . . . . . . . . . . . . . . . . . . 22 ((๐‘ƒ pCnt ๐ต) โˆˆ โ„ โ†’ ยฌ +โˆž โ‰ค (๐‘ƒ pCnt ๐ต))
4033, 39syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ยฌ +โˆž โ‰ค (๐‘ƒ pCnt ๐ต))
4128, 40eqnbrtrd 5157 . . . . . . . . . . . . . . . . . . . 20 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ยฌ (๐‘ƒ pCnt 0) โ‰ค (๐‘ƒ pCnt ๐ต))
42 pcadd.4 . . . . . . . . . . . . . . . . . . . . . . 23 (๐œ‘ โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt ๐ต))
4342ad3antrrr 727 . . . . . . . . . . . . . . . . . . . . . 22 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt ๐ต))
44 oveq2 7410 . . . . . . . . . . . . . . . . . . . . . . 23 (๐ด = 0 โ†’ (๐‘ƒ pCnt ๐ด) = (๐‘ƒ pCnt 0))
4544breq1d 5149 . . . . . . . . . . . . . . . . . . . . . 22 (๐ด = 0 โ†’ ((๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt ๐ต) โ†” (๐‘ƒ pCnt 0) โ‰ค (๐‘ƒ pCnt ๐ต)))
4643, 45syl5ibcom 244 . . . . . . . . . . . . . . . . . . . . 21 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐ด = 0 โ†’ (๐‘ƒ pCnt 0) โ‰ค (๐‘ƒ pCnt ๐ต)))
4746necon3bd 2946 . . . . . . . . . . . . . . . . . . . 20 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (ยฌ (๐‘ƒ pCnt 0) โ‰ค (๐‘ƒ pCnt ๐ต) โ†’ ๐ด โ‰  0))
4841, 47mpd 15 . . . . . . . . . . . . . . . . . . 19 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ด โ‰  0)
4926, 48eqnetrrd 3001 . . . . . . . . . . . . . . . . . 18 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ฅ / ๐‘ฆ) โ‰  0)
50 simprll 776 . . . . . . . . . . . . . . . . . . . . . 22 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ฆ โˆˆ โ„•)
5150nncnd 12227 . . . . . . . . . . . . . . . . . . . . 21 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ฆ โˆˆ โ„‚)
5250nnne0d 12261 . . . . . . . . . . . . . . . . . . . . 21 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ฆ โ‰  0)
5351, 52div0d 11988 . . . . . . . . . . . . . . . . . . . 20 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (0 / ๐‘ฆ) = 0)
54 oveq1 7409 . . . . . . . . . . . . . . . . . . . . 21 (๐‘ฅ = 0 โ†’ (๐‘ฅ / ๐‘ฆ) = (0 / ๐‘ฆ))
5554eqeq1d 2726 . . . . . . . . . . . . . . . . . . . 20 (๐‘ฅ = 0 โ†’ ((๐‘ฅ / ๐‘ฆ) = 0 โ†” (0 / ๐‘ฆ) = 0))
5653, 55syl5ibrcom 246 . . . . . . . . . . . . . . . . . . 19 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ฅ = 0 โ†’ (๐‘ฅ / ๐‘ฆ) = 0))
5756necon3d 2953 . . . . . . . . . . . . . . . . . 18 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ฅ / ๐‘ฆ) โ‰  0 โ†’ ๐‘ฅ โ‰  0))
5849, 57mpd 15 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ฅ โ‰  0)
59 pczcl 16786 . . . . . . . . . . . . . . . . 17 ((๐‘ƒ โˆˆ โ„™ โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ฅ โ‰  0)) โ†’ (๐‘ƒ pCnt ๐‘ฅ) โˆˆ โ„•0)
6022, 25, 58, 59syl12anc 834 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐‘ฅ) โˆˆ โ„•0)
6124, 60nnexpcld 14209 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โˆˆ โ„•)
6261nncnd 12227 . . . . . . . . . . . . . 14 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โˆˆ โ„‚)
6362, 51mulcomd 11234 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) ยท ๐‘ฆ) = (๐‘ฆ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))))
6463oveq2d 7418 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ฅ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) ยท ๐‘ฆ)) = ((๐‘ฅ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) / (๐‘ฆ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)))))
6525zcnd 12666 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ฅ โˆˆ โ„‚)
6622, 50pccld 16788 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐‘ฆ) โˆˆ โ„•0)
6724, 66nnexpcld 14209 . . . . . . . . . . . . . 14 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆˆ โ„•)
6867nncnd 12227 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆˆ โ„‚)
6961nnne0d 12261 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โ‰  0)
7067nnne0d 12261 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โ‰  0)
7165, 62, 51, 68, 69, 70, 52divdivdivd 12036 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))) / (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))) = ((๐‘ฅ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) ยท ๐‘ฆ)))
7226oveq2d 7418 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ด) = (๐‘ƒ pCnt (๐‘ฅ / ๐‘ฆ)))
73 pcdiv 16790 . . . . . . . . . . . . . . . . . 18 ((๐‘ƒ โˆˆ โ„™ โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ฅ โ‰  0) โˆง ๐‘ฆ โˆˆ โ„•) โ†’ (๐‘ƒ pCnt (๐‘ฅ / ๐‘ฆ)) = ((๐‘ƒ pCnt ๐‘ฅ) โˆ’ (๐‘ƒ pCnt ๐‘ฆ)))
7422, 25, 58, 50, 73syl121anc 1372 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt (๐‘ฅ / ๐‘ฆ)) = ((๐‘ƒ pCnt ๐‘ฅ) โˆ’ (๐‘ƒ pCnt ๐‘ฆ)))
7572, 74eqtrd 2764 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ด) = ((๐‘ƒ pCnt ๐‘ฅ) โˆ’ (๐‘ƒ pCnt ๐‘ฆ)))
7675oveq2d 7418 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)) = (๐‘ƒโ†‘((๐‘ƒ pCnt ๐‘ฅ) โˆ’ (๐‘ƒ pCnt ๐‘ฆ))))
7724nncnd 12227 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ƒ โˆˆ โ„‚)
7824nnne0d 12261 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ƒ โ‰  0)
7966nn0zd 12583 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐‘ฆ) โˆˆ โ„ค)
8060nn0zd 12583 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐‘ฅ) โˆˆ โ„ค)
8177, 78, 79, 80expsubd 14123 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘((๐‘ƒ pCnt ๐‘ฅ) โˆ’ (๐‘ƒ pCnt ๐‘ฆ))) = ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))))
8276, 81eqtrd 2764 . . . . . . . . . . . . . 14 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)) = ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))))
8382oveq2d 7418 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐ด / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด))) = (๐ด / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))))
8426oveq1d 7417 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐ด / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))) = ((๐‘ฅ / ๐‘ฆ) / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))))
8565, 51, 62, 68, 52, 70, 69divdivdivd 12036 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ฅ / ๐‘ฆ) / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))) = ((๐‘ฅ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) / (๐‘ฆ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)))))
8683, 84, 853eqtrd 2768 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐ด / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด))) = ((๐‘ฅ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) / (๐‘ฆ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)))))
8764, 71, 863eqtr4d 2774 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))) / (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))) = (๐ด / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด))))
8887oveq2d 7418 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)) ยท ((๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))) / (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))))) = ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)) ยท (๐ด / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)))))
891ad3antrrr 727 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ด โˆˆ โ„š)
9089, 13syl 17 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ด โˆˆ โ„‚)
91 pcqcl 16794 . . . . . . . . . . . . 13 ((๐‘ƒ โˆˆ โ„™ โˆง (๐ด โˆˆ โ„š โˆง ๐ด โ‰  0)) โ†’ (๐‘ƒ pCnt ๐ด) โˆˆ โ„ค)
9222, 89, 48, 91syl12anc 834 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ด) โˆˆ โ„ค)
9377, 78, 92expclzd 14117 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)) โˆˆ โ„‚)
9477, 78, 92expne0d 14118 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)) โ‰  0)
9590, 93, 94divcan2d 11991 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)) ยท (๐ด / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)))) = ๐ด)
9688, 95eqtr2d 2765 . . . . . . . . 9 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ด = ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)) ยท ((๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))) / (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))))))
97 simplrr 775 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ง โˆˆ โ„ค)
98 simprrr 779 . . . . . . . . . . . . . . . . . . 19 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ต = (๐‘ง / ๐‘ค))
9998, 30eqnetrrd 3001 . . . . . . . . . . . . . . . . . 18 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ง / ๐‘ค) โ‰  0)
100 simprlr 777 . . . . . . . . . . . . . . . . . . . . . 22 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ค โˆˆ โ„•)
101100nncnd 12227 . . . . . . . . . . . . . . . . . . . . 21 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ค โˆˆ โ„‚)
102100nnne0d 12261 . . . . . . . . . . . . . . . . . . . . 21 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ค โ‰  0)
103101, 102div0d 11988 . . . . . . . . . . . . . . . . . . . 20 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (0 / ๐‘ค) = 0)
104 oveq1 7409 . . . . . . . . . . . . . . . . . . . . 21 (๐‘ง = 0 โ†’ (๐‘ง / ๐‘ค) = (0 / ๐‘ค))
105104eqeq1d 2726 . . . . . . . . . . . . . . . . . . . 20 (๐‘ง = 0 โ†’ ((๐‘ง / ๐‘ค) = 0 โ†” (0 / ๐‘ค) = 0))
106103, 105syl5ibrcom 246 . . . . . . . . . . . . . . . . . . 19 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ง = 0 โ†’ (๐‘ง / ๐‘ค) = 0))
107106necon3d 2953 . . . . . . . . . . . . . . . . . 18 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ง / ๐‘ค) โ‰  0 โ†’ ๐‘ง โ‰  0))
10899, 107mpd 15 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ง โ‰  0)
109 pczcl 16786 . . . . . . . . . . . . . . . . 17 ((๐‘ƒ โˆˆ โ„™ โˆง (๐‘ง โˆˆ โ„ค โˆง ๐‘ง โ‰  0)) โ†’ (๐‘ƒ pCnt ๐‘ง) โˆˆ โ„•0)
11022, 97, 108, 109syl12anc 834 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐‘ง) โˆˆ โ„•0)
11124, 110nnexpcld 14209 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โˆˆ โ„•)
112111nncnd 12227 . . . . . . . . . . . . . 14 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โˆˆ โ„‚)
113112, 101mulcomd 11234 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) ยท ๐‘ค) = (๐‘ค ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))))
114113oveq2d 7418 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ง ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) ยท ๐‘ค)) = ((๐‘ง ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) / (๐‘ค ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)))))
11597zcnd 12666 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ง โˆˆ โ„‚)
11622, 100pccld 16788 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐‘ค) โˆˆ โ„•0)
11724, 116nnexpcld 14209 . . . . . . . . . . . . . 14 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆˆ โ„•)
118117nncnd 12227 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆˆ โ„‚)
119111nnne0d 12261 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โ‰  0)
120117nnne0d 12261 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โ‰  0)
121115, 112, 101, 118, 119, 120, 102divdivdivd 12036 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))) / (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))) = ((๐‘ง ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) ยท ๐‘ค)))
12298oveq2d 7418 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ต) = (๐‘ƒ pCnt (๐‘ง / ๐‘ค)))
123 pcdiv 16790 . . . . . . . . . . . . . . . . . 18 ((๐‘ƒ โˆˆ โ„™ โˆง (๐‘ง โˆˆ โ„ค โˆง ๐‘ง โ‰  0) โˆง ๐‘ค โˆˆ โ„•) โ†’ (๐‘ƒ pCnt (๐‘ง / ๐‘ค)) = ((๐‘ƒ pCnt ๐‘ง) โˆ’ (๐‘ƒ pCnt ๐‘ค)))
12422, 97, 108, 100, 123syl121anc 1372 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt (๐‘ง / ๐‘ค)) = ((๐‘ƒ pCnt ๐‘ง) โˆ’ (๐‘ƒ pCnt ๐‘ค)))
125122, 124eqtrd 2764 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ต) = ((๐‘ƒ pCnt ๐‘ง) โˆ’ (๐‘ƒ pCnt ๐‘ค)))
126125oveq2d 7418 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)) = (๐‘ƒโ†‘((๐‘ƒ pCnt ๐‘ง) โˆ’ (๐‘ƒ pCnt ๐‘ค))))
127116nn0zd 12583 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐‘ค) โˆˆ โ„ค)
128110nn0zd 12583 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐‘ง) โˆˆ โ„ค)
12977, 78, 127, 128expsubd 14123 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘((๐‘ƒ pCnt ๐‘ง) โˆ’ (๐‘ƒ pCnt ๐‘ค))) = ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))))
130126, 129eqtrd 2764 . . . . . . . . . . . . . 14 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)) = ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))))
131130oveq2d 7418 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐ต / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต))) = (๐ต / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))))
13298oveq1d 7417 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐ต / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))) = ((๐‘ง / ๐‘ค) / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))))
133115, 101, 112, 118, 102, 120, 119divdivdivd 12036 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ง / ๐‘ค) / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))) = ((๐‘ง ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) / (๐‘ค ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)))))
134131, 132, 1333eqtrd 2768 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐ต / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต))) = ((๐‘ง ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) / (๐‘ค ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)))))
135114, 121, 1343eqtr4d 2774 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))) / (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))) = (๐ต / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต))))
136135oveq2d 7418 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)) ยท ((๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))) / (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))))) = ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)) ยท (๐ต / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)))))
137 qcn 12946 . . . . . . . . . . . 12 (๐ต โˆˆ โ„š โ†’ ๐ต โˆˆ โ„‚)
13829, 137syl 17 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ต โˆˆ โ„‚)
13977, 78, 32expclzd 14117 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)) โˆˆ โ„‚)
14077, 78, 32expne0d 14118 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)) โ‰  0)
141138, 139, 140divcan2d 11991 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)) ยท (๐ต / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)))) = ๐ต)
142136, 141eqtr2d 2765 . . . . . . . . 9 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ต = ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)) ยท ((๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))) / (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))))))
143 eluz 12835 . . . . . . . . . . 11 (((๐‘ƒ pCnt ๐ด) โˆˆ โ„ค โˆง (๐‘ƒ pCnt ๐ต) โˆˆ โ„ค) โ†’ ((๐‘ƒ pCnt ๐ต) โˆˆ (โ„คโ‰ฅโ€˜(๐‘ƒ pCnt ๐ด)) โ†” (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt ๐ต)))
14492, 32, 143syl2anc 583 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒ pCnt ๐ต) โˆˆ (โ„คโ‰ฅโ€˜(๐‘ƒ pCnt ๐ด)) โ†” (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt ๐ต)))
14543, 144mpbird 257 . . . . . . . . 9 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ต) โˆˆ (โ„คโ‰ฅโ€˜(๐‘ƒ pCnt ๐ด)))
146 pczdvds 16801 . . . . . . . . . . . 12 ((๐‘ƒ โˆˆ โ„™ โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ฅ โ‰  0)) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โˆฅ ๐‘ฅ)
14722, 25, 58, 146syl12anc 834 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โˆฅ ๐‘ฅ)
14861nnzd 12584 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โˆˆ โ„ค)
149 dvdsval2 16203 . . . . . . . . . . . 12 (((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โˆˆ โ„ค โˆง (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โ‰  0 โˆง ๐‘ฅ โˆˆ โ„ค) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โˆฅ ๐‘ฅ โ†” (๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))) โˆˆ โ„ค))
150148, 69, 25, 149syl3anc 1368 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โˆฅ ๐‘ฅ โ†” (๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))) โˆˆ โ„ค))
151147, 150mpbid 231 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))) โˆˆ โ„ค)
152 pczndvds2 16805 . . . . . . . . . . 11 ((๐‘ƒ โˆˆ โ„™ โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ฅ โ‰  0)) โ†’ ยฌ ๐‘ƒ โˆฅ (๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))))
15322, 25, 58, 152syl12anc 834 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ยฌ ๐‘ƒ โˆฅ (๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))))
154151, 153jca 511 . . . . . . . . 9 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))) โˆˆ โ„ค โˆง ยฌ ๐‘ƒ โˆฅ (๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)))))
155 pcdvds 16802 . . . . . . . . . . . . 13 ((๐‘ƒ โˆˆ โ„™ โˆง ๐‘ฆ โˆˆ โ„•) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆฅ ๐‘ฆ)
15622, 50, 155syl2anc 583 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆฅ ๐‘ฆ)
15767nnzd 12584 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆˆ โ„ค)
15850nnzd 12584 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ฆ โˆˆ โ„ค)
159 dvdsval2 16203 . . . . . . . . . . . . 13 (((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆˆ โ„ค โˆง (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โ‰  0 โˆง ๐‘ฆ โˆˆ โ„ค) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆฅ ๐‘ฆ โ†” (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) โˆˆ โ„ค))
160157, 70, 158, 159syl3anc 1368 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆฅ ๐‘ฆ โ†” (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) โˆˆ โ„ค))
161156, 160mpbid 231 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) โˆˆ โ„ค)
16250nnred 12226 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ฆ โˆˆ โ„)
16367nnred 12226 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆˆ โ„)
16450nngt0d 12260 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ 0 < ๐‘ฆ)
16567nngt0d 12260 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ 0 < (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))
166162, 163, 164, 165divgt0d 12148 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ 0 < (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))))
167 elnnz 12567 . . . . . . . . . . 11 ((๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) โˆˆ โ„• โ†” ((๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) โˆˆ โ„ค โˆง 0 < (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))))
168161, 166, 167sylanbrc 582 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) โˆˆ โ„•)
169 pcndvds2 16806 . . . . . . . . . . 11 ((๐‘ƒ โˆˆ โ„™ โˆง ๐‘ฆ โˆˆ โ„•) โ†’ ยฌ ๐‘ƒ โˆฅ (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))))
17022, 50, 169syl2anc 583 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ยฌ ๐‘ƒ โˆฅ (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))))
171168, 170jca 511 . . . . . . . . 9 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) โˆˆ โ„• โˆง ยฌ ๐‘ƒ โˆฅ (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))))
172 pczdvds 16801 . . . . . . . . . . . 12 ((๐‘ƒ โˆˆ โ„™ โˆง (๐‘ง โˆˆ โ„ค โˆง ๐‘ง โ‰  0)) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โˆฅ ๐‘ง)
17322, 97, 108, 172syl12anc 834 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โˆฅ ๐‘ง)
174111nnzd 12584 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โˆˆ โ„ค)
175 dvdsval2 16203 . . . . . . . . . . . 12 (((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โˆˆ โ„ค โˆง (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โ‰  0 โˆง ๐‘ง โˆˆ โ„ค) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โˆฅ ๐‘ง โ†” (๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))) โˆˆ โ„ค))
176174, 119, 97, 175syl3anc 1368 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โˆฅ ๐‘ง โ†” (๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))) โˆˆ โ„ค))
177173, 176mpbid 231 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))) โˆˆ โ„ค)
178 pczndvds2 16805 . . . . . . . . . . 11 ((๐‘ƒ โˆˆ โ„™ โˆง (๐‘ง โˆˆ โ„ค โˆง ๐‘ง โ‰  0)) โ†’ ยฌ ๐‘ƒ โˆฅ (๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))))
17922, 97, 108, 178syl12anc 834 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ยฌ ๐‘ƒ โˆฅ (๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))))
180177, 179jca 511 . . . . . . . . 9 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))) โˆˆ โ„ค โˆง ยฌ ๐‘ƒ โˆฅ (๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)))))
181 pcdvds 16802 . . . . . . . . . . . . 13 ((๐‘ƒ โˆˆ โ„™ โˆง ๐‘ค โˆˆ โ„•) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆฅ ๐‘ค)
18222, 100, 181syl2anc 583 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆฅ ๐‘ค)
183117nnzd 12584 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆˆ โ„ค)
184100nnzd 12584 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ค โˆˆ โ„ค)
185 dvdsval2 16203 . . . . . . . . . . . . 13 (((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆˆ โ„ค โˆง (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โ‰  0 โˆง ๐‘ค โˆˆ โ„ค) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆฅ ๐‘ค โ†” (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) โˆˆ โ„ค))
186183, 120, 184, 185syl3anc 1368 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆฅ ๐‘ค โ†” (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) โˆˆ โ„ค))
187182, 186mpbid 231 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) โˆˆ โ„ค)
188100nnred 12226 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ค โˆˆ โ„)
189117nnred 12226 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆˆ โ„)
190100nngt0d 12260 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ 0 < ๐‘ค)
191117nngt0d 12260 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ 0 < (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))
192188, 189, 190, 191divgt0d 12148 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ 0 < (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))))
193 elnnz 12567 . . . . . . . . . . 11 ((๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) โˆˆ โ„• โ†” ((๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) โˆˆ โ„ค โˆง 0 < (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))))
194187, 192, 193sylanbrc 582 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) โˆˆ โ„•)
195 pcndvds2 16806 . . . . . . . . . . 11 ((๐‘ƒ โˆˆ โ„™ โˆง ๐‘ค โˆˆ โ„•) โ†’ ยฌ ๐‘ƒ โˆฅ (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))))
19622, 100, 195syl2anc 583 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ยฌ ๐‘ƒ โˆฅ (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))))
197194, 196jca 511 . . . . . . . . 9 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) โˆˆ โ„• โˆง ยฌ ๐‘ƒ โˆฅ (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))))
19822, 96, 142, 145, 154, 171, 180, 197pcaddlem 16826 . . . . . . . 8 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต)))
199198expr 456 . . . . . . 7 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง (๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•)) โ†’ ((๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต))))
200199rexlimdvva 3203 . . . . . 6 (((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โ†’ (โˆƒ๐‘ฆ โˆˆ โ„• โˆƒ๐‘ค โˆˆ โ„• (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต))))
20121, 200biimtrrid 242 . . . . 5 (((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โ†’ ((โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ) โˆง โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค)) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต))))
202201rexlimdvva 3203 . . . 4 ((๐œ‘ โˆง ๐ต โ‰  0) โ†’ (โˆƒ๐‘ฅ โˆˆ โ„ค โˆƒ๐‘ง โˆˆ โ„ค (โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ) โˆง โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค)) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต))))
20320, 202biimtrrid 242 . . 3 ((๐œ‘ โˆง ๐ต โ‰  0) โ†’ ((โˆƒ๐‘ฅ โˆˆ โ„ค โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ) โˆง โˆƒ๐‘ง โˆˆ โ„ค โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค)) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต))))
20419, 203pm2.61dane 3021 . 2 (๐œ‘ โ†’ ((โˆƒ๐‘ฅ โˆˆ โ„ค โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ) โˆง โˆƒ๐‘ง โˆˆ โ„ค โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค)) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต))))
2053, 6, 204mp2and 696 1 (๐œ‘ โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต)))
Colors of variables: wff setvar class
Syntax hints:  ยฌ wn 3   โ†’ wi 4   โ†” wb 205   โˆง wa 395   = wceq 1533   โˆˆ wcel 2098   โ‰  wne 2932  โˆƒwrex 3062   class class class wbr 5139  โ€˜cfv 6534  (class class class)co 7402  โ„‚cc 11105  โ„cr 11106  0cc0 11107   + caddc 11110   ยท cmul 11112  +โˆžcpnf 11244  โ„*cxr 11246   < clt 11247   โ‰ค cle 11248   โˆ’ cmin 11443   / cdiv 11870  โ„•cn 12211  โ„•0cn0 12471  โ„คcz 12557  โ„คโ‰ฅcuz 12821  โ„šcq 12931  โ†‘cexp 14028   โˆฅ cdvds 16200  โ„™cprime 16611   pCnt cpc 16774
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1789  ax-4 1803  ax-5 1905  ax-6 1963  ax-7 2003  ax-8 2100  ax-9 2108  ax-10 2129  ax-11 2146  ax-12 2163  ax-ext 2695  ax-sep 5290  ax-nul 5297  ax-pow 5354  ax-pr 5418  ax-un 7719  ax-cnex 11163  ax-resscn 11164  ax-1cn 11165  ax-icn 11166  ax-addcl 11167  ax-addrcl 11168  ax-mulcl 11169  ax-mulrcl 11170  ax-mulcom 11171  ax-addass 11172  ax-mulass 11173  ax-distr 11174  ax-i2m1 11175  ax-1ne0 11176  ax-1rid 11177  ax-rnegex 11178  ax-rrecex 11179  ax-cnre 11180  ax-pre-lttri 11181  ax-pre-lttrn 11182  ax-pre-ltadd 11183  ax-pre-mulgt0 11184  ax-pre-sup 11185
This theorem depends on definitions:  df-bi 206  df-an 396  df-or 845  df-3or 1085  df-3an 1086  df-tru 1536  df-fal 1546  df-ex 1774  df-nf 1778  df-sb 2060  df-mo 2526  df-eu 2555  df-clab 2702  df-cleq 2716  df-clel 2802  df-nfc 2877  df-ne 2933  df-nel 3039  df-ral 3054  df-rex 3063  df-rmo 3368  df-reu 3369  df-rab 3425  df-v 3468  df-sbc 3771  df-csb 3887  df-dif 3944  df-un 3946  df-in 3948  df-ss 3958  df-pss 3960  df-nul 4316  df-if 4522  df-pw 4597  df-sn 4622  df-pr 4624  df-op 4628  df-uni 4901  df-iun 4990  df-br 5140  df-opab 5202  df-mpt 5223  df-tr 5257  df-id 5565  df-eprel 5571  df-po 5579  df-so 5580  df-fr 5622  df-we 5624  df-xp 5673  df-rel 5674  df-cnv 5675  df-co 5676  df-dm 5677  df-rn 5678  df-res 5679  df-ima 5680  df-pred 6291  df-ord 6358  df-on 6359  df-lim 6360  df-suc 6361  df-iota 6486  df-fun 6536  df-fn 6537  df-f 6538  df-f1 6539  df-fo 6540  df-f1o 6541  df-fv 6542  df-riota 7358  df-ov 7405  df-oprab 7406  df-mpo 7407  df-om 7850  df-1st 7969  df-2nd 7970  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-1o 8462  df-2o 8463  df-er 8700  df-en 8937  df-dom 8938  df-sdom 8939  df-fin 8940  df-sup 9434  df-inf 9435  df-pnf 11249  df-mnf 11250  df-xr 11251  df-ltxr 11252  df-le 11253  df-sub 11445  df-neg 11446  df-div 11871  df-nn 12212  df-2 12274  df-3 12275  df-n0 12472  df-z 12558  df-uz 12822  df-q 12932  df-rp 12976  df-fl 13758  df-mod 13836  df-seq 13968  df-exp 14029  df-cj 15048  df-re 15049  df-im 15050  df-sqrt 15184  df-abs 15185  df-dvds 16201  df-gcd 16439  df-prm 16612  df-pc 16775
This theorem is referenced by:  pcadd2  16828  padicabv  27504
  Copyright terms: Public domain W3C validator