Users' Mathboxes Mathbox for Stefan O'Rear < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  elmnc Structured version   Visualization version   GIF version

Theorem elmnc 36549
Description: Property of a monic polynomial. (Contributed by Stefan O'Rear, 5-Dec-2014.)
Assertion
Ref Expression
elmnc (𝑃 ∈ ( Monic ‘𝑆) ↔ (𝑃 ∈ (Poly‘𝑆) ∧ ((coeff‘𝑃)‘(deg‘𝑃)) = 1))

Proof of Theorem elmnc
Dummy variables 𝑠 𝑝 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 df-mnc 36546 . . . . 5 Monic = (𝑠 ∈ 𝒫 ℂ ↦ {𝑝 ∈ (Poly‘𝑠) ∣ ((coeff‘𝑝)‘(deg‘𝑝)) = 1})
21dmmptss 5534 . . . 4 dom Monic ⊆ 𝒫 ℂ
3 elfvdm 6115 . . . 4 (𝑃 ∈ ( Monic ‘𝑆) → 𝑆 ∈ dom Monic )
42, 3sseldi 3565 . . 3 (𝑃 ∈ ( Monic ‘𝑆) → 𝑆 ∈ 𝒫 ℂ)
54elpwid 4117 . 2 (𝑃 ∈ ( Monic ‘𝑆) → 𝑆 ⊆ ℂ)
6 plybss 23699 . . 3 (𝑃 ∈ (Poly‘𝑆) → 𝑆 ⊆ ℂ)
76adantr 479 . 2 ((𝑃 ∈ (Poly‘𝑆) ∧ ((coeff‘𝑃)‘(deg‘𝑃)) = 1) → 𝑆 ⊆ ℂ)
8 cnex 9874 . . . . . 6 ℂ ∈ V
98elpw2 4750 . . . . 5 (𝑆 ∈ 𝒫 ℂ ↔ 𝑆 ⊆ ℂ)
10 fveq2 6088 . . . . . . 7 (𝑠 = 𝑆 → (Poly‘𝑠) = (Poly‘𝑆))
11 rabeq 3165 . . . . . . 7 ((Poly‘𝑠) = (Poly‘𝑆) → {𝑝 ∈ (Poly‘𝑠) ∣ ((coeff‘𝑝)‘(deg‘𝑝)) = 1} = {𝑝 ∈ (Poly‘𝑆) ∣ ((coeff‘𝑝)‘(deg‘𝑝)) = 1})
1210, 11syl 17 . . . . . 6 (𝑠 = 𝑆 → {𝑝 ∈ (Poly‘𝑠) ∣ ((coeff‘𝑝)‘(deg‘𝑝)) = 1} = {𝑝 ∈ (Poly‘𝑆) ∣ ((coeff‘𝑝)‘(deg‘𝑝)) = 1})
13 fvex 6098 . . . . . . 7 (Poly‘𝑆) ∈ V
1413rabex 4735 . . . . . 6 {𝑝 ∈ (Poly‘𝑆) ∣ ((coeff‘𝑝)‘(deg‘𝑝)) = 1} ∈ V
1512, 1, 14fvmpt 6176 . . . . 5 (𝑆 ∈ 𝒫 ℂ → ( Monic ‘𝑆) = {𝑝 ∈ (Poly‘𝑆) ∣ ((coeff‘𝑝)‘(deg‘𝑝)) = 1})
169, 15sylbir 223 . . . 4 (𝑆 ⊆ ℂ → ( Monic ‘𝑆) = {𝑝 ∈ (Poly‘𝑆) ∣ ((coeff‘𝑝)‘(deg‘𝑝)) = 1})
1716eleq2d 2672 . . 3 (𝑆 ⊆ ℂ → (𝑃 ∈ ( Monic ‘𝑆) ↔ 𝑃 ∈ {𝑝 ∈ (Poly‘𝑆) ∣ ((coeff‘𝑝)‘(deg‘𝑝)) = 1}))
18 fveq2 6088 . . . . . 6 (𝑝 = 𝑃 → (coeff‘𝑝) = (coeff‘𝑃))
19 fveq2 6088 . . . . . 6 (𝑝 = 𝑃 → (deg‘𝑝) = (deg‘𝑃))
2018, 19fveq12d 6094 . . . . 5 (𝑝 = 𝑃 → ((coeff‘𝑝)‘(deg‘𝑝)) = ((coeff‘𝑃)‘(deg‘𝑃)))
2120eqeq1d 2611 . . . 4 (𝑝 = 𝑃 → (((coeff‘𝑝)‘(deg‘𝑝)) = 1 ↔ ((coeff‘𝑃)‘(deg‘𝑃)) = 1))
2221elrab 3330 . . 3 (𝑃 ∈ {𝑝 ∈ (Poly‘𝑆) ∣ ((coeff‘𝑝)‘(deg‘𝑝)) = 1} ↔ (𝑃 ∈ (Poly‘𝑆) ∧ ((coeff‘𝑃)‘(deg‘𝑃)) = 1))
2317, 22syl6bb 274 . 2 (𝑆 ⊆ ℂ → (𝑃 ∈ ( Monic ‘𝑆) ↔ (𝑃 ∈ (Poly‘𝑆) ∧ ((coeff‘𝑃)‘(deg‘𝑃)) = 1)))
245, 7, 23pm5.21nii 366 1 (𝑃 ∈ ( Monic ‘𝑆) ↔ (𝑃 ∈ (Poly‘𝑆) ∧ ((coeff‘𝑃)‘(deg‘𝑃)) = 1))
Colors of variables: wff setvar class
Syntax hints:  wb 194  wa 382   = wceq 1474  wcel 1976  {crab 2899  wss 3539  𝒫 cpw 4107  dom cdm 5028  cfv 5790  cc 9791  1c1 9794  Polycply 23689  coeffccoe 23691  degcdgr 23692   Monic cmnc 36544
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1712  ax-4 1727  ax-5 1826  ax-6 1874  ax-7 1921  ax-8 1978  ax-9 1985  ax-10 2005  ax-11 2020  ax-12 2033  ax-13 2233  ax-ext 2589  ax-sep 4703  ax-nul 4712  ax-pow 4764  ax-pr 4828  ax-cnex 9849
This theorem depends on definitions:  df-bi 195  df-or 383  df-an 384  df-3an 1032  df-tru 1477  df-ex 1695  df-nf 1700  df-sb 1867  df-eu 2461  df-mo 2462  df-clab 2596  df-cleq 2602  df-clel 2605  df-nfc 2739  df-ne 2781  df-ral 2900  df-rex 2901  df-rab 2904  df-v 3174  df-sbc 3402  df-dif 3542  df-un 3544  df-in 3546  df-ss 3553  df-nul 3874  df-if 4036  df-pw 4109  df-sn 4125  df-pr 4127  df-op 4131  df-uni 4367  df-br 4578  df-opab 4638  df-mpt 4639  df-id 4943  df-xp 5034  df-rel 5035  df-cnv 5036  df-co 5037  df-dm 5038  df-rn 5039  df-res 5040  df-ima 5041  df-iota 5754  df-fun 5792  df-fv 5798  df-ply 23693  df-mnc 36546
This theorem is referenced by:  mncply  36550  mnccoe  36551
  Copyright terms: Public domain W3C validator