Metamath Proof Explorer


Theorem mzpincl

Description: Polynomial closedness is a universal first-order property and passes to intersections. This is where the closure properties of the polynomial ring itself are proved. (Contributed by Stefan O'Rear, 4-Oct-2014)

Ref Expression
Assertion mzpincl V V mzPoly V mzPolyCld V

Proof

Step Hyp Ref Expression
1 mzpval V V mzPoly V = mzPolyCld V
2 mzpclall V V V mzPolyCld V
3 intss1 V mzPolyCld V mzPolyCld V V
4 2 3 syl V V mzPolyCld V V
5 simpr V V f a mzPolyCld V a mzPolyCld V
6 simplr V V f a mzPolyCld V f
7 mzpcl1 a mzPolyCld V f V × f a
8 5 6 7 syl2anc V V f a mzPolyCld V V × f a
9 8 ralrimiva V V f a mzPolyCld V V × f a
10 ovex V V
11 snex f V
12 10 11 xpex V × f V
13 12 elint2 V × f mzPolyCld V a mzPolyCld V V × f a
14 9 13 sylibr V V f V × f mzPolyCld V
15 14 ralrimiva V V f V × f mzPolyCld V
16 simpr V V f V a mzPolyCld V a mzPolyCld V
17 simplr V V f V a mzPolyCld V f V
18 mzpcl2 a mzPolyCld V f V g V g f a
19 16 17 18 syl2anc V V f V a mzPolyCld V g V g f a
20 19 ralrimiva V V f V a mzPolyCld V g V g f a
21 10 mptex g V g f V
22 21 elint2 g V g f mzPolyCld V a mzPolyCld V g V g f a
23 20 22 sylibr V V f V g V g f mzPolyCld V
24 23 ralrimiva V V f V g V g f mzPolyCld V
25 15 24 jca V V f V × f mzPolyCld V f V g V g f mzPolyCld V
26 vex f V
27 26 elint2 f mzPolyCld V a mzPolyCld V f a
28 vex g V
29 28 elint2 g mzPolyCld V a mzPolyCld V g a
30 mzpcl34 a mzPolyCld V f a g a f + f g a f × f g a
31 30 3expib a mzPolyCld V f a g a f + f g a f × f g a
32 31 ralimia a mzPolyCld V f a g a a mzPolyCld V f + f g a f × f g a
33 r19.26 a mzPolyCld V f a g a a mzPolyCld V f a a mzPolyCld V g a
34 r19.26 a mzPolyCld V f + f g a f × f g a a mzPolyCld V f + f g a a mzPolyCld V f × f g a
35 32 33 34 3imtr3i a mzPolyCld V f a a mzPolyCld V g a a mzPolyCld V f + f g a a mzPolyCld V f × f g a
36 27 29 35 syl2anb f mzPolyCld V g mzPolyCld V a mzPolyCld V f + f g a a mzPolyCld V f × f g a
37 ovex f + f g V
38 37 elint2 f + f g mzPolyCld V a mzPolyCld V f + f g a
39 ovex f × f g V
40 39 elint2 f × f g mzPolyCld V a mzPolyCld V f × f g a
41 38 40 anbi12i f + f g mzPolyCld V f × f g mzPolyCld V a mzPolyCld V f + f g a a mzPolyCld V f × f g a
42 36 41 sylibr f mzPolyCld V g mzPolyCld V f + f g mzPolyCld V f × f g mzPolyCld V
43 42 a1i V V f mzPolyCld V g mzPolyCld V f + f g mzPolyCld V f × f g mzPolyCld V
44 43 ralrimivv V V f mzPolyCld V g mzPolyCld V f + f g mzPolyCld V f × f g mzPolyCld V
45 4 25 44 jca32 V V mzPolyCld V V f V × f mzPolyCld V f V g V g f mzPolyCld V f mzPolyCld V g mzPolyCld V f + f g mzPolyCld V f × f g mzPolyCld V
46 elmzpcl V V mzPolyCld V mzPolyCld V mzPolyCld V V f V × f mzPolyCld V f V g V g f mzPolyCld V f mzPolyCld V g mzPolyCld V f + f g mzPolyCld V f × f g mzPolyCld V
47 45 46 mpbird V V mzPolyCld V mzPolyCld V
48 1 47 eqeltrd V V mzPoly V mzPolyCld V