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

Theorem pcval 15473
Description: The value of the prime power function. (Contributed by Mario Carneiro, 23-Feb-2014.) (Revised by Mario Carneiro, 3-Oct-2014.)
Hypotheses
Ref Expression
pcval.1 𝑆 = sup({𝑛 ∈ ℕ0 ∣ (𝑃𝑛) ∥ 𝑥}, ℝ, < )
pcval.2 𝑇 = sup({𝑛 ∈ ℕ0 ∣ (𝑃𝑛) ∥ 𝑦}, ℝ, < )
Assertion
Ref Expression
pcval ((𝑃 ∈ ℙ ∧ (𝑁 ∈ ℚ ∧ 𝑁 ≠ 0)) → (𝑃 pCnt 𝑁) = (℩𝑧𝑥 ∈ ℤ ∃𝑦 ∈ ℕ (𝑁 = (𝑥 / 𝑦) ∧ 𝑧 = (𝑆𝑇))))
Distinct variable groups:   𝑥,𝑛,𝑦,𝑧,𝑁   𝑃,𝑛,𝑥,𝑦,𝑧   𝑧,𝑆   𝑧,𝑇
Allowed substitution hints:   𝑆(𝑥,𝑦,𝑛)   𝑇(𝑥,𝑦,𝑛)

Proof of Theorem pcval
Dummy variables 𝑝 𝑟 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 simpr 477 . . . . . 6 ((𝑝 = 𝑃𝑟 = 𝑁) → 𝑟 = 𝑁)
21eqeq1d 2623 . . . . 5 ((𝑝 = 𝑃𝑟 = 𝑁) → (𝑟 = 0 ↔ 𝑁 = 0))
3 eqeq1 2625 . . . . . . . 8 (𝑟 = 𝑁 → (𝑟 = (𝑥 / 𝑦) ↔ 𝑁 = (𝑥 / 𝑦)))
4 oveq1 6611 . . . . . . . . . . . . . 14 (𝑝 = 𝑃 → (𝑝𝑛) = (𝑃𝑛))
54breq1d 4623 . . . . . . . . . . . . 13 (𝑝 = 𝑃 → ((𝑝𝑛) ∥ 𝑥 ↔ (𝑃𝑛) ∥ 𝑥))
65rabbidv 3177 . . . . . . . . . . . 12 (𝑝 = 𝑃 → {𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑥} = {𝑛 ∈ ℕ0 ∣ (𝑃𝑛) ∥ 𝑥})
76supeq1d 8296 . . . . . . . . . . 11 (𝑝 = 𝑃 → sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑥}, ℝ, < ) = sup({𝑛 ∈ ℕ0 ∣ (𝑃𝑛) ∥ 𝑥}, ℝ, < ))
8 pcval.1 . . . . . . . . . . 11 𝑆 = sup({𝑛 ∈ ℕ0 ∣ (𝑃𝑛) ∥ 𝑥}, ℝ, < )
97, 8syl6eqr 2673 . . . . . . . . . 10 (𝑝 = 𝑃 → sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑥}, ℝ, < ) = 𝑆)
104breq1d 4623 . . . . . . . . . . . . 13 (𝑝 = 𝑃 → ((𝑝𝑛) ∥ 𝑦 ↔ (𝑃𝑛) ∥ 𝑦))
1110rabbidv 3177 . . . . . . . . . . . 12 (𝑝 = 𝑃 → {𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑦} = {𝑛 ∈ ℕ0 ∣ (𝑃𝑛) ∥ 𝑦})
1211supeq1d 8296 . . . . . . . . . . 11 (𝑝 = 𝑃 → sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑦}, ℝ, < ) = sup({𝑛 ∈ ℕ0 ∣ (𝑃𝑛) ∥ 𝑦}, ℝ, < ))
13 pcval.2 . . . . . . . . . . 11 𝑇 = sup({𝑛 ∈ ℕ0 ∣ (𝑃𝑛) ∥ 𝑦}, ℝ, < )
1412, 13syl6eqr 2673 . . . . . . . . . 10 (𝑝 = 𝑃 → sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑦}, ℝ, < ) = 𝑇)
159, 14oveq12d 6622 . . . . . . . . 9 (𝑝 = 𝑃 → (sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑥}, ℝ, < ) − sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑦}, ℝ, < )) = (𝑆𝑇))
1615eqeq2d 2631 . . . . . . . 8 (𝑝 = 𝑃 → (𝑧 = (sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑥}, ℝ, < ) − sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑦}, ℝ, < )) ↔ 𝑧 = (𝑆𝑇)))
173, 16bi2anan9r 917 . . . . . . 7 ((𝑝 = 𝑃𝑟 = 𝑁) → ((𝑟 = (𝑥 / 𝑦) ∧ 𝑧 = (sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑥}, ℝ, < ) − sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑦}, ℝ, < ))) ↔ (𝑁 = (𝑥 / 𝑦) ∧ 𝑧 = (𝑆𝑇))))
18172rexbidv 3050 . . . . . 6 ((𝑝 = 𝑃𝑟 = 𝑁) → (∃𝑥 ∈ ℤ ∃𝑦 ∈ ℕ (𝑟 = (𝑥 / 𝑦) ∧ 𝑧 = (sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑥}, ℝ, < ) − sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑦}, ℝ, < ))) ↔ ∃𝑥 ∈ ℤ ∃𝑦 ∈ ℕ (𝑁 = (𝑥 / 𝑦) ∧ 𝑧 = (𝑆𝑇))))
1918iotabidv 5831 . . . . 5 ((𝑝 = 𝑃𝑟 = 𝑁) → (℩𝑧𝑥 ∈ ℤ ∃𝑦 ∈ ℕ (𝑟 = (𝑥 / 𝑦) ∧ 𝑧 = (sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑥}, ℝ, < ) − sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑦}, ℝ, < )))) = (℩𝑧𝑥 ∈ ℤ ∃𝑦 ∈ ℕ (𝑁 = (𝑥 / 𝑦) ∧ 𝑧 = (𝑆𝑇))))
202, 19ifbieq2d 4083 . . . 4 ((𝑝 = 𝑃𝑟 = 𝑁) → if(𝑟 = 0, +∞, (℩𝑧𝑥 ∈ ℤ ∃𝑦 ∈ ℕ (𝑟 = (𝑥 / 𝑦) ∧ 𝑧 = (sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑥}, ℝ, < ) − sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑦}, ℝ, < ))))) = if(𝑁 = 0, +∞, (℩𝑧𝑥 ∈ ℤ ∃𝑦 ∈ ℕ (𝑁 = (𝑥 / 𝑦) ∧ 𝑧 = (𝑆𝑇)))))
21 df-pc 15466 . . . 4 pCnt = (𝑝 ∈ ℙ, 𝑟 ∈ ℚ ↦ if(𝑟 = 0, +∞, (℩𝑧𝑥 ∈ ℤ ∃𝑦 ∈ ℕ (𝑟 = (𝑥 / 𝑦) ∧ 𝑧 = (sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑥}, ℝ, < ) − sup({𝑛 ∈ ℕ0 ∣ (𝑝𝑛) ∥ 𝑦}, ℝ, < ))))))
22 pnfex 10037 . . . . 5 +∞ ∈ V
23 iotaex 5827 . . . . 5 (℩𝑧𝑥 ∈ ℤ ∃𝑦 ∈ ℕ (𝑁 = (𝑥 / 𝑦) ∧ 𝑧 = (𝑆𝑇))) ∈ V
2422, 23ifex 4128 . . . 4 if(𝑁 = 0, +∞, (℩𝑧𝑥 ∈ ℤ ∃𝑦 ∈ ℕ (𝑁 = (𝑥 / 𝑦) ∧ 𝑧 = (𝑆𝑇)))) ∈ V
2520, 21, 24ovmpt2a 6744 . . 3 ((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℚ) → (𝑃 pCnt 𝑁) = if(𝑁 = 0, +∞, (℩𝑧𝑥 ∈ ℤ ∃𝑦 ∈ ℕ (𝑁 = (𝑥 / 𝑦) ∧ 𝑧 = (𝑆𝑇)))))
26 ifnefalse 4070 . . 3 (𝑁 ≠ 0 → if(𝑁 = 0, +∞, (℩𝑧𝑥 ∈ ℤ ∃𝑦 ∈ ℕ (𝑁 = (𝑥 / 𝑦) ∧ 𝑧 = (𝑆𝑇)))) = (℩𝑧𝑥 ∈ ℤ ∃𝑦 ∈ ℕ (𝑁 = (𝑥 / 𝑦) ∧ 𝑧 = (𝑆𝑇))))
2725, 26sylan9eq 2675 . 2 (((𝑃 ∈ ℙ ∧ 𝑁 ∈ ℚ) ∧ 𝑁 ≠ 0) → (𝑃 pCnt 𝑁) = (℩𝑧𝑥 ∈ ℤ ∃𝑦 ∈ ℕ (𝑁 = (𝑥 / 𝑦) ∧ 𝑧 = (𝑆𝑇))))
2827anasss 678 1 ((𝑃 ∈ ℙ ∧ (𝑁 ∈ ℚ ∧ 𝑁 ≠ 0)) → (𝑃 pCnt 𝑁) = (℩𝑧𝑥 ∈ ℤ ∃𝑦 ∈ ℕ (𝑁 = (𝑥 / 𝑦) ∧ 𝑧 = (𝑆𝑇))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wa 384   = wceq 1480  wcel 1987  wne 2790  wrex 2908  {crab 2911  ifcif 4058   class class class wbr 4613  cio 5808  (class class class)co 6604  supcsup 8290  cr 9879  0cc0 9880  +∞cpnf 10015   < clt 10018  cmin 10210   / cdiv 10628  cn 10964  0cn0 11236  cz 11321  cq 11732  cexp 12800  cdvds 14907  cprime 15309   pCnt cpc 15465
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1719  ax-4 1734  ax-5 1836  ax-6 1885  ax-7 1932  ax-8 1989  ax-9 1996  ax-10 2016  ax-11 2031  ax-12 2044  ax-13 2245  ax-ext 2601  ax-sep 4741  ax-nul 4749  ax-pow 4803  ax-pr 4867  ax-un 6902  ax-cnex 9936
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3an 1038  df-tru 1483  df-ex 1702  df-nf 1707  df-sb 1878  df-eu 2473  df-mo 2474  df-clab 2608  df-cleq 2614  df-clel 2617  df-nfc 2750  df-ne 2791  df-ral 2912  df-rex 2913  df-rab 2916  df-v 3188  df-sbc 3418  df-dif 3558  df-un 3560  df-in 3562  df-ss 3569  df-nul 3892  df-if 4059  df-pw 4132  df-sn 4149  df-pr 4151  df-op 4155  df-uni 4403  df-br 4614  df-opab 4674  df-id 4989  df-xp 5080  df-rel 5081  df-cnv 5082  df-co 5083  df-dm 5084  df-iota 5810  df-fun 5849  df-fv 5855  df-ov 6607  df-oprab 6608  df-mpt2 6609  df-sup 8292  df-pnf 10020  df-xr 10022  df-pc 15466
This theorem is referenced by:  pczpre  15476  pcdiv  15481
  Copyright terms: Public domain W3C validator