Metamath Proof Explorer


Theorem prdsmulrval

Description: Value of a componentwise ring product in a structure product. (Contributed by Mario Carneiro, 11-Jan-2015)

Ref Expression
Hypotheses prdsbasmpt.y Y=S𝑠R
prdsbasmpt.b B=BaseY
prdsbasmpt.s φSV
prdsbasmpt.i φIW
prdsbasmpt.r φRFnI
prdsplusgval.f φFB
prdsplusgval.g φGB
prdsmulrval.t ·˙=Y
Assertion prdsmulrval φF·˙G=xIFxRxGx

Proof

Step Hyp Ref Expression
1 prdsbasmpt.y Y=S𝑠R
2 prdsbasmpt.b B=BaseY
3 prdsbasmpt.s φSV
4 prdsbasmpt.i φIW
5 prdsbasmpt.r φRFnI
6 prdsplusgval.f φFB
7 prdsplusgval.g φGB
8 prdsmulrval.t ·˙=Y
9 fnex RFnIIWRV
10 5 4 9 syl2anc φRV
11 5 fndmd φdomR=I
12 1 3 10 2 11 8 prdsmulr φ·˙=yB,zBxIyxRxzx
13 fveq1 y=Fyx=Fx
14 fveq1 z=Gzx=Gx
15 13 14 oveqan12d y=Fz=GyxRxzx=FxRxGx
16 15 adantl φy=Fz=GyxRxzx=FxRxGx
17 16 mpteq2dv φy=Fz=GxIyxRxzx=xIFxRxGx
18 4 mptexd φxIFxRxGxV
19 12 17 6 7 18 ovmpod φF·˙G=xIFxRxGx