Metamath Proof Explorer


Theorem pf1rcl

Description: Reverse closure for the set of polynomial functions. (Contributed by Mario Carneiro, 12-Jun-2015)

Ref Expression
Hypothesis pf1rcl.q Q = ran eval 1 R
Assertion pf1rcl X Q R CRing

Proof

Step Hyp Ref Expression
1 pf1rcl.q Q = ran eval 1 R
2 n0i X Q ¬ Q =
3 eqid eval 1 R = eval 1 R
4 eqid 1 𝑜 eval R = 1 𝑜 eval R
5 eqid Base R = Base R
6 3 4 5 evl1fval eval 1 R = x Base R Base R 1 𝑜 x y Base R 1 𝑜 × y 1 𝑜 eval R
7 6 rneqi ran eval 1 R = ran x Base R Base R 1 𝑜 x y Base R 1 𝑜 × y 1 𝑜 eval R
8 rnco2 ran x Base R Base R 1 𝑜 x y Base R 1 𝑜 × y 1 𝑜 eval R = x Base R Base R 1 𝑜 x y Base R 1 𝑜 × y ran 1 𝑜 eval R
9 1 7 8 3eqtri Q = x Base R Base R 1 𝑜 x y Base R 1 𝑜 × y ran 1 𝑜 eval R
10 inss2 dom x Base R Base R 1 𝑜 x y Base R 1 𝑜 × y ran 1 𝑜 eval R ran 1 𝑜 eval R
11 neq0 ¬ ran 1 𝑜 eval R = x x ran 1 𝑜 eval R
12 4 5 evlval 1 𝑜 eval R = 1 𝑜 evalSub R Base R
13 12 rneqi ran 1 𝑜 eval R = ran 1 𝑜 evalSub R Base R
14 13 mpfrcl x ran 1 𝑜 eval R 1 𝑜 V R CRing Base R SubRing R
15 14 simp2d x ran 1 𝑜 eval R R CRing
16 15 exlimiv x x ran 1 𝑜 eval R R CRing
17 11 16 sylbi ¬ ran 1 𝑜 eval R = R CRing
18 17 con1i ¬ R CRing ran 1 𝑜 eval R =
19 sseq0 dom x Base R Base R 1 𝑜 x y Base R 1 𝑜 × y ran 1 𝑜 eval R ran 1 𝑜 eval R ran 1 𝑜 eval R = dom x Base R Base R 1 𝑜 x y Base R 1 𝑜 × y ran 1 𝑜 eval R =
20 10 18 19 sylancr ¬ R CRing dom x Base R Base R 1 𝑜 x y Base R 1 𝑜 × y ran 1 𝑜 eval R =
21 imadisj x Base R Base R 1 𝑜 x y Base R 1 𝑜 × y ran 1 𝑜 eval R = dom x Base R Base R 1 𝑜 x y Base R 1 𝑜 × y ran 1 𝑜 eval R =
22 20 21 sylibr ¬ R CRing x Base R Base R 1 𝑜 x y Base R 1 𝑜 × y ran 1 𝑜 eval R =
23 9 22 syl5eq ¬ R CRing Q =
24 2 23 nsyl2 X Q R CRing