Metamath Proof Explorer |
< Previous
Next >
Nearby theorems |
||
Mirrors > Home > MPE Home > Th. List > evls1rhm | Structured version Visualization version GIF version |
Description: Polynomial evaluation is a homomorphism (into the product ring). (Contributed by AV, 11-Sep-2019.) |
Ref | Expression |
---|---|
evls1rhm.q | ⊢ 𝑄 = (𝑆 evalSub1 𝑅) |
evls1rhm.b | ⊢ 𝐵 = (Base‘𝑆) |
evls1rhm.t | ⊢ 𝑇 = (𝑆 ↑s 𝐵) |
evls1rhm.u | ⊢ 𝑈 = (𝑆 ↾s 𝑅) |
evls1rhm.w | ⊢ 𝑊 = (Poly1‘𝑈) |
Ref | Expression |
---|---|
evls1rhm | ⊢ ((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) → 𝑄 ∈ (𝑊 RingHom 𝑇)) |
Step | Hyp | Ref | Expression |
---|---|---|---|
1 | evls1rhm.b | . . . . . 6 ⊢ 𝐵 = (Base‘𝑆) | |
2 | 1 | subrgss 19536 | . . . . 5 ⊢ (𝑅 ∈ (SubRing‘𝑆) → 𝑅 ⊆ 𝐵) |
3 | 2 | adantl 484 | . . . 4 ⊢ ((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) → 𝑅 ⊆ 𝐵) |
4 | elpwg 4542 | . . . . 5 ⊢ (𝑅 ∈ (SubRing‘𝑆) → (𝑅 ∈ 𝒫 𝐵 ↔ 𝑅 ⊆ 𝐵)) | |
5 | 4 | adantl 484 | . . . 4 ⊢ ((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) → (𝑅 ∈ 𝒫 𝐵 ↔ 𝑅 ⊆ 𝐵)) |
6 | 3, 5 | mpbird 259 | . . 3 ⊢ ((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) → 𝑅 ∈ 𝒫 𝐵) |
7 | evls1rhm.q | . . . 4 ⊢ 𝑄 = (𝑆 evalSub1 𝑅) | |
8 | eqid 2821 | . . . 4 ⊢ (1o evalSub 𝑆) = (1o evalSub 𝑆) | |
9 | 7, 8, 1 | evls1fval 20482 | . . 3 ⊢ ((𝑆 ∈ CRing ∧ 𝑅 ∈ 𝒫 𝐵) → 𝑄 = ((𝑥 ∈ (𝐵 ↑m (𝐵 ↑m 1o)) ↦ (𝑥 ∘ (𝑦 ∈ 𝐵 ↦ (1o × {𝑦})))) ∘ ((1o evalSub 𝑆)‘𝑅))) |
10 | 6, 9 | syldan 593 | . 2 ⊢ ((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) → 𝑄 = ((𝑥 ∈ (𝐵 ↑m (𝐵 ↑m 1o)) ↦ (𝑥 ∘ (𝑦 ∈ 𝐵 ↦ (1o × {𝑦})))) ∘ ((1o evalSub 𝑆)‘𝑅))) |
11 | evls1rhm.t | . . . 4 ⊢ 𝑇 = (𝑆 ↑s 𝐵) | |
12 | eqid 2821 | . . . 4 ⊢ (𝑥 ∈ (𝐵 ↑m (𝐵 ↑m 1o)) ↦ (𝑥 ∘ (𝑦 ∈ 𝐵 ↦ (1o × {𝑦})))) = (𝑥 ∈ (𝐵 ↑m (𝐵 ↑m 1o)) ↦ (𝑥 ∘ (𝑦 ∈ 𝐵 ↦ (1o × {𝑦})))) | |
13 | 1, 11, 12 | evls1rhmlem 20484 | . . 3 ⊢ (𝑆 ∈ CRing → (𝑥 ∈ (𝐵 ↑m (𝐵 ↑m 1o)) ↦ (𝑥 ∘ (𝑦 ∈ 𝐵 ↦ (1o × {𝑦})))) ∈ ((𝑆 ↑s (𝐵 ↑m 1o)) RingHom 𝑇)) |
14 | 1on 8109 | . . . . 5 ⊢ 1o ∈ On | |
15 | eqid 2821 | . . . . . 6 ⊢ ((1o evalSub 𝑆)‘𝑅) = ((1o evalSub 𝑆)‘𝑅) | |
16 | eqid 2821 | . . . . . 6 ⊢ (1o mPoly 𝑈) = (1o mPoly 𝑈) | |
17 | evls1rhm.u | . . . . . 6 ⊢ 𝑈 = (𝑆 ↾s 𝑅) | |
18 | eqid 2821 | . . . . . 6 ⊢ (𝑆 ↑s (𝐵 ↑m 1o)) = (𝑆 ↑s (𝐵 ↑m 1o)) | |
19 | 15, 16, 17, 18, 1 | evlsrhm 20301 | . . . . 5 ⊢ ((1o ∈ On ∧ 𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) → ((1o evalSub 𝑆)‘𝑅) ∈ ((1o mPoly 𝑈) RingHom (𝑆 ↑s (𝐵 ↑m 1o)))) |
20 | 14, 19 | mp3an1 1444 | . . . 4 ⊢ ((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) → ((1o evalSub 𝑆)‘𝑅) ∈ ((1o mPoly 𝑈) RingHom (𝑆 ↑s (𝐵 ↑m 1o)))) |
21 | eqidd 2822 | . . . . 5 ⊢ ((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) → (Base‘𝑊) = (Base‘𝑊)) | |
22 | eqidd 2822 | . . . . 5 ⊢ ((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) → (Base‘(𝑆 ↑s (𝐵 ↑m 1o))) = (Base‘(𝑆 ↑s (𝐵 ↑m 1o)))) | |
23 | evls1rhm.w | . . . . . . 7 ⊢ 𝑊 = (Poly1‘𝑈) | |
24 | eqid 2821 | . . . . . . 7 ⊢ (PwSer1‘𝑈) = (PwSer1‘𝑈) | |
25 | eqid 2821 | . . . . . . 7 ⊢ (Base‘𝑊) = (Base‘𝑊) | |
26 | 23, 24, 25 | ply1bas 20363 | . . . . . 6 ⊢ (Base‘𝑊) = (Base‘(1o mPoly 𝑈)) |
27 | 26 | a1i 11 | . . . . 5 ⊢ ((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) → (Base‘𝑊) = (Base‘(1o mPoly 𝑈))) |
28 | eqid 2821 | . . . . . . . 8 ⊢ (+g‘𝑊) = (+g‘𝑊) | |
29 | 23, 16, 28 | ply1plusg 20393 | . . . . . . 7 ⊢ (+g‘𝑊) = (+g‘(1o mPoly 𝑈)) |
30 | 29 | a1i 11 | . . . . . 6 ⊢ ((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) → (+g‘𝑊) = (+g‘(1o mPoly 𝑈))) |
31 | 30 | oveqdr 7184 | . . . . 5 ⊢ (((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) ∧ (𝑥 ∈ (Base‘𝑊) ∧ 𝑦 ∈ (Base‘𝑊))) → (𝑥(+g‘𝑊)𝑦) = (𝑥(+g‘(1o mPoly 𝑈))𝑦)) |
32 | eqidd 2822 | . . . . 5 ⊢ (((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) ∧ (𝑥 ∈ (Base‘(𝑆 ↑s (𝐵 ↑m 1o))) ∧ 𝑦 ∈ (Base‘(𝑆 ↑s (𝐵 ↑m 1o))))) → (𝑥(+g‘(𝑆 ↑s (𝐵 ↑m 1o)))𝑦) = (𝑥(+g‘(𝑆 ↑s (𝐵 ↑m 1o)))𝑦)) | |
33 | eqid 2821 | . . . . . . . 8 ⊢ (.r‘𝑊) = (.r‘𝑊) | |
34 | 23, 16, 33 | ply1mulr 20395 | . . . . . . 7 ⊢ (.r‘𝑊) = (.r‘(1o mPoly 𝑈)) |
35 | 34 | a1i 11 | . . . . . 6 ⊢ ((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) → (.r‘𝑊) = (.r‘(1o mPoly 𝑈))) |
36 | 35 | oveqdr 7184 | . . . . 5 ⊢ (((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) ∧ (𝑥 ∈ (Base‘𝑊) ∧ 𝑦 ∈ (Base‘𝑊))) → (𝑥(.r‘𝑊)𝑦) = (𝑥(.r‘(1o mPoly 𝑈))𝑦)) |
37 | eqidd 2822 | . . . . 5 ⊢ (((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) ∧ (𝑥 ∈ (Base‘(𝑆 ↑s (𝐵 ↑m 1o))) ∧ 𝑦 ∈ (Base‘(𝑆 ↑s (𝐵 ↑m 1o))))) → (𝑥(.r‘(𝑆 ↑s (𝐵 ↑m 1o)))𝑦) = (𝑥(.r‘(𝑆 ↑s (𝐵 ↑m 1o)))𝑦)) | |
38 | 21, 22, 27, 22, 31, 32, 36, 37 | rhmpropd 19571 | . . . 4 ⊢ ((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) → (𝑊 RingHom (𝑆 ↑s (𝐵 ↑m 1o))) = ((1o mPoly 𝑈) RingHom (𝑆 ↑s (𝐵 ↑m 1o)))) |
39 | 20, 38 | eleqtrrd 2916 | . . 3 ⊢ ((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) → ((1o evalSub 𝑆)‘𝑅) ∈ (𝑊 RingHom (𝑆 ↑s (𝐵 ↑m 1o)))) |
40 | rhmco 19489 | . . 3 ⊢ (((𝑥 ∈ (𝐵 ↑m (𝐵 ↑m 1o)) ↦ (𝑥 ∘ (𝑦 ∈ 𝐵 ↦ (1o × {𝑦})))) ∈ ((𝑆 ↑s (𝐵 ↑m 1o)) RingHom 𝑇) ∧ ((1o evalSub 𝑆)‘𝑅) ∈ (𝑊 RingHom (𝑆 ↑s (𝐵 ↑m 1o)))) → ((𝑥 ∈ (𝐵 ↑m (𝐵 ↑m 1o)) ↦ (𝑥 ∘ (𝑦 ∈ 𝐵 ↦ (1o × {𝑦})))) ∘ ((1o evalSub 𝑆)‘𝑅)) ∈ (𝑊 RingHom 𝑇)) | |
41 | 13, 39, 40 | syl2an2r 683 | . 2 ⊢ ((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) → ((𝑥 ∈ (𝐵 ↑m (𝐵 ↑m 1o)) ↦ (𝑥 ∘ (𝑦 ∈ 𝐵 ↦ (1o × {𝑦})))) ∘ ((1o evalSub 𝑆)‘𝑅)) ∈ (𝑊 RingHom 𝑇)) |
42 | 10, 41 | eqeltrd 2913 | 1 ⊢ ((𝑆 ∈ CRing ∧ 𝑅 ∈ (SubRing‘𝑆)) → 𝑄 ∈ (𝑊 RingHom 𝑇)) |
Colors of variables: wff setvar class |
Syntax hints: → wi 4 ↔ wb 208 ∧ wa 398 = wceq 1537 ∈ wcel 2114 ⊆ wss 3936 𝒫 cpw 4539 {csn 4567 ↦ cmpt 5146 × cxp 5553 ∘ ccom 5559 Oncon0 6191 ‘cfv 6355 (class class class)co 7156 1oc1o 8095 ↑m cmap 8406 Basecbs 16483 ↾s cress 16484 +gcplusg 16565 .rcmulr 16566 ↑s cpws 16720 CRingccrg 19298 RingHom crh 19464 SubRingcsubrg 19531 mPoly cmpl 20133 evalSub ces 20284 PwSer1cps1 20343 Poly1cpl1 20345 evalSub1 ces1 20476 |
This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1796 ax-4 1810 ax-5 1911 ax-6 1970 ax-7 2015 ax-8 2116 ax-9 2124 ax-10 2145 ax-11 2161 ax-12 2177 ax-ext 2793 ax-rep 5190 ax-sep 5203 ax-nul 5210 ax-pow 5266 ax-pr 5330 ax-un 7461 ax-cnex 10593 ax-resscn 10594 ax-1cn 10595 ax-icn 10596 ax-addcl 10597 ax-addrcl 10598 ax-mulcl 10599 ax-mulrcl 10600 ax-mulcom 10601 ax-addass 10602 ax-mulass 10603 ax-distr 10604 ax-i2m1 10605 ax-1ne0 10606 ax-1rid 10607 ax-rnegex 10608 ax-rrecex 10609 ax-cnre 10610 ax-pre-lttri 10611 ax-pre-lttrn 10612 ax-pre-ltadd 10613 ax-pre-mulgt0 10614 |
This theorem depends on definitions: df-bi 209 df-an 399 df-or 844 df-3or 1084 df-3an 1085 df-tru 1540 df-ex 1781 df-nf 1785 df-sb 2070 df-mo 2622 df-eu 2654 df-clab 2800 df-cleq 2814 df-clel 2893 df-nfc 2963 df-ne 3017 df-nel 3124 df-ral 3143 df-rex 3144 df-reu 3145 df-rmo 3146 df-rab 3147 df-v 3496 df-sbc 3773 df-csb 3884 df-dif 3939 df-un 3941 df-in 3943 df-ss 3952 df-pss 3954 df-nul 4292 df-if 4468 df-pw 4541 df-sn 4568 df-pr 4570 df-tp 4572 df-op 4574 df-uni 4839 df-int 4877 df-iun 4921 df-iin 4922 df-br 5067 df-opab 5129 df-mpt 5147 df-tr 5173 df-id 5460 df-eprel 5465 df-po 5474 df-so 5475 df-fr 5514 df-se 5515 df-we 5516 df-xp 5561 df-rel 5562 df-cnv 5563 df-co 5564 df-dm 5565 df-rn 5566 df-res 5567 df-ima 5568 df-pred 6148 df-ord 6194 df-on 6195 df-lim 6196 df-suc 6197 df-iota 6314 df-fun 6357 df-fn 6358 df-f 6359 df-f1 6360 df-fo 6361 df-f1o 6362 df-fv 6363 df-isom 6364 df-riota 7114 df-ov 7159 df-oprab 7160 df-mpo 7161 df-of 7409 df-ofr 7410 df-om 7581 df-1st 7689 df-2nd 7690 df-supp 7831 df-wrecs 7947 df-recs 8008 df-rdg 8046 df-1o 8102 df-2o 8103 df-oadd 8106 df-er 8289 df-map 8408 df-pm 8409 df-ixp 8462 df-en 8510 df-dom 8511 df-sdom 8512 df-fin 8513 df-fsupp 8834 df-sup 8906 df-oi 8974 df-card 9368 df-pnf 10677 df-mnf 10678 df-xr 10679 df-ltxr 10680 df-le 10681 df-sub 10872 df-neg 10873 df-nn 11639 df-2 11701 df-3 11702 df-4 11703 df-5 11704 df-6 11705 df-7 11706 df-8 11707 df-9 11708 df-n0 11899 df-z 11983 df-dec 12100 df-uz 12245 df-fz 12894 df-fzo 13035 df-seq 13371 df-hash 13692 df-struct 16485 df-ndx 16486 df-slot 16487 df-base 16489 df-sets 16490 df-ress 16491 df-plusg 16578 df-mulr 16579 df-sca 16581 df-vsca 16582 df-ip 16583 df-tset 16584 df-ple 16585 df-ds 16587 df-hom 16589 df-cco 16590 df-0g 16715 df-gsum 16716 df-prds 16721 df-pws 16723 df-mre 16857 df-mrc 16858 df-acs 16860 df-mgm 17852 df-sgrp 17901 df-mnd 17912 df-mhm 17956 df-submnd 17957 df-grp 18106 df-minusg 18107 df-sbg 18108 df-mulg 18225 df-subg 18276 df-ghm 18356 df-cntz 18447 df-cmn 18908 df-abl 18909 df-mgp 19240 df-ur 19252 df-srg 19256 df-ring 19299 df-cring 19300 df-rnghom 19467 df-subrg 19533 df-lmod 19636 df-lss 19704 df-lsp 19744 df-assa 20085 df-asp 20086 df-ascl 20087 df-psr 20136 df-mvr 20137 df-mpl 20138 df-opsr 20140 df-evls 20286 df-psr1 20348 df-ply1 20350 df-evls1 20478 |
This theorem is referenced by: evls1gsumadd 20487 evls1gsummul 20488 evls1pw 20489 |
Copyright terms: Public domain | W3C validator |