Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  algextdeglem6 Structured version   Visualization version   GIF version

Theorem algextdeglem6 33685
Description: Lemma for algextdeg 33688. By r1pquslmic 33549, the univariate polynomial remainder ring (𝐻s 𝑃) is isomorphic with the quotient ring 𝑄. (Contributed by Thierry Arnoux, 2-Apr-2025.)
Hypotheses
Ref Expression
algextdeg.k 𝐾 = (𝐸s 𝐹)
algextdeg.l 𝐿 = (𝐸s (𝐸 fldGen (𝐹 ∪ {𝐴})))
algextdeg.d 𝐷 = (deg1𝐸)
algextdeg.m 𝑀 = (𝐸 minPoly 𝐹)
algextdeg.f (𝜑𝐸 ∈ Field)
algextdeg.e (𝜑𝐹 ∈ (SubDRing‘𝐸))
algextdeg.a (𝜑𝐴 ∈ (𝐸 IntgRing 𝐹))
algextdeglem.o 𝑂 = (𝐸 evalSub1 𝐹)
algextdeglem.y 𝑃 = (Poly1𝐾)
algextdeglem.u 𝑈 = (Base‘𝑃)
algextdeglem.g 𝐺 = (𝑝𝑈 ↦ ((𝑂𝑝)‘𝐴))
algextdeglem.n 𝑁 = (𝑥𝑈 ↦ [𝑥](𝑃 ~QG 𝑍))
algextdeglem.z 𝑍 = (𝐺 “ {(0g𝐿)})
algextdeglem.q 𝑄 = (𝑃 /s (𝑃 ~QG 𝑍))
algextdeglem.j 𝐽 = (𝑝 ∈ (Base‘𝑄) ↦ (𝐺𝑝))
algextdeglem.r 𝑅 = (rem1p𝐾)
algextdeglem.h 𝐻 = (𝑝𝑈 ↦ (𝑝𝑅(𝑀𝐴)))
Assertion
Ref Expression
algextdeglem6 (𝜑 → (dim‘𝑄) = (dim‘(𝐻s 𝑃)))
Distinct variable groups:   𝐴,𝑝   𝐸,𝑝   𝐹,𝑝,𝑥   𝐺,𝑝,𝑥   𝐻,𝑝   𝐽,𝑝,𝑥   𝐾,𝑝   𝐿,𝑝,𝑥   𝑀,𝑝   𝑥,𝑁   𝑂,𝑝   𝑃,𝑝,𝑥   𝑄,𝑝,𝑥   𝑅,𝑝   𝑈,𝑝,𝑥   𝑍,𝑝,𝑥   𝜑,𝑝,𝑥
Allowed substitution hints:   𝐴(𝑥)   𝐷(𝑥,𝑝)   𝑅(𝑥)   𝐸(𝑥)   𝐻(𝑥)   𝐾(𝑥)   𝑀(𝑥)   𝑁(𝑝)   𝑂(𝑥)

Proof of Theorem algextdeglem6
StepHypRef Expression
1 algextdeglem.q . . . 4 𝑄 = (𝑃 /s (𝑃 ~QG 𝑍))
2 algextdeg.k . . . . . . . 8 𝐾 = (𝐸s 𝐹)
3 algextdeg.l . . . . . . . 8 𝐿 = (𝐸s (𝐸 fldGen (𝐹 ∪ {𝐴})))
4 algextdeg.d . . . . . . . 8 𝐷 = (deg1𝐸)
5 algextdeg.m . . . . . . . 8 𝑀 = (𝐸 minPoly 𝐹)
6 algextdeg.f . . . . . . . 8 (𝜑𝐸 ∈ Field)
7 algextdeg.e . . . . . . . 8 (𝜑𝐹 ∈ (SubDRing‘𝐸))
8 algextdeg.a . . . . . . . 8 (𝜑𝐴 ∈ (𝐸 IntgRing 𝐹))
9 algextdeglem.o . . . . . . . 8 𝑂 = (𝐸 evalSub1 𝐹)
10 algextdeglem.y . . . . . . . 8 𝑃 = (Poly1𝐾)
11 algextdeglem.u . . . . . . . 8 𝑈 = (Base‘𝑃)
12 algextdeglem.g . . . . . . . 8 𝐺 = (𝑝𝑈 ↦ ((𝑂𝑝)‘𝐴))
13 algextdeglem.n . . . . . . . 8 𝑁 = (𝑥𝑈 ↦ [𝑥](𝑃 ~QG 𝑍))
14 algextdeglem.z . . . . . . . 8 𝑍 = (𝐺 “ {(0g𝐿)})
15 algextdeglem.j . . . . . . . 8 𝐽 = (𝑝 ∈ (Base‘𝑄) ↦ (𝐺𝑝))
162, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 1, 15algextdeglem5 33684 . . . . . . 7 (𝜑𝑍 = ((RSpan‘𝑃)‘{(𝑀𝐴)}))
17 sdrgsubrg 20676 . . . . . . . . . . 11 (𝐹 ∈ (SubDRing‘𝐸) → 𝐹 ∈ (SubRing‘𝐸))
187, 17syl 17 . . . . . . . . . 10 (𝜑𝐹 ∈ (SubRing‘𝐸))
192subrgring 20459 . . . . . . . . . 10 (𝐹 ∈ (SubRing‘𝐸) → 𝐾 ∈ Ring)
2018, 19syl 17 . . . . . . . . 9 (𝜑𝐾 ∈ Ring)
2110ply1ring 22108 . . . . . . . . 9 (𝐾 ∈ Ring → 𝑃 ∈ Ring)
2220, 21syl 17 . . . . . . . 8 (𝜑𝑃 ∈ Ring)
232fveq2i 6843 . . . . . . . . . . 11 (Poly1𝐾) = (Poly1‘(𝐸s 𝐹))
2410, 23eqtri 2752 . . . . . . . . . 10 𝑃 = (Poly1‘(𝐸s 𝐹))
25 eqid 2729 . . . . . . . . . 10 (Base‘𝐸) = (Base‘𝐸)
26 eqid 2729 . . . . . . . . . . . 12 (0g𝐸) = (0g𝐸)
276fldcrngd 20627 . . . . . . . . . . . 12 (𝜑𝐸 ∈ CRing)
289, 2, 25, 26, 27, 18irngssv 33656 . . . . . . . . . . 11 (𝜑 → (𝐸 IntgRing 𝐹) ⊆ (Base‘𝐸))
2928, 8sseldd 3944 . . . . . . . . . 10 (𝜑𝐴 ∈ (Base‘𝐸))
30 eqid 2729 . . . . . . . . . 10 {𝑝 ∈ dom 𝑂 ∣ ((𝑂𝑝)‘𝐴) = (0g𝐸)} = {𝑝 ∈ dom 𝑂 ∣ ((𝑂𝑝)‘𝐴) = (0g𝐸)}
31 eqid 2729 . . . . . . . . . 10 (RSpan‘𝑃) = (RSpan‘𝑃)
32 eqid 2729 . . . . . . . . . 10 (idlGen1p‘(𝐸s 𝐹)) = (idlGen1p‘(𝐸s 𝐹))
339, 24, 25, 6, 7, 29, 26, 30, 31, 32, 5minplycl 33669 . . . . . . . . 9 (𝜑 → (𝑀𝐴) ∈ (Base‘𝑃))
3433, 11eleqtrrdi 2839 . . . . . . . 8 (𝜑 → (𝑀𝐴) ∈ 𝑈)
35 eqid 2729 . . . . . . . . 9 (∥r𝑃) = (∥r𝑃)
3611, 31, 35rspsn 21219 . . . . . . . 8 ((𝑃 ∈ Ring ∧ (𝑀𝐴) ∈ 𝑈) → ((RSpan‘𝑃)‘{(𝑀𝐴)}) = {𝑝 ∣ (𝑀𝐴)(∥r𝑃)𝑝})
3722, 34, 36syl2anc 584 . . . . . . 7 (𝜑 → ((RSpan‘𝑃)‘{(𝑀𝐴)}) = {𝑝 ∣ (𝑀𝐴)(∥r𝑃)𝑝})
38 nfv 1914 . . . . . . . . 9 𝑝𝜑
39 nfab1 2893 . . . . . . . . 9 𝑝{𝑝 ∣ (𝑀𝐴)(∥r𝑃)𝑝}
40 nfrab1 3423 . . . . . . . . 9 𝑝{𝑝𝑈 ∣ (𝐻𝑝) = (0g𝑃)}
4111, 35dvdsrcl2 20251 . . . . . . . . . . . . . 14 ((𝑃 ∈ Ring ∧ (𝑀𝐴)(∥r𝑃)𝑝) → 𝑝𝑈)
4241ex 412 . . . . . . . . . . . . 13 (𝑃 ∈ Ring → ((𝑀𝐴)(∥r𝑃)𝑝𝑝𝑈))
4342pm4.71rd 562 . . . . . . . . . . . 12 (𝑃 ∈ Ring → ((𝑀𝐴)(∥r𝑃)𝑝 ↔ (𝑝𝑈 ∧ (𝑀𝐴)(∥r𝑃)𝑝)))
4422, 43syl 17 . . . . . . . . . . 11 (𝜑 → ((𝑀𝐴)(∥r𝑃)𝑝 ↔ (𝑝𝑈 ∧ (𝑀𝐴)(∥r𝑃)𝑝)))
4520adantr 480 . . . . . . . . . . . . . 14 ((𝜑𝑝𝑈) → 𝐾 ∈ Ring)
46 simpr 484 . . . . . . . . . . . . . 14 ((𝜑𝑝𝑈) → 𝑝𝑈)
47 eqid 2729 . . . . . . . . . . . . . . . . 17 (0g‘(Poly1𝐸)) = (0g‘(Poly1𝐸))
482fveq2i 6843 . . . . . . . . . . . . . . . . 17 (Monic1p𝐾) = (Monic1p‘(𝐸s 𝐹))
4947, 6, 7, 5, 8, 48minplym1p 33676 . . . . . . . . . . . . . . . 16 (𝜑 → (𝑀𝐴) ∈ (Monic1p𝐾))
50 eqid 2729 . . . . . . . . . . . . . . . . 17 (Unic1p𝐾) = (Unic1p𝐾)
51 eqid 2729 . . . . . . . . . . . . . . . . 17 (Monic1p𝐾) = (Monic1p𝐾)
5250, 51mon1puc1p 26032 . . . . . . . . . . . . . . . 16 ((𝐾 ∈ Ring ∧ (𝑀𝐴) ∈ (Monic1p𝐾)) → (𝑀𝐴) ∈ (Unic1p𝐾))
5320, 49, 52syl2anc 584 . . . . . . . . . . . . . . 15 (𝜑 → (𝑀𝐴) ∈ (Unic1p𝐾))
5453adantr 480 . . . . . . . . . . . . . 14 ((𝜑𝑝𝑈) → (𝑀𝐴) ∈ (Unic1p𝐾))
55 eqid 2729 . . . . . . . . . . . . . . 15 (0g𝑃) = (0g𝑃)
56 algextdeglem.r . . . . . . . . . . . . . . 15 𝑅 = (rem1p𝐾)
5710, 35, 11, 50, 55, 56dvdsr1p 26045 . . . . . . . . . . . . . 14 ((𝐾 ∈ Ring ∧ 𝑝𝑈 ∧ (𝑀𝐴) ∈ (Unic1p𝐾)) → ((𝑀𝐴)(∥r𝑃)𝑝 ↔ (𝑝𝑅(𝑀𝐴)) = (0g𝑃)))
5845, 46, 54, 57syl3anc 1373 . . . . . . . . . . . . 13 ((𝜑𝑝𝑈) → ((𝑀𝐴)(∥r𝑃)𝑝 ↔ (𝑝𝑅(𝑀𝐴)) = (0g𝑃)))
59 ovexd 7404 . . . . . . . . . . . . . . 15 ((𝜑𝑝𝑈) → (𝑝𝑅(𝑀𝐴)) ∈ V)
60 algextdeglem.h . . . . . . . . . . . . . . . 16 𝐻 = (𝑝𝑈 ↦ (𝑝𝑅(𝑀𝐴)))
6160fvmpt2 6961 . . . . . . . . . . . . . . 15 ((𝑝𝑈 ∧ (𝑝𝑅(𝑀𝐴)) ∈ V) → (𝐻𝑝) = (𝑝𝑅(𝑀𝐴)))
6246, 59, 61syl2anc 584 . . . . . . . . . . . . . 14 ((𝜑𝑝𝑈) → (𝐻𝑝) = (𝑝𝑅(𝑀𝐴)))
6362eqeq1d 2731 . . . . . . . . . . . . 13 ((𝜑𝑝𝑈) → ((𝐻𝑝) = (0g𝑃) ↔ (𝑝𝑅(𝑀𝐴)) = (0g𝑃)))
6458, 63bitr4d 282 . . . . . . . . . . . 12 ((𝜑𝑝𝑈) → ((𝑀𝐴)(∥r𝑃)𝑝 ↔ (𝐻𝑝) = (0g𝑃)))
6564pm5.32da 579 . . . . . . . . . . 11 (𝜑 → ((𝑝𝑈 ∧ (𝑀𝐴)(∥r𝑃)𝑝) ↔ (𝑝𝑈 ∧ (𝐻𝑝) = (0g𝑃))))
6644, 65bitrd 279 . . . . . . . . . 10 (𝜑 → ((𝑀𝐴)(∥r𝑃)𝑝 ↔ (𝑝𝑈 ∧ (𝐻𝑝) = (0g𝑃))))
67 abid 2711 . . . . . . . . . 10 (𝑝 ∈ {𝑝 ∣ (𝑀𝐴)(∥r𝑃)𝑝} ↔ (𝑀𝐴)(∥r𝑃)𝑝)
68 rabid 3424 . . . . . . . . . 10 (𝑝 ∈ {𝑝𝑈 ∣ (𝐻𝑝) = (0g𝑃)} ↔ (𝑝𝑈 ∧ (𝐻𝑝) = (0g𝑃)))
6966, 67, 683bitr4g 314 . . . . . . . . 9 (𝜑 → (𝑝 ∈ {𝑝 ∣ (𝑀𝐴)(∥r𝑃)𝑝} ↔ 𝑝 ∈ {𝑝𝑈 ∣ (𝐻𝑝) = (0g𝑃)}))
7038, 39, 40, 69eqrd 3963 . . . . . . . 8 (𝜑 → {𝑝 ∣ (𝑀𝐴)(∥r𝑃)𝑝} = {𝑝𝑈 ∣ (𝐻𝑝) = (0g𝑃)})
7138, 59, 60fnmptd 6641 . . . . . . . . 9 (𝜑𝐻 Fn 𝑈)
72 fniniseg2 7016 . . . . . . . . 9 (𝐻 Fn 𝑈 → (𝐻 “ {(0g𝑃)}) = {𝑝𝑈 ∣ (𝐻𝑝) = (0g𝑃)})
7371, 72syl 17 . . . . . . . 8 (𝜑 → (𝐻 “ {(0g𝑃)}) = {𝑝𝑈 ∣ (𝐻𝑝) = (0g𝑃)})
7470, 73eqtr4d 2767 . . . . . . 7 (𝜑 → {𝑝 ∣ (𝑀𝐴)(∥r𝑃)𝑝} = (𝐻 “ {(0g𝑃)}))
7516, 37, 743eqtrd 2768 . . . . . 6 (𝜑𝑍 = (𝐻 “ {(0g𝑃)}))
7675oveq2d 7385 . . . . 5 (𝜑 → (𝑃 ~QG 𝑍) = (𝑃 ~QG (𝐻 “ {(0g𝑃)})))
7776oveq2d 7385 . . . 4 (𝜑 → (𝑃 /s (𝑃 ~QG 𝑍)) = (𝑃 /s (𝑃 ~QG (𝐻 “ {(0g𝑃)}))))
781, 77eqtrid 2776 . . 3 (𝜑𝑄 = (𝑃 /s (𝑃 ~QG (𝐻 “ {(0g𝑃)}))))
79 eqid 2729 . . . 4 (𝐻 “ {(0g𝑃)}) = (𝐻 “ {(0g𝑃)})
80 eqid 2729 . . . 4 (𝑃 /s (𝑃 ~QG (𝐻 “ {(0g𝑃)}))) = (𝑃 /s (𝑃 ~QG (𝐻 “ {(0g𝑃)})))
8110, 11, 56, 50, 60, 20, 53, 55, 79, 80r1pquslmic 33549 . . 3 (𝜑 → (𝑃 /s (𝑃 ~QG (𝐻 “ {(0g𝑃)}))) ≃𝑚 (𝐻s 𝑃))
8278, 81eqbrtrd 5124 . 2 (𝜑𝑄𝑚 (𝐻s 𝑃))
832, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 1, 15algextdeglem3 33682 . 2 (𝜑𝑄 ∈ LVec)
8482, 83lmicdim 33573 1 (𝜑 → (dim‘𝑄) = (dim‘(𝐻s 𝑃)))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 206  wa 395   = wceq 1540  wcel 2109  {cab 2707  {crab 3402  Vcvv 3444  cun 3909  {csn 4585   cuni 4867   class class class wbr 5102  cmpt 5183  ccnv 5630  dom cdm 5631  cima 5634   Fn wfn 6494  cfv 6499  (class class class)co 7369  [cec 8646  Basecbs 17155  s cress 17176  0gc0g 17378  s cimas 17443   /s cqus 17444   ~QG cqg 19030  Ringcrg 20118  rcdsr 20239  SubRingcsubrg 20454  Fieldcfield 20615  SubDRingcsdrg 20671  𝑚 clmic 20904  RSpancrsp 21093  Poly1cpl1 22037   evalSub1 ces1 22176  deg1cdg1 25935  Monic1pcmn1 26007  Unic1pcuc1p 26008  rem1pcr1p 26010  idlGen1pcig1p 26011   fldGen cfldgen 33233  dimcldim 33567   IntgRing cirng 33651   minPoly cminply 33662
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1795  ax-4 1809  ax-5 1910  ax-6 1967  ax-7 2008  ax-8 2111  ax-9 2119  ax-10 2142  ax-11 2158  ax-12 2178  ax-ext 2701  ax-rep 5229  ax-sep 5246  ax-nul 5256  ax-pow 5315  ax-pr 5382  ax-un 7691  ax-reg 9521  ax-inf2 9570  ax-ac2 10392  ax-cnex 11100  ax-resscn 11101  ax-1cn 11102  ax-icn 11103  ax-addcl 11104  ax-addrcl 11105  ax-mulcl 11106  ax-mulrcl 11107  ax-mulcom 11108  ax-addass 11109  ax-mulass 11110  ax-distr 11111  ax-i2m1 11112  ax-1ne0 11113  ax-1rid 11114  ax-rnegex 11115  ax-rrecex 11116  ax-cnre 11117  ax-pre-lttri 11118  ax-pre-lttrn 11119  ax-pre-ltadd 11120  ax-pre-mulgt0 11121  ax-pre-sup 11122  ax-addf 11123
This theorem depends on definitions:  df-bi 207  df-an 396  df-or 848  df-3or 1087  df-3an 1088  df-tru 1543  df-fal 1553  df-ex 1780  df-nf 1784  df-sb 2066  df-mo 2533  df-eu 2562  df-clab 2708  df-cleq 2721  df-clel 2803  df-nfc 2878  df-ne 2926  df-nel 3030  df-ral 3045  df-rex 3054  df-rmo 3351  df-reu 3352  df-rab 3403  df-v 3446  df-sbc 3751  df-csb 3860  df-dif 3914  df-un 3916  df-in 3918  df-ss 3928  df-pss 3931  df-nul 4293  df-if 4485  df-pw 4561  df-sn 4586  df-pr 4588  df-tp 4590  df-op 4592  df-uni 4868  df-int 4907  df-iun 4953  df-iin 4954  df-br 5103  df-opab 5165  df-mpt 5184  df-tr 5210  df-id 5526  df-eprel 5531  df-po 5539  df-so 5540  df-fr 5584  df-se 5585  df-we 5586  df-xp 5637  df-rel 5638  df-cnv 5639  df-co 5640  df-dm 5641  df-rn 5642  df-res 5643  df-ima 5644  df-pred 6262  df-ord 6323  df-on 6324  df-lim 6325  df-suc 6326  df-iota 6452  df-fun 6501  df-fn 6502  df-f 6503  df-f1 6504  df-fo 6505  df-f1o 6506  df-fv 6507  df-isom 6508  df-riota 7326  df-ov 7372  df-oprab 7373  df-mpo 7374  df-of 7633  df-ofr 7634  df-rpss 7679  df-om 7823  df-1st 7947  df-2nd 7948  df-supp 8117  df-tpos 8182  df-frecs 8237  df-wrecs 8268  df-recs 8317  df-rdg 8355  df-1o 8411  df-2o 8412  df-oadd 8415  df-er 8648  df-ec 8650  df-qs 8654  df-map 8778  df-pm 8779  df-ixp 8848  df-en 8896  df-dom 8897  df-sdom 8898  df-fin 8899  df-fsupp 9289  df-sup 9369  df-inf 9370  df-oi 9439  df-r1 9693  df-rank 9694  df-dju 9830  df-card 9868  df-acn 9871  df-ac 10045  df-pnf 11186  df-mnf 11187  df-xr 11188  df-ltxr 11189  df-le 11190  df-sub 11383  df-neg 11384  df-nn 12163  df-2 12225  df-3 12226  df-4 12227  df-5 12228  df-6 12229  df-7 12230  df-8 12231  df-9 12232  df-n0 12419  df-xnn0 12492  df-z 12506  df-dec 12626  df-uz 12770  df-fz 13445  df-fzo 13592  df-seq 13943  df-hash 14272  df-struct 17093  df-sets 17110  df-slot 17128  df-ndx 17140  df-base 17156  df-ress 17177  df-plusg 17209  df-mulr 17210  df-starv 17211  df-sca 17212  df-vsca 17213  df-ip 17214  df-tset 17215  df-ple 17216  df-ocomp 17217  df-ds 17218  df-unif 17219  df-hom 17220  df-cco 17221  df-0g 17380  df-gsum 17381  df-prds 17386  df-pws 17388  df-imas 17447  df-qus 17448  df-mre 17523  df-mrc 17524  df-mri 17525  df-acs 17526  df-proset 18231  df-drs 18232  df-poset 18250  df-ipo 18463  df-mgm 18543  df-sgrp 18622  df-mnd 18638  df-mhm 18686  df-submnd 18687  df-grp 18844  df-minusg 18845  df-sbg 18846  df-mulg 18976  df-subg 19031  df-nsg 19032  df-eqg 19033  df-ghm 19121  df-gim 19167  df-cntz 19225  df-cmn 19688  df-abl 19689  df-mgp 20026  df-rng 20038  df-ur 20067  df-srg 20072  df-ring 20120  df-cring 20121  df-oppr 20222  df-dvdsr 20242  df-unit 20243  df-invr 20273  df-dvr 20286  df-rhm 20357  df-subrng 20431  df-subrg 20455  df-rlreg 20579  df-drng 20616  df-field 20617  df-sdrg 20672  df-lmod 20744  df-lss 20814  df-lsp 20854  df-lmhm 20905  df-lmim 20906  df-lmic 20907  df-lbs 20958  df-lvec 20986  df-sra 21056  df-rgmod 21057  df-lidl 21094  df-rsp 21095  df-cnfld 21241  df-lindf 21691  df-linds 21692  df-assa 21738  df-asp 21739  df-ascl 21740  df-psr 21794  df-mvr 21795  df-mpl 21796  df-opsr 21798  df-evls 21957  df-evl 21958  df-psr1 22040  df-vr1 22041  df-ply1 22042  df-coe1 22043  df-evls1 22178  df-evl1 22179  df-mdeg 25936  df-deg1 25937  df-mon1 26012  df-uc1p 26013  df-q1p 26014  df-r1p 26015  df-ig1p 26016  df-fldgen 33234  df-dim 33568  df-irng 33652  df-minply 33663
This theorem is referenced by:  algextdeg  33688
  Copyright terms: Public domain W3C validator