mplmon2 - Metamath Proof Explorer

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

Theorem mplmon2 22041

Description: Express a scaled monomial. (Contributed by Stefan O'Rear, 8-Mar-2015.)

**Hypotheses**
Ref	Expression
mplmon2.p	⊢ 𝑃 = (𝐼 mPoly 𝑅)
mplmon2.v	⊢ · = ( ·_𝑠 ‘𝑃)
mplmon2.d	⊢ 𝐷 = {𝑓 ∈ (ℕ₀ ↑_m 𝐼) ∣ (^◡𝑓 “ ℕ) ∈ Fin}
mplmon2.o	⊢ 1 = (1_r‘𝑅)
mplmon2.z	⊢ 0 = (0_g‘𝑅)
mplmon2.b	⊢ 𝐵 = (Base‘𝑅)
mplmon2.i	⊢ (𝜑 → 𝐼 ∈ 𝑊)
mplmon2.r	⊢ (𝜑 → 𝑅 ∈ Ring)
mplmon2.k	⊢ (𝜑 → 𝐾 ∈ 𝐷)
mplmon2.x	⊢ (𝜑 → 𝑋 ∈ 𝐵)

**Assertion**
Ref	Expression
mplmon2	⊢ (𝜑 → (𝑋 · (𝑦 ∈ 𝐷 ↦ if(𝑦 = 𝐾, 1 , 0 ))) = (𝑦 ∈ 𝐷 ↦ if(𝑦 = 𝐾, 𝑋, 0 )))

Distinct variable groups: 𝜑,𝑦 𝑦,𝐵 𝑦,𝐷 𝑓,𝐼 𝑓,𝐾,𝑦 𝑦, 1 𝑦,𝑅 𝑦,𝑋 𝑦, 0 Allowed substitution hints: 𝜑(𝑓) 𝐵(𝑓) 𝐷(𝑓) 𝑃(𝑦,𝑓) 𝑅(𝑓) · (𝑦,𝑓) 1 (𝑓) 𝐼(𝑦) 𝑊(𝑦,𝑓) 𝑋(𝑓) 0 (𝑓)

**Proof of Theorem mplmon2**
Step	Hyp	Ref	Expression
1		mplmon2.p	. . 3 ⊢ 𝑃 = (𝐼 mPoly 𝑅)
2		mplmon2.v	. . 3 ⊢ · = ( ·_𝑠 ‘𝑃)
3		mplmon2.b	. . 3 ⊢ 𝐵 = (Base‘𝑅)
4		eqid 2741	. . 3 ⊢ (Base‘𝑃) = (Base‘𝑃)
5		eqid 2741	. . 3 ⊢ (._r‘𝑅) = (._r‘𝑅)
6		mplmon2.d	. . 3 ⊢ 𝐷 = {𝑓 ∈ (ℕ₀ ↑_m 𝐼) ∣ (^◡𝑓 “ ℕ) ∈ Fin}
7		mplmon2.x	. . 3 ⊢ (𝜑 → 𝑋 ∈ 𝐵)
8		mplmon2.z	. . . 4 ⊢ 0 = (0_g‘𝑅)
9		mplmon2.o	. . . 4 ⊢ 1 = (1_r‘𝑅)
10		mplmon2.i	. . . 4 ⊢ (𝜑 → 𝐼 ∈ 𝑊)
11		mplmon2.r	. . . 4 ⊢ (𝜑 → 𝑅 ∈ Ring)
12		mplmon2.k	. . . 4 ⊢ (𝜑 → 𝐾 ∈ 𝐷)
13	1, 4, 8, 9, 6, 10, 11, 12	mplmon 22015	. . 3 ⊢ (𝜑 → (𝑦 ∈ 𝐷 ↦ if(𝑦 = 𝐾, 1 , 0 )) ∈ (Base‘𝑃))
14	1, 2, 3, 4, 5, 6, 7, 13	mplvsca 21993	. 2 ⊢ (𝜑 → (𝑋 · (𝑦 ∈ 𝐷 ↦ if(𝑦 = 𝐾, 1 , 0 ))) = ((𝐷 × {𝑋}) ∘_f (._r‘𝑅)(𝑦 ∈ 𝐷 ↦ if(𝑦 = 𝐾, 1 , 0 ))))
15		ovex 7393	. . . . 5 ⊢ (ℕ₀ ↑_m 𝐼) ∈ V
16	6, 15	rabex2 5272	. . . 4 ⊢ 𝐷 ∈ V
17	16	a1i 11	. . 3 ⊢ (𝜑 → 𝐷 ∈ V)
18	7	adantr 482	. . 3 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝐷) → 𝑋 ∈ 𝐵)
19	9	fvexi 6845	. . . . 5 ⊢ 1 ∈ V
20	8	fvexi 6845	. . . . 5 ⊢ 0 ∈ V
21	19, 20	ifex 4508	. . . 4 ⊢ if(𝑦 = 𝐾, 1 , 0 ) ∈ V
22	21	a1i 11	. . 3 ⊢ ((𝜑 ∧ 𝑦 ∈ 𝐷) → if(𝑦 = 𝐾, 1 , 0 ) ∈ V)
23		fconstmpt 5683	. . . 4 ⊢ (𝐷 × {𝑋}) = (𝑦 ∈ 𝐷 ↦ 𝑋)
24	23	a1i 11	. . 3 ⊢ (𝜑 → (𝐷 × {𝑋}) = (𝑦 ∈ 𝐷 ↦ 𝑋))
25		eqidd 2742	. . 3 ⊢ (𝜑 → (𝑦 ∈ 𝐷 ↦ if(𝑦 = 𝐾, 1 , 0 )) = (𝑦 ∈ 𝐷 ↦ if(𝑦 = 𝐾, 1 , 0 )))
26	17, 18, 22, 24, 25	offval2 7644	. 2 ⊢ (𝜑 → ((𝐷 × {𝑋}) ∘_f (._r‘𝑅)(𝑦 ∈ 𝐷 ↦ if(𝑦 = 𝐾, 1 , 0 ))) = (𝑦 ∈ 𝐷 ↦ (𝑋(._r‘𝑅)if(𝑦 = 𝐾, 1 , 0 ))))
27		oveq2 7368	. . . . 5 ⊢ ( 1 = if(𝑦 = 𝐾, 1 , 0 ) → (𝑋(._r‘𝑅) 1 ) = (𝑋(._r‘𝑅)if(𝑦 = 𝐾, 1 , 0 )))
28	27	eqeq1d 2743	. . . 4 ⊢ ( 1 = if(𝑦 = 𝐾, 1 , 0 ) → ((𝑋(._r‘𝑅) 1 ) = if(𝑦 = 𝐾, 𝑋, 0 ) ↔ (𝑋(._r‘𝑅)if(𝑦 = 𝐾, 1 , 0 )) = if(𝑦 = 𝐾, 𝑋, 0 )))
29		oveq2 7368	. . . . 5 ⊢ ( 0 = if(𝑦 = 𝐾, 1 , 0 ) → (𝑋(._r‘𝑅) 0 ) = (𝑋(._r‘𝑅)if(𝑦 = 𝐾, 1 , 0 )))
30	29	eqeq1d 2743	. . . 4 ⊢ ( 0 = if(𝑦 = 𝐾, 1 , 0 ) → ((𝑋(._r‘𝑅) 0 ) = if(𝑦 = 𝐾, 𝑋, 0 ) ↔ (𝑋(._r‘𝑅)if(𝑦 = 𝐾, 1 , 0 )) = if(𝑦 = 𝐾, 𝑋, 0 )))
31	3, 5, 9	ringridm 20246	. . . . . 6 ⊢ ((𝑅 ∈ Ring ∧ 𝑋 ∈ 𝐵) → (𝑋(._r‘𝑅) 1 ) = 𝑋)
32	11, 7, 31	syl2anc 591	. . . . 5 ⊢ (𝜑 → (𝑋(._r‘𝑅) 1 ) = 𝑋)
33		iftrue 4463	. . . . . 6 ⊢ (𝑦 = 𝐾 → if(𝑦 = 𝐾, 𝑋, 0 ) = 𝑋)
34	33	eqcomd 2747	. . . . 5 ⊢ (𝑦 = 𝐾 → 𝑋 = if(𝑦 = 𝐾, 𝑋, 0 ))
35	32, 34	sylan9eq 2796	. . . 4 ⊢ ((𝜑 ∧ 𝑦 = 𝐾) → (𝑋(._r‘𝑅) 1 ) = if(𝑦 = 𝐾, 𝑋, 0 ))
36	3, 5, 8	ringrz 20270	. . . . . 6 ⊢ ((𝑅 ∈ Ring ∧ 𝑋 ∈ 𝐵) → (𝑋(._r‘𝑅) 0 ) = 0 )
37	11, 7, 36	syl2anc 591	. . . . 5 ⊢ (𝜑 → (𝑋(._r‘𝑅) 0 ) = 0 )
38		iffalse 4466	. . . . . 6 ⊢ (¬ 𝑦 = 𝐾 → if(𝑦 = 𝐾, 𝑋, 0 ) = 0 )
39	38	eqcomd 2747	. . . . 5 ⊢ (¬ 𝑦 = 𝐾 → 0 = if(𝑦 = 𝐾, 𝑋, 0 ))
40	37, 39	sylan9eq 2796	. . . 4 ⊢ ((𝜑 ∧ ¬ 𝑦 = 𝐾) → (𝑋(._r‘𝑅) 0 ) = if(𝑦 = 𝐾, 𝑋, 0 ))
41	28, 30, 35, 40	ifbothda 4496	. . 3 ⊢ (𝜑 → (𝑋(._r‘𝑅)if(𝑦 = 𝐾, 1 , 0 )) = if(𝑦 = 𝐾, 𝑋, 0 ))
42	41	mpteq2dv 5169	. 2 ⊢ (𝜑 → (𝑦 ∈ 𝐷 ↦ (𝑋(._r‘𝑅)if(𝑦 = 𝐾, 1 , 0 ))) = (𝑦 ∈ 𝐷 ↦ if(𝑦 = 𝐾, 𝑋, 0 )))
43	14, 26, 42	3eqtrd 2780	1 ⊢ (𝜑 → (𝑋 · (𝑦 ∈ 𝐷 ↦ if(𝑦 = 𝐾, 1 , 0 ))) = (𝑦 ∈ 𝐷 ↦ if(𝑦 = 𝐾, 𝑋, 0 )))

Colors of variables: wff setvar class

Syntax hints: ¬ wn 3 → wi 4 ∧ wa 397 = wceq 1548 ∈ wcel 2121 {crab 3393 Vcvv 3433 ifcif 4457 {csn 4558 ↦ cmpt 5156 × cxp 5619 ^◡ccnv 5620 “ cima 5624 ‘cfv 6489 (class class class)co 7360 ∘_f cof 7622 ↑_m cmap 8767 Fincfn 8887 ℕcn 12169 ℕ₀cn0 12432 Basecbs 17174 ._rcmulr 17216 ·_𝑠 cvsca 17219 0_gc0g 17397 1_rcur 20157 Ringcrg 20209 mPoly cmpl 21885

This theorem was proved from axioms: ax-mp 5 ax-1 6 ax-2 7 ax-3 8 ax-gen 1803 ax-4 1817 ax-5 1918 ax-6 1975 ax-7 2016 ax-8 2123 ax-9 2131 ax-10 2154 ax-11 2170 ax-12 2191 ax-ext 2713 ax-rep 5202 ax-sep 5221 ax-nul 5231 ax-pow 5297 ax-pr 5365 ax-un 7682 ax-cnex 11089 ax-resscn 11090 ax-1cn 11091 ax-icn 11092 ax-addcl 11093 ax-addrcl 11094 ax-mulcl 11095 ax-mulrcl 11096 ax-mulcom 11097 ax-addass 11098 ax-mulass 11099 ax-distr 11100 ax-i2m1 11101 ax-1ne0 11102 ax-1rid 11103 ax-rnegex 11104 ax-rrecex 11105 ax-cnre 11106 ax-pre-lttri 11107 ax-pre-lttrn 11108 ax-pre-ltadd 11109 ax-pre-mulgt0 11110

This theorem depends on definitions: df-bi 209 df-an 398 df-or 855 df-3or 1094 df-3an 1095 df-tru 1551 df-fal 1561 df-ex 1788 df-nf 1792 df-sb 2075 df-mo 2545 df-eu 2575 df-clab 2720 df-cleq 2733 df-clel 2816 df-nfc 2890 df-ne 2937 df-nel 3041 df-ral 3056 df-rex 3066 df-rmo 3346 df-reu 3347 df-rab 3394 df-v 3435 df-sbc 3726 df-csb 3834 df-dif 3888 df-un 3890 df-in 3892 df-ss 3902 df-pss 3905 df-nul 4265 df-if 4458 df-pw 4534 df-sn 4559 df-pr 4561 df-tp 4563 df-op 4565 df-uni 4842 df-iun 4926 df-br 5076 df-opab 5138 df-mpt 5157 df-tr 5183 df-id 5516 df-eprel 5521 df-po 5529 df-so 5530 df-fr 5574 df-we 5576 df-xp 5627 df-rel 5628 df-cnv 5629 df-co 5630 df-dm 5631 df-rn 5632 df-res 5633 df-ima 5634 df-pred 6256 df-ord 6317 df-on 6318 df-lim 6319 df-suc 6320 df-iota 6445 df-fun 6491 df-fn 6492 df-f 6493 df-f1 6494 df-fo 6495 df-f1o 6496 df-fv 6497 df-riota 7317 df-ov 7363 df-oprab 7364 df-mpo 7365 df-of 7624 df-om 7811 df-1st 7935 df-2nd 7936 df-supp 8105 df-frecs 8225 df-wrecs 8256 df-recs 8305 df-rdg 8343 df-1o 8399 df-er 8637 df-map 8769 df-en 8888 df-dom 8889 df-sdom 8890 df-fin 8891 df-fsupp 9269 df-pnf 11176 df-mnf 11177 df-xr 11178 df-ltxr 11179 df-le 11180 df-sub 11374 df-neg 11375 df-nn 12170 df-2 12239 df-3 12240 df-4 12241 df-5 12242 df-6 12243 df-7 12244 df-8 12245 df-9 12246 df-n0 12433 df-z 12520 df-uz 12784 df-fz 13457 df-struct 17112 df-sets 17129 df-slot 17147 df-ndx 17159 df-base 17175 df-ress 17196 df-plusg 17228 df-mulr 17229 df-sca 17231 df-vsca 17232 df-tset 17234 df-0g 17399 df-mgm 18603 df-sgrp 18682 df-mnd 18698 df-grp 18907 df-minusg 18908 df-cmn 19752 df-abl 19753 df-mgp 20117 df-rng 20129 df-ur 20158 df-ring 20211 df-psr 21888 df-mpl 21890

This theorem is referenced by: mplascl 22044 mplmon2cl 22048 mplmon2mul 22049 mplcoe4 22051 coe1tm 22263

W3C validator