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

Theorem pcadd 16818
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 12930 . . 3 (๐ด โˆˆ โ„š โ†” โˆƒ๐‘ฅ โˆˆ โ„ค โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ))
31, 2sylib 217 . 2 (๐œ‘ โ†’ โˆƒ๐‘ฅ โˆˆ โ„ค โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ))
4 pcadd.3 . . 3 (๐œ‘ โ†’ ๐ต โˆˆ โ„š)
5 elq 12930 . . 3 (๐ต โˆˆ โ„š โ†” โˆƒ๐‘ง โˆˆ โ„ค โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค))
64, 5sylib 217 . 2 (๐œ‘ โ†’ โˆƒ๐‘ง โˆˆ โ„ค โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค))
7 pcadd.1 . . . . . . . 8 (๐œ‘ โ†’ ๐‘ƒ โˆˆ โ„™)
8 pcxcl 16790 . . . . . . . 8 ((๐‘ƒ โˆˆ โ„™ โˆง ๐ด โˆˆ โ„š) โ†’ (๐‘ƒ pCnt ๐ด) โˆˆ โ„*)
97, 1, 8syl2anc 584 . . . . . . 7 (๐œ‘ โ†’ (๐‘ƒ pCnt ๐ด) โˆˆ โ„*)
109xrleidd 13127 . . . . . 6 (๐œ‘ โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt ๐ด))
1110adantr 481 . . . . 5 ((๐œ‘ โˆง ๐ต = 0) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt ๐ด))
12 oveq2 7413 . . . . . . 7 (๐ต = 0 โ†’ (๐ด + ๐ต) = (๐ด + 0))
13 qcn 12943 . . . . . . . . 9 (๐ด โˆˆ โ„š โ†’ ๐ด โˆˆ โ„‚)
141, 13syl 17 . . . . . . . 8 (๐œ‘ โ†’ ๐ด โˆˆ โ„‚)
1514addridd 11410 . . . . . . 7 (๐œ‘ โ†’ (๐ด + 0) = ๐ด)
1612, 15sylan9eqr 2794 . . . . . 6 ((๐œ‘ โˆง ๐ต = 0) โ†’ (๐ด + ๐ต) = ๐ด)
1716oveq2d 7421 . . . . 5 ((๐œ‘ โˆง ๐ต = 0) โ†’ (๐‘ƒ pCnt (๐ด + ๐ต)) = (๐‘ƒ pCnt ๐ด))
1811, 17breqtrrd 5175 . . . 4 ((๐œ‘ โˆง ๐ต = 0) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต)))
1918a1d 25 . . 3 ((๐œ‘ โˆง ๐ต = 0) โ†’ ((โˆƒ๐‘ฅ โˆˆ โ„ค โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ) โˆง โˆƒ๐‘ง โˆˆ โ„ค โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค)) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต))))
20 reeanv 3226 . . . 4 (โˆƒ๐‘ฅ โˆˆ โ„ค โˆƒ๐‘ง โˆˆ โ„ค (โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ) โˆง โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค)) โ†” (โˆƒ๐‘ฅ โˆˆ โ„ค โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ) โˆง โˆƒ๐‘ง โˆˆ โ„ค โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค)))
21 reeanv 3226 . . . . . 6 (โˆƒ๐‘ฆ โˆˆ โ„• โˆƒ๐‘ค โˆˆ โ„• (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)) โ†” (โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ) โˆง โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค)))
227ad3antrrr 728 . . . . . . . . 9 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ƒ โˆˆ โ„™)
23 prmnn 16607 . . . . . . . . . . . . . . . . 17 (๐‘ƒ โˆˆ โ„™ โ†’ ๐‘ƒ โˆˆ โ„•)
2422, 23syl 17 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ƒ โˆˆ โ„•)
25 simplrl 775 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ฅ โˆˆ โ„ค)
26 simprrl 779 . . . . . . . . . . . . . . . . . . 19 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ด = (๐‘ฅ / ๐‘ฆ))
27 pc0 16783 . . . . . . . . . . . . . . . . . . . . . 22 (๐‘ƒ โˆˆ โ„™ โ†’ (๐‘ƒ pCnt 0) = +โˆž)
2822, 27syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt 0) = +โˆž)
294ad3antrrr 728 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ต โˆˆ โ„š)
30 simpllr 774 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ต โ‰  0)
31 pcqcl 16785 . . . . . . . . . . . . . . . . . . . . . . . 24 ((๐‘ƒ โˆˆ โ„™ โˆง (๐ต โˆˆ โ„š โˆง ๐ต โ‰  0)) โ†’ (๐‘ƒ pCnt ๐ต) โˆˆ โ„ค)
3222, 29, 30, 31syl12anc 835 . . . . . . . . . . . . . . . . . . . . . . 23 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ต) โˆˆ โ„ค)
3332zred 12662 . . . . . . . . . . . . . . . . . . . . . 22 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ต) โˆˆ โ„)
34 ltpnf 13096 . . . . . . . . . . . . . . . . . . . . . . 23 ((๐‘ƒ pCnt ๐ต) โˆˆ โ„ โ†’ (๐‘ƒ pCnt ๐ต) < +โˆž)
35 rexr 11256 . . . . . . . . . . . . . . . . . . . . . . . 24 ((๐‘ƒ pCnt ๐ต) โˆˆ โ„ โ†’ (๐‘ƒ pCnt ๐ต) โˆˆ โ„*)
36 pnfxr 11264 . . . . . . . . . . . . . . . . . . . . . . . 24 +โˆž โˆˆ โ„*
37 xrltnle 11277 . . . . . . . . . . . . . . . . . . . . . . . 24 (((๐‘ƒ pCnt ๐ต) โˆˆ โ„* โˆง +โˆž โˆˆ โ„*) โ†’ ((๐‘ƒ pCnt ๐ต) < +โˆž โ†” ยฌ +โˆž โ‰ค (๐‘ƒ pCnt ๐ต)))
3835, 36, 37sylancl 586 . . . . . . . . . . . . . . . . . . . . . . 23 ((๐‘ƒ pCnt ๐ต) โˆˆ โ„ โ†’ ((๐‘ƒ pCnt ๐ต) < +โˆž โ†” ยฌ +โˆž โ‰ค (๐‘ƒ pCnt ๐ต)))
3934, 38mpbid 231 . . . . . . . . . . . . . . . . . . . . . 22 ((๐‘ƒ pCnt ๐ต) โˆˆ โ„ โ†’ ยฌ +โˆž โ‰ค (๐‘ƒ pCnt ๐ต))
4033, 39syl 17 . . . . . . . . . . . . . . . . . . . . 21 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ยฌ +โˆž โ‰ค (๐‘ƒ pCnt ๐ต))
4128, 40eqnbrtrd 5165 . . . . . . . . . . . . . . . . . . . 20 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ยฌ (๐‘ƒ pCnt 0) โ‰ค (๐‘ƒ pCnt ๐ต))
42 pcadd.4 . . . . . . . . . . . . . . . . . . . . . . 23 (๐œ‘ โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt ๐ต))
4342ad3antrrr 728 . . . . . . . . . . . . . . . . . . . . . 22 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt ๐ต))
44 oveq2 7413 . . . . . . . . . . . . . . . . . . . . . . 23 (๐ด = 0 โ†’ (๐‘ƒ pCnt ๐ด) = (๐‘ƒ pCnt 0))
4544breq1d 5157 . . . . . . . . . . . . . . . . . . . . . 22 (๐ด = 0 โ†’ ((๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt ๐ต) โ†” (๐‘ƒ pCnt 0) โ‰ค (๐‘ƒ pCnt ๐ต)))
4643, 45syl5ibcom 244 . . . . . . . . . . . . . . . . . . . . 21 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐ด = 0 โ†’ (๐‘ƒ pCnt 0) โ‰ค (๐‘ƒ pCnt ๐ต)))
4746necon3bd 2954 . . . . . . . . . . . . . . . . . . . 20 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (ยฌ (๐‘ƒ pCnt 0) โ‰ค (๐‘ƒ pCnt ๐ต) โ†’ ๐ด โ‰  0))
4841, 47mpd 15 . . . . . . . . . . . . . . . . . . 19 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ด โ‰  0)
4926, 48eqnetrrd 3009 . . . . . . . . . . . . . . . . . 18 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ฅ / ๐‘ฆ) โ‰  0)
50 simprll 777 . . . . . . . . . . . . . . . . . . . . . 22 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ฆ โˆˆ โ„•)
5150nncnd 12224 . . . . . . . . . . . . . . . . . . . . 21 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ฆ โˆˆ โ„‚)
5250nnne0d 12258 . . . . . . . . . . . . . . . . . . . . 21 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ฆ โ‰  0)
5351, 52div0d 11985 . . . . . . . . . . . . . . . . . . . 20 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (0 / ๐‘ฆ) = 0)
54 oveq1 7412 . . . . . . . . . . . . . . . . . . . . 21 (๐‘ฅ = 0 โ†’ (๐‘ฅ / ๐‘ฆ) = (0 / ๐‘ฆ))
5554eqeq1d 2734 . . . . . . . . . . . . . . . . . . . 20 (๐‘ฅ = 0 โ†’ ((๐‘ฅ / ๐‘ฆ) = 0 โ†” (0 / ๐‘ฆ) = 0))
5653, 55syl5ibrcom 246 . . . . . . . . . . . . . . . . . . 19 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ฅ = 0 โ†’ (๐‘ฅ / ๐‘ฆ) = 0))
5756necon3d 2961 . . . . . . . . . . . . . . . . . 18 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ฅ / ๐‘ฆ) โ‰  0 โ†’ ๐‘ฅ โ‰  0))
5849, 57mpd 15 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ฅ โ‰  0)
59 pczcl 16777 . . . . . . . . . . . . . . . . 17 ((๐‘ƒ โˆˆ โ„™ โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ฅ โ‰  0)) โ†’ (๐‘ƒ pCnt ๐‘ฅ) โˆˆ โ„•0)
6022, 25, 58, 59syl12anc 835 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐‘ฅ) โˆˆ โ„•0)
6124, 60nnexpcld 14204 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โˆˆ โ„•)
6261nncnd 12224 . . . . . . . . . . . . . 14 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โˆˆ โ„‚)
6362, 51mulcomd 11231 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) ยท ๐‘ฆ) = (๐‘ฆ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))))
6463oveq2d 7421 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ฅ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) ยท ๐‘ฆ)) = ((๐‘ฅ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) / (๐‘ฆ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)))))
6525zcnd 12663 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ฅ โˆˆ โ„‚)
6622, 50pccld 16779 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐‘ฆ) โˆˆ โ„•0)
6724, 66nnexpcld 14204 . . . . . . . . . . . . . 14 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆˆ โ„•)
6867nncnd 12224 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆˆ โ„‚)
6961nnne0d 12258 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โ‰  0)
7067nnne0d 12258 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โ‰  0)
7165, 62, 51, 68, 69, 70, 52divdivdivd 12033 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))) / (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))) = ((๐‘ฅ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) ยท ๐‘ฆ)))
7226oveq2d 7421 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ด) = (๐‘ƒ pCnt (๐‘ฅ / ๐‘ฆ)))
73 pcdiv 16781 . . . . . . . . . . . . . . . . . 18 ((๐‘ƒ โˆˆ โ„™ โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ฅ โ‰  0) โˆง ๐‘ฆ โˆˆ โ„•) โ†’ (๐‘ƒ pCnt (๐‘ฅ / ๐‘ฆ)) = ((๐‘ƒ pCnt ๐‘ฅ) โˆ’ (๐‘ƒ pCnt ๐‘ฆ)))
7422, 25, 58, 50, 73syl121anc 1375 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt (๐‘ฅ / ๐‘ฆ)) = ((๐‘ƒ pCnt ๐‘ฅ) โˆ’ (๐‘ƒ pCnt ๐‘ฆ)))
7572, 74eqtrd 2772 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ด) = ((๐‘ƒ pCnt ๐‘ฅ) โˆ’ (๐‘ƒ pCnt ๐‘ฆ)))
7675oveq2d 7421 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)) = (๐‘ƒโ†‘((๐‘ƒ pCnt ๐‘ฅ) โˆ’ (๐‘ƒ pCnt ๐‘ฆ))))
7724nncnd 12224 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ƒ โˆˆ โ„‚)
7824nnne0d 12258 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ƒ โ‰  0)
7966nn0zd 12580 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐‘ฆ) โˆˆ โ„ค)
8060nn0zd 12580 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐‘ฅ) โˆˆ โ„ค)
8177, 78, 79, 80expsubd 14118 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘((๐‘ƒ pCnt ๐‘ฅ) โˆ’ (๐‘ƒ pCnt ๐‘ฆ))) = ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))))
8276, 81eqtrd 2772 . . . . . . . . . . . . . 14 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)) = ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))))
8382oveq2d 7421 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐ด / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด))) = (๐ด / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))))
8426oveq1d 7420 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐ด / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))) = ((๐‘ฅ / ๐‘ฆ) / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))))
8565, 51, 62, 68, 52, 70, 69divdivdivd 12033 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ฅ / ๐‘ฆ) / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))) = ((๐‘ฅ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) / (๐‘ฆ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)))))
8683, 84, 853eqtrd 2776 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐ด / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด))) = ((๐‘ฅ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) / (๐‘ฆ ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)))))
8764, 71, 863eqtr4d 2782 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))) / (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))) = (๐ด / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด))))
8887oveq2d 7421 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)) ยท ((๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))) / (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))))) = ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)) ยท (๐ด / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)))))
891ad3antrrr 728 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ด โˆˆ โ„š)
9089, 13syl 17 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ด โˆˆ โ„‚)
91 pcqcl 16785 . . . . . . . . . . . . 13 ((๐‘ƒ โˆˆ โ„™ โˆง (๐ด โˆˆ โ„š โˆง ๐ด โ‰  0)) โ†’ (๐‘ƒ pCnt ๐ด) โˆˆ โ„ค)
9222, 89, 48, 91syl12anc 835 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ด) โˆˆ โ„ค)
9377, 78, 92expclzd 14112 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)) โˆˆ โ„‚)
9477, 78, 92expne0d 14113 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)) โ‰  0)
9590, 93, 94divcan2d 11988 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)) ยท (๐ด / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)))) = ๐ด)
9688, 95eqtr2d 2773 . . . . . . . . 9 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ด = ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐ด)) ยท ((๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))) / (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))))))
97 simplrr 776 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ง โˆˆ โ„ค)
98 simprrr 780 . . . . . . . . . . . . . . . . . . 19 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ต = (๐‘ง / ๐‘ค))
9998, 30eqnetrrd 3009 . . . . . . . . . . . . . . . . . 18 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ง / ๐‘ค) โ‰  0)
100 simprlr 778 . . . . . . . . . . . . . . . . . . . . . 22 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ค โˆˆ โ„•)
101100nncnd 12224 . . . . . . . . . . . . . . . . . . . . 21 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ค โˆˆ โ„‚)
102100nnne0d 12258 . . . . . . . . . . . . . . . . . . . . 21 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ค โ‰  0)
103101, 102div0d 11985 . . . . . . . . . . . . . . . . . . . 20 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (0 / ๐‘ค) = 0)
104 oveq1 7412 . . . . . . . . . . . . . . . . . . . . 21 (๐‘ง = 0 โ†’ (๐‘ง / ๐‘ค) = (0 / ๐‘ค))
105104eqeq1d 2734 . . . . . . . . . . . . . . . . . . . 20 (๐‘ง = 0 โ†’ ((๐‘ง / ๐‘ค) = 0 โ†” (0 / ๐‘ค) = 0))
106103, 105syl5ibrcom 246 . . . . . . . . . . . . . . . . . . 19 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ง = 0 โ†’ (๐‘ง / ๐‘ค) = 0))
107106necon3d 2961 . . . . . . . . . . . . . . . . . 18 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ง / ๐‘ค) โ‰  0 โ†’ ๐‘ง โ‰  0))
10899, 107mpd 15 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ง โ‰  0)
109 pczcl 16777 . . . . . . . . . . . . . . . . 17 ((๐‘ƒ โˆˆ โ„™ โˆง (๐‘ง โˆˆ โ„ค โˆง ๐‘ง โ‰  0)) โ†’ (๐‘ƒ pCnt ๐‘ง) โˆˆ โ„•0)
11022, 97, 108, 109syl12anc 835 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐‘ง) โˆˆ โ„•0)
11124, 110nnexpcld 14204 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โˆˆ โ„•)
112111nncnd 12224 . . . . . . . . . . . . . 14 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โˆˆ โ„‚)
113112, 101mulcomd 11231 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) ยท ๐‘ค) = (๐‘ค ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))))
114113oveq2d 7421 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ง ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) ยท ๐‘ค)) = ((๐‘ง ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) / (๐‘ค ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)))))
11597zcnd 12663 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ง โˆˆ โ„‚)
11622, 100pccld 16779 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐‘ค) โˆˆ โ„•0)
11724, 116nnexpcld 14204 . . . . . . . . . . . . . 14 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆˆ โ„•)
118117nncnd 12224 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆˆ โ„‚)
119111nnne0d 12258 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โ‰  0)
120117nnne0d 12258 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โ‰  0)
121115, 112, 101, 118, 119, 120, 102divdivdivd 12033 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))) / (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))) = ((๐‘ง ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) ยท ๐‘ค)))
12298oveq2d 7421 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ต) = (๐‘ƒ pCnt (๐‘ง / ๐‘ค)))
123 pcdiv 16781 . . . . . . . . . . . . . . . . . 18 ((๐‘ƒ โˆˆ โ„™ โˆง (๐‘ง โˆˆ โ„ค โˆง ๐‘ง โ‰  0) โˆง ๐‘ค โˆˆ โ„•) โ†’ (๐‘ƒ pCnt (๐‘ง / ๐‘ค)) = ((๐‘ƒ pCnt ๐‘ง) โˆ’ (๐‘ƒ pCnt ๐‘ค)))
12422, 97, 108, 100, 123syl121anc 1375 . . . . . . . . . . . . . . . . 17 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt (๐‘ง / ๐‘ค)) = ((๐‘ƒ pCnt ๐‘ง) โˆ’ (๐‘ƒ pCnt ๐‘ค)))
125122, 124eqtrd 2772 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ต) = ((๐‘ƒ pCnt ๐‘ง) โˆ’ (๐‘ƒ pCnt ๐‘ค)))
126125oveq2d 7421 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)) = (๐‘ƒโ†‘((๐‘ƒ pCnt ๐‘ง) โˆ’ (๐‘ƒ pCnt ๐‘ค))))
127116nn0zd 12580 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐‘ค) โˆˆ โ„ค)
128110nn0zd 12580 . . . . . . . . . . . . . . . 16 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐‘ง) โˆˆ โ„ค)
12977, 78, 127, 128expsubd 14118 . . . . . . . . . . . . . . 15 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘((๐‘ƒ pCnt ๐‘ง) โˆ’ (๐‘ƒ pCnt ๐‘ค))) = ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))))
130126, 129eqtrd 2772 . . . . . . . . . . . . . 14 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)) = ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))))
131130oveq2d 7421 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐ต / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต))) = (๐ต / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))))
13298oveq1d 7420 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐ต / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))) = ((๐‘ง / ๐‘ค) / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))))
133115, 101, 112, 118, 102, 120, 119divdivdivd 12033 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ง / ๐‘ค) / ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))) = ((๐‘ง ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) / (๐‘ค ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)))))
134131, 132, 1333eqtrd 2776 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐ต / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต))) = ((๐‘ง ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) / (๐‘ค ยท (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)))))
135114, 121, 1343eqtr4d 2782 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))) / (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))) = (๐ต / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต))))
136135oveq2d 7421 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)) ยท ((๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))) / (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))))) = ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)) ยท (๐ต / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)))))
137 qcn 12943 . . . . . . . . . . . 12 (๐ต โˆˆ โ„š โ†’ ๐ต โˆˆ โ„‚)
13829, 137syl 17 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ต โˆˆ โ„‚)
13977, 78, 32expclzd 14112 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)) โˆˆ โ„‚)
14077, 78, 32expne0d 14113 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)) โ‰  0)
141138, 139, 140divcan2d 11988 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)) ยท (๐ต / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)))) = ๐ต)
142136, 141eqtr2d 2773 . . . . . . . . 9 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐ต = ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐ต)) ยท ((๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))) / (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))))))
143 eluz 12832 . . . . . . . . . . 11 (((๐‘ƒ pCnt ๐ด) โˆˆ โ„ค โˆง (๐‘ƒ pCnt ๐ต) โˆˆ โ„ค) โ†’ ((๐‘ƒ pCnt ๐ต) โˆˆ (โ„คโ‰ฅโ€˜(๐‘ƒ pCnt ๐ด)) โ†” (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt ๐ต)))
14492, 32, 143syl2anc 584 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒ pCnt ๐ต) โˆˆ (โ„คโ‰ฅโ€˜(๐‘ƒ pCnt ๐ด)) โ†” (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt ๐ต)))
14543, 144mpbird 256 . . . . . . . . 9 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ต) โˆˆ (โ„คโ‰ฅโ€˜(๐‘ƒ pCnt ๐ด)))
146 pczdvds 16792 . . . . . . . . . . . 12 ((๐‘ƒ โˆˆ โ„™ โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ฅ โ‰  0)) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โˆฅ ๐‘ฅ)
14722, 25, 58, 146syl12anc 835 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โˆฅ ๐‘ฅ)
14861nnzd 12581 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โˆˆ โ„ค)
149 dvdsval2 16196 . . . . . . . . . . . 12 (((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โˆˆ โ„ค โˆง (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โ‰  0 โˆง ๐‘ฅ โˆˆ โ„ค) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โˆฅ ๐‘ฅ โ†” (๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))) โˆˆ โ„ค))
150148, 69, 25, 149syl3anc 1371 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)) โˆฅ ๐‘ฅ โ†” (๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))) โˆˆ โ„ค))
151147, 150mpbid 231 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))) โˆˆ โ„ค)
152 pczndvds2 16796 . . . . . . . . . . 11 ((๐‘ƒ โˆˆ โ„™ โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ฅ โ‰  0)) โ†’ ยฌ ๐‘ƒ โˆฅ (๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))))
15322, 25, 58, 152syl12anc 835 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ยฌ ๐‘ƒ โˆฅ (๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))))
154151, 153jca 512 . . . . . . . . 9 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ))) โˆˆ โ„ค โˆง ยฌ ๐‘ƒ โˆฅ (๐‘ฅ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฅ)))))
155 pcdvds 16793 . . . . . . . . . . . . 13 ((๐‘ƒ โˆˆ โ„™ โˆง ๐‘ฆ โˆˆ โ„•) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆฅ ๐‘ฆ)
15622, 50, 155syl2anc 584 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆฅ ๐‘ฆ)
15767nnzd 12581 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆˆ โ„ค)
15850nnzd 12581 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ฆ โˆˆ โ„ค)
159 dvdsval2 16196 . . . . . . . . . . . . 13 (((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆˆ โ„ค โˆง (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โ‰  0 โˆง ๐‘ฆ โˆˆ โ„ค) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆฅ ๐‘ฆ โ†” (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) โˆˆ โ„ค))
160157, 70, 158, 159syl3anc 1371 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆฅ ๐‘ฆ โ†” (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) โˆˆ โ„ค))
161156, 160mpbid 231 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) โˆˆ โ„ค)
16250nnred 12223 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ฆ โˆˆ โ„)
16367nnred 12223 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)) โˆˆ โ„)
16450nngt0d 12257 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ 0 < ๐‘ฆ)
16567nngt0d 12257 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ 0 < (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))
166162, 163, 164, 165divgt0d 12145 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ 0 < (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))))
167 elnnz 12564 . . . . . . . . . . 11 ((๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) โˆˆ โ„• โ†” ((๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) โˆˆ โ„ค โˆง 0 < (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))))
168161, 166, 167sylanbrc 583 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) โˆˆ โ„•)
169 pcndvds2 16797 . . . . . . . . . . 11 ((๐‘ƒ โˆˆ โ„™ โˆง ๐‘ฆ โˆˆ โ„•) โ†’ ยฌ ๐‘ƒ โˆฅ (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))))
17022, 50, 169syl2anc 584 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ยฌ ๐‘ƒ โˆฅ (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))))
171168, 170jca 512 . . . . . . . . 9 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ))) โˆˆ โ„• โˆง ยฌ ๐‘ƒ โˆฅ (๐‘ฆ / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ฆ)))))
172 pczdvds 16792 . . . . . . . . . . . 12 ((๐‘ƒ โˆˆ โ„™ โˆง (๐‘ง โˆˆ โ„ค โˆง ๐‘ง โ‰  0)) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โˆฅ ๐‘ง)
17322, 97, 108, 172syl12anc 835 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โˆฅ ๐‘ง)
174111nnzd 12581 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โˆˆ โ„ค)
175 dvdsval2 16196 . . . . . . . . . . . 12 (((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โˆˆ โ„ค โˆง (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โ‰  0 โˆง ๐‘ง โˆˆ โ„ค) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โˆฅ ๐‘ง โ†” (๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))) โˆˆ โ„ค))
176174, 119, 97, 175syl3anc 1371 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)) โˆฅ ๐‘ง โ†” (๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))) โˆˆ โ„ค))
177173, 176mpbid 231 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))) โˆˆ โ„ค)
178 pczndvds2 16796 . . . . . . . . . . 11 ((๐‘ƒ โˆˆ โ„™ โˆง (๐‘ง โˆˆ โ„ค โˆง ๐‘ง โ‰  0)) โ†’ ยฌ ๐‘ƒ โˆฅ (๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))))
17922, 97, 108, 178syl12anc 835 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ยฌ ๐‘ƒ โˆฅ (๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))))
180177, 179jca 512 . . . . . . . . 9 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง))) โˆˆ โ„ค โˆง ยฌ ๐‘ƒ โˆฅ (๐‘ง / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ง)))))
181 pcdvds 16793 . . . . . . . . . . . . 13 ((๐‘ƒ โˆˆ โ„™ โˆง ๐‘ค โˆˆ โ„•) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆฅ ๐‘ค)
18222, 100, 181syl2anc 584 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆฅ ๐‘ค)
183117nnzd 12581 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆˆ โ„ค)
184100nnzd 12581 . . . . . . . . . . . . 13 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ค โˆˆ โ„ค)
185 dvdsval2 16196 . . . . . . . . . . . . 13 (((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆˆ โ„ค โˆง (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โ‰  0 โˆง ๐‘ค โˆˆ โ„ค) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆฅ ๐‘ค โ†” (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) โˆˆ โ„ค))
186183, 120, 184, 185syl3anc 1371 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆฅ ๐‘ค โ†” (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) โˆˆ โ„ค))
187182, 186mpbid 231 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) โˆˆ โ„ค)
188100nnred 12223 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ๐‘ค โˆˆ โ„)
189117nnred 12223 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)) โˆˆ โ„)
190100nngt0d 12257 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ 0 < ๐‘ค)
191117nngt0d 12257 . . . . . . . . . . . 12 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ 0 < (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))
192188, 189, 190, 191divgt0d 12145 . . . . . . . . . . 11 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ 0 < (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))))
193 elnnz 12564 . . . . . . . . . . 11 ((๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) โˆˆ โ„• โ†” ((๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) โˆˆ โ„ค โˆง 0 < (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))))
194187, 192, 193sylanbrc 583 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) โˆˆ โ„•)
195 pcndvds2 16797 . . . . . . . . . . 11 ((๐‘ƒ โˆˆ โ„™ โˆง ๐‘ค โˆˆ โ„•) โ†’ ยฌ ๐‘ƒ โˆฅ (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))))
19622, 100, 195syl2anc 584 . . . . . . . . . 10 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ยฌ ๐‘ƒ โˆฅ (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))))
197194, 196jca 512 . . . . . . . . 9 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ ((๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค))) โˆˆ โ„• โˆง ยฌ ๐‘ƒ โˆฅ (๐‘ค / (๐‘ƒโ†‘(๐‘ƒ pCnt ๐‘ค)))))
19822, 96, 142, 145, 154, 171, 180, 197pcaddlem 16817 . . . . . . . 8 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง ((๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•) โˆง (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)))) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต)))
199198expr 457 . . . . . . 7 ((((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โˆง (๐‘ฆ โˆˆ โ„• โˆง ๐‘ค โˆˆ โ„•)) โ†’ ((๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต))))
200199rexlimdvva 3211 . . . . . 6 (((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โ†’ (โˆƒ๐‘ฆ โˆˆ โ„• โˆƒ๐‘ค โˆˆ โ„• (๐ด = (๐‘ฅ / ๐‘ฆ) โˆง ๐ต = (๐‘ง / ๐‘ค)) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต))))
20121, 200biimtrrid 242 . . . . 5 (((๐œ‘ โˆง ๐ต โ‰  0) โˆง (๐‘ฅ โˆˆ โ„ค โˆง ๐‘ง โˆˆ โ„ค)) โ†’ ((โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ) โˆง โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค)) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต))))
202201rexlimdvva 3211 . . . 4 ((๐œ‘ โˆง ๐ต โ‰  0) โ†’ (โˆƒ๐‘ฅ โˆˆ โ„ค โˆƒ๐‘ง โˆˆ โ„ค (โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ) โˆง โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค)) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต))))
20320, 202biimtrrid 242 . . 3 ((๐œ‘ โˆง ๐ต โ‰  0) โ†’ ((โˆƒ๐‘ฅ โˆˆ โ„ค โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ) โˆง โˆƒ๐‘ง โˆˆ โ„ค โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค)) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต))))
20419, 203pm2.61dane 3029 . 2 (๐œ‘ โ†’ ((โˆƒ๐‘ฅ โˆˆ โ„ค โˆƒ๐‘ฆ โˆˆ โ„• ๐ด = (๐‘ฅ / ๐‘ฆ) โˆง โˆƒ๐‘ง โˆˆ โ„ค โˆƒ๐‘ค โˆˆ โ„• ๐ต = (๐‘ง / ๐‘ค)) โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต))))
2053, 6, 204mp2and 697 1 (๐œ‘ โ†’ (๐‘ƒ pCnt ๐ด) โ‰ค (๐‘ƒ pCnt (๐ด + ๐ต)))
Colors of variables: wff setvar class
Syntax hints:  ยฌ wn 3   โ†’ wi 4   โ†” wb 205   โˆง wa 396   = wceq 1541   โˆˆ wcel 2106   โ‰  wne 2940  โˆƒwrex 3070   class class class wbr 5147  โ€˜cfv 6540  (class class class)co 7405  โ„‚cc 11104  โ„cr 11105  0cc0 11106   + caddc 11109   ยท cmul 11111  +โˆžcpnf 11241  โ„*cxr 11243   < clt 11244   โ‰ค cle 11245   โˆ’ cmin 11440   / cdiv 11867  โ„•cn 12208  โ„•0cn0 12468  โ„คcz 12554  โ„คโ‰ฅcuz 12818  โ„šcq 12928  โ†‘cexp 14023   โˆฅ cdvds 16193  โ„™cprime 16604   pCnt cpc 16765
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1797  ax-4 1811  ax-5 1913  ax-6 1971  ax-7 2011  ax-8 2108  ax-9 2116  ax-10 2137  ax-11 2154  ax-12 2171  ax-ext 2703  ax-sep 5298  ax-nul 5305  ax-pow 5362  ax-pr 5426  ax-un 7721  ax-cnex 11162  ax-resscn 11163  ax-1cn 11164  ax-icn 11165  ax-addcl 11166  ax-addrcl 11167  ax-mulcl 11168  ax-mulrcl 11169  ax-mulcom 11170  ax-addass 11171  ax-mulass 11172  ax-distr 11173  ax-i2m1 11174  ax-1ne0 11175  ax-1rid 11176  ax-rnegex 11177  ax-rrecex 11178  ax-cnre 11179  ax-pre-lttri 11180  ax-pre-lttrn 11181  ax-pre-ltadd 11182  ax-pre-mulgt0 11183  ax-pre-sup 11184
This theorem depends on definitions:  df-bi 206  df-an 397  df-or 846  df-3or 1088  df-3an 1089  df-tru 1544  df-fal 1554  df-ex 1782  df-nf 1786  df-sb 2068  df-mo 2534  df-eu 2563  df-clab 2710  df-cleq 2724  df-clel 2810  df-nfc 2885  df-ne 2941  df-nel 3047  df-ral 3062  df-rex 3071  df-rmo 3376  df-reu 3377  df-rab 3433  df-v 3476  df-sbc 3777  df-csb 3893  df-dif 3950  df-un 3952  df-in 3954  df-ss 3964  df-pss 3966  df-nul 4322  df-if 4528  df-pw 4603  df-sn 4628  df-pr 4630  df-op 4634  df-uni 4908  df-iun 4998  df-br 5148  df-opab 5210  df-mpt 5231  df-tr 5265  df-id 5573  df-eprel 5579  df-po 5587  df-so 5588  df-fr 5630  df-we 5632  df-xp 5681  df-rel 5682  df-cnv 5683  df-co 5684  df-dm 5685  df-rn 5686  df-res 5687  df-ima 5688  df-pred 6297  df-ord 6364  df-on 6365  df-lim 6366  df-suc 6367  df-iota 6492  df-fun 6542  df-fn 6543  df-f 6544  df-f1 6545  df-fo 6546  df-f1o 6547  df-fv 6548  df-riota 7361  df-ov 7408  df-oprab 7409  df-mpo 7410  df-om 7852  df-1st 7971  df-2nd 7972  df-frecs 8262  df-wrecs 8293  df-recs 8367  df-rdg 8406  df-1o 8462  df-2o 8463  df-er 8699  df-en 8936  df-dom 8937  df-sdom 8938  df-fin 8939  df-sup 9433  df-inf 9434  df-pnf 11246  df-mnf 11247  df-xr 11248  df-ltxr 11249  df-le 11250  df-sub 11442  df-neg 11443  df-div 11868  df-nn 12209  df-2 12271  df-3 12272  df-n0 12469  df-z 12555  df-uz 12819  df-q 12929  df-rp 12971  df-fl 13753  df-mod 13831  df-seq 13963  df-exp 14024  df-cj 15042  df-re 15043  df-im 15044  df-sqrt 15178  df-abs 15179  df-dvds 16194  df-gcd 16432  df-prm 16605  df-pc 16766
This theorem is referenced by:  pcadd2  16819  padicabv  27122
  Copyright terms: Public domain W3C validator