Metamath Proof Explorer


Theorem mpfmulcl

Description: The product of multivariate polynomial functions. (Contributed by Mario Carneiro, 19-Mar-2015)

Ref Expression
Hypotheses mpfsubrg.q Q = ran I evalSub S R
mpfmulcl.t · ˙ = S
Assertion mpfmulcl F Q G Q F · ˙ f G Q

Proof

Step Hyp Ref Expression
1 mpfsubrg.q Q = ran I evalSub S R
2 mpfmulcl.t · ˙ = S
3 eqid S 𝑠 Base S I = S 𝑠 Base S I
4 eqid Base S 𝑠 Base S I = Base S 𝑠 Base S I
5 1 mpfrcl F Q I V S CRing R SubRing S
6 5 adantr F Q G Q I V S CRing R SubRing S
7 6 simp2d F Q G Q S CRing
8 ovexd F Q G Q Base S I V
9 1 mpfsubrg I V S CRing R SubRing S Q SubRing S 𝑠 Base S I
10 6 9 syl F Q G Q Q SubRing S 𝑠 Base S I
11 4 subrgss Q SubRing S 𝑠 Base S I Q Base S 𝑠 Base S I
12 10 11 syl F Q G Q Q Base S 𝑠 Base S I
13 simpl F Q G Q F Q
14 12 13 sseldd F Q G Q F Base S 𝑠 Base S I
15 simpr F Q G Q G Q
16 12 15 sseldd F Q G Q G Base S 𝑠 Base S I
17 eqid S 𝑠 Base S I = S 𝑠 Base S I
18 3 4 7 8 14 16 2 17 pwsmulrval F Q G Q F S 𝑠 Base S I G = F · ˙ f G
19 17 subrgmcl Q SubRing S 𝑠 Base S I F Q G Q F S 𝑠 Base S I G Q
20 19 3expib Q SubRing S 𝑠 Base S I F Q G Q F S 𝑠 Base S I G Q
21 10 20 mpcom F Q G Q F S 𝑠 Base S I G Q
22 18 21 eqeltrrd F Q G Q F · ˙ f G Q