Metamath Proof Explorer


Theorem aks6d1c5lem3

Description: Lemma for Claim 5, polynomial division with a linear power. (Contributed by metakunt, 5-May-2025)

Ref Expression
Hypotheses aks6d1p5.1 φ K Field
aks6d1p5.2 φ P
aks6d1c5.3 P = chr K
aks6d1c5.4 φ A 0
aks6d1c5.5 φ A < P
aks6d1c5.6 X = var 1 K
aks6d1c5.7 × ˙ = mulGrp Poly 1 K
aks6d1c5.8 G = g 0 0 A mulGrp Poly 1 K i = 0 A g i × ˙ X + Poly 1 K algSc Poly 1 K ℤRHom K i
aks6d1c5p3.1 φ Y 0 0 A
aks6d1c5p3.2 φ W 0 A
aks6d1c5p3.3 φ C 0
aks6d1c5p3.4 φ C Y W
aks6d1c5p3.5 Q = quot 1p K
aks6d1c5p3.6 S = algSc Poly 1 K
aks6d1c5p3.7 M = mulGrp Poly 1 K
Assertion aks6d1c5lem3 φ G Y Q C × ˙ X + Poly 1 K S ℤRHom K W = Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i

Proof

Step Hyp Ref Expression
1 aks6d1p5.1 φ K Field
2 aks6d1p5.2 φ P
3 aks6d1c5.3 P = chr K
4 aks6d1c5.4 φ A 0
5 aks6d1c5.5 φ A < P
6 aks6d1c5.6 X = var 1 K
7 aks6d1c5.7 × ˙ = mulGrp Poly 1 K
8 aks6d1c5.8 G = g 0 0 A mulGrp Poly 1 K i = 0 A g i × ˙ X + Poly 1 K algSc Poly 1 K ℤRHom K i
9 aks6d1c5p3.1 φ Y 0 0 A
10 aks6d1c5p3.2 φ W 0 A
11 aks6d1c5p3.3 φ C 0
12 aks6d1c5p3.4 φ C Y W
13 aks6d1c5p3.5 Q = quot 1p K
14 aks6d1c5p3.6 S = algSc Poly 1 K
15 aks6d1c5p3.7 M = mulGrp Poly 1 K
16 1 fldcrngd φ K CRing
17 eqid Poly 1 K = Poly 1 K
18 17 ply1crng K CRing Poly 1 K CRing
19 16 18 syl φ Poly 1 K CRing
20 crngring Poly 1 K CRing Poly 1 K Ring
21 19 20 syl φ Poly 1 K Ring
22 eqid mulGrp Poly 1 K = mulGrp Poly 1 K
23 22 ringmgp Poly 1 K Ring mulGrp Poly 1 K Mnd
24 21 23 syl φ mulGrp Poly 1 K Mnd
25 15 24 eqeltrid φ M Mnd
26 15 fveq2i Base M = Base mulGrp Poly 1 K
27 nn0ex 0 V
28 27 a1i φ 0 V
29 ovexd φ 0 A V
30 elmapg 0 V 0 A V Y 0 0 A Y : 0 A 0
31 28 29 30 syl2anc φ Y 0 0 A Y : 0 A 0
32 9 31 mpbid φ Y : 0 A 0
33 32 10 ffvelcdmd φ Y W 0
34 33 nn0zd φ Y W
35 11 nn0zd φ C
36 34 35 zsubcld φ Y W C
37 33 nn0red φ Y W
38 11 nn0red φ C
39 37 38 subge0d φ 0 Y W C C Y W
40 12 39 mpbird φ 0 Y W C
41 36 40 jca φ Y W C 0 Y W C
42 elnn0z Y W C 0 Y W C 0 Y W C
43 41 42 sylibr φ Y W C 0
44 21 ringcmnd φ Poly 1 K CMnd
45 cmnmnd Poly 1 K CMnd Poly 1 K Mnd
46 44 45 syl φ Poly 1 K Mnd
47 crngring K CRing K Ring
48 16 47 syl φ K Ring
49 eqid Base Poly 1 K = Base Poly 1 K
50 6 17 49 vr1cl K Ring X Base Poly 1 K
51 48 50 syl φ X Base Poly 1 K
52 eqid ℤRHom K = ℤRHom K
53 52 zrhrhm K Ring ℤRHom K ring RingHom K
54 48 53 syl φ ℤRHom K ring RingHom K
55 zringbas = Base ring
56 eqid Base K = Base K
57 55 56 rhmf ℤRHom K ring RingHom K ℤRHom K : Base K
58 54 57 syl φ ℤRHom K : Base K
59 10 elfzelzd φ W
60 58 59 ffvelcdmd φ ℤRHom K W Base K
61 17 14 56 49 ply1sclcl K Ring ℤRHom K W Base K S ℤRHom K W Base Poly 1 K
62 48 60 61 syl2anc φ S ℤRHom K W Base Poly 1 K
63 eqid + Poly 1 K = + Poly 1 K
64 49 63 mndcl Poly 1 K Mnd X Base Poly 1 K S ℤRHom K W Base Poly 1 K X + Poly 1 K S ℤRHom K W Base Poly 1 K
65 46 51 62 64 syl3anc φ X + Poly 1 K S ℤRHom K W Base Poly 1 K
66 22 49 mgpbas Base Poly 1 K = Base mulGrp Poly 1 K
67 66 eqcomi Base mulGrp Poly 1 K = Base Poly 1 K
68 26 67 eqtri Base M = Base Poly 1 K
69 65 68 eleqtrrdi φ X + Poly 1 K S ℤRHom K W Base M
70 26 7 24 43 69 mulgnn0cld φ Y W C × ˙ X + Poly 1 K S ℤRHom K W Base M
71 eqid Base M = Base M
72 22 crngmgp Poly 1 K CRing mulGrp Poly 1 K CMnd
73 19 72 syl φ mulGrp Poly 1 K CMnd
74 15 73 eqeltrid φ M CMnd
75 fzfid φ 0 A Fin
76 diffi 0 A Fin 0 A W Fin
77 75 76 syl φ 0 A W Fin
78 24 adantr φ i 0 A W mulGrp Poly 1 K Mnd
79 32 adantr φ i 0 A W Y : 0 A 0
80 eldifi i 0 A W i 0 A
81 80 adantl φ i 0 A W i 0 A
82 79 81 ffvelcdmd φ i 0 A W Y i 0
83 46 adantr φ i 0 A W Poly 1 K Mnd
84 51 adantr φ i 0 A W X Base Poly 1 K
85 48 adantr φ i 0 A W K Ring
86 85 53 57 3syl φ i 0 A W ℤRHom K : Base K
87 elfzelz i 0 A i
88 81 87 syl φ i 0 A W i
89 86 88 ffvelcdmd φ i 0 A W ℤRHom K i Base K
90 17 14 56 49 ply1sclcl K Ring ℤRHom K i Base K S ℤRHom K i Base Poly 1 K
91 85 89 90 syl2anc φ i 0 A W S ℤRHom K i Base Poly 1 K
92 49 63 mndcl Poly 1 K Mnd X Base Poly 1 K S ℤRHom K i Base Poly 1 K X + Poly 1 K S ℤRHom K i Base Poly 1 K
93 83 84 91 92 syl3anc φ i 0 A W X + Poly 1 K S ℤRHom K i Base Poly 1 K
94 93 68 eleqtrrdi φ i 0 A W X + Poly 1 K S ℤRHom K i Base M
95 26 7 mulgnn0cl mulGrp Poly 1 K Mnd Y i 0 X + Poly 1 K S ℤRHom K i Base M Y i × ˙ X + Poly 1 K S ℤRHom K i Base M
96 78 82 94 95 syl3anc φ i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Base M
97 96 ralrimiva φ i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Base M
98 71 74 77 97 gsummptcl φ M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Base M
99 eqid + M = + M
100 71 99 mndcl M Mnd Y W C × ˙ X + Poly 1 K S ℤRHom K W Base M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Base M Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Base M
101 25 70 98 100 syl3anc φ Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Base M
102 101 68 eleqtrdi φ Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Base Poly 1 K
103 71 99 cmncom M CMnd Y W C × ˙ X + Poly 1 K S ℤRHom K W Base M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Base M Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i = M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i + M Y W C × ˙ X + Poly 1 K S ℤRHom K W
104 74 70 98 103 syl3anc φ Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i = M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i + M Y W C × ˙ X + Poly 1 K S ℤRHom K W
105 104 oveq1d φ Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W = M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i + M Y W C × ˙ X + Poly 1 K S ℤRHom K W Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W
106 eqid Poly 1 K = Poly 1 K
107 15 106 mgpplusg Poly 1 K = + M
108 107 eqcomi + M = Poly 1 K
109 108 a1i φ + M = Poly 1 K
110 109 oveqd φ M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i + M Y W C × ˙ X + Poly 1 K S ℤRHom K W = M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W
111 110 oveq1d φ M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i + M Y W C × ˙ X + Poly 1 K S ℤRHom K W Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W = M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W
112 98 68 eleqtrdi φ M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Base Poly 1 K
113 70 68 eleqtrdi φ Y W C × ˙ X + Poly 1 K S ℤRHom K W Base Poly 1 K
114 66 7 24 11 65 mulgnn0cld φ C × ˙ X + Poly 1 K S ℤRHom K W Base Poly 1 K
115 49 106 21 112 113 114 ringassd φ M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W = M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W
116 111 115 eqtrd φ M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i + M Y W C × ˙ X + Poly 1 K S ℤRHom K W Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W = M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W
117 105 116 eqtrd φ Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W = M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W
118 117 oveq2d φ G Y - Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W = G Y - Poly 1 K M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W
119 37 recnd φ Y W
120 38 recnd φ C
121 119 120 npcand φ Y W - C + C = Y W
122 121 eqcomd φ Y W = Y W - C + C
123 122 oveq1d φ Y W × ˙ X + Poly 1 K S ℤRHom K W = Y W - C + C × ˙ X + Poly 1 K S ℤRHom K W
124 66 a1i φ Base Poly 1 K = Base mulGrp Poly 1 K
125 65 124 eleqtrd φ X + Poly 1 K S ℤRHom K W Base mulGrp Poly 1 K
126 43 11 125 3jca φ Y W C 0 C 0 X + Poly 1 K S ℤRHom K W Base mulGrp Poly 1 K
127 eqid Base mulGrp Poly 1 K = Base mulGrp Poly 1 K
128 22 106 mgpplusg Poly 1 K = + mulGrp Poly 1 K
129 127 7 128 mulgnn0dir mulGrp Poly 1 K Mnd Y W C 0 C 0 X + Poly 1 K S ℤRHom K W Base mulGrp Poly 1 K Y W - C + C × ˙ X + Poly 1 K S ℤRHom K W = Y W C × ˙ X + Poly 1 K S ℤRHom K W Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W
130 24 126 129 syl2anc φ Y W - C + C × ˙ X + Poly 1 K S ℤRHom K W = Y W C × ˙ X + Poly 1 K S ℤRHom K W Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W
131 123 130 eqtr2d φ Y W C × ˙ X + Poly 1 K S ℤRHom K W Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W = Y W × ˙ X + Poly 1 K S ℤRHom K W
132 131 oveq2d φ M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W = M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K Y W × ˙ X + Poly 1 K S ℤRHom K W
133 8 a1i φ G = g 0 0 A mulGrp Poly 1 K i = 0 A g i × ˙ X + Poly 1 K algSc Poly 1 K ℤRHom K i
134 15 eqcomi mulGrp Poly 1 K = M
135 134 a1i φ g = Y mulGrp Poly 1 K = M
136 simplr φ g = Y i 0 A g = Y
137 136 fveq1d φ g = Y i 0 A g i = Y i
138 14 eqcomi algSc Poly 1 K = S
139 138 a1i φ g = Y i 0 A algSc Poly 1 K = S
140 139 fveq1d φ g = Y i 0 A algSc Poly 1 K ℤRHom K i = S ℤRHom K i
141 140 oveq2d φ g = Y i 0 A X + Poly 1 K algSc Poly 1 K ℤRHom K i = X + Poly 1 K S ℤRHom K i
142 137 141 oveq12d φ g = Y i 0 A g i × ˙ X + Poly 1 K algSc Poly 1 K ℤRHom K i = Y i × ˙ X + Poly 1 K S ℤRHom K i
143 142 mpteq2dva φ g = Y i 0 A g i × ˙ X + Poly 1 K algSc Poly 1 K ℤRHom K i = i 0 A Y i × ˙ X + Poly 1 K S ℤRHom K i
144 135 143 oveq12d φ g = Y mulGrp Poly 1 K i = 0 A g i × ˙ X + Poly 1 K algSc Poly 1 K ℤRHom K i = M i = 0 A Y i × ˙ X + Poly 1 K S ℤRHom K i
145 ovexd φ M i = 0 A Y i × ˙ X + Poly 1 K S ℤRHom K i V
146 133 144 9 145 fvmptd φ G Y = M i = 0 A Y i × ˙ X + Poly 1 K S ℤRHom K i
147 10 snssd φ W 0 A
148 undifr W 0 A 0 A W W = 0 A
149 147 148 sylib φ 0 A W W = 0 A
150 149 eqcomd φ 0 A = 0 A W W
151 150 mpteq1d φ i 0 A Y i × ˙ X + Poly 1 K S ℤRHom K i = i 0 A W W Y i × ˙ X + Poly 1 K S ℤRHom K i
152 151 oveq2d φ M i = 0 A Y i × ˙ X + Poly 1 K S ℤRHom K i = M i 0 A W W Y i × ˙ X + Poly 1 K S ℤRHom K i
153 146 152 eqtrd φ G Y = M i 0 A W W Y i × ˙ X + Poly 1 K S ℤRHom K i
154 neldifsnd φ ¬ W 0 A W
155 26 7 24 33 69 mulgnn0cld φ Y W × ˙ X + Poly 1 K S ℤRHom K W Base M
156 fveq2 i = W Y i = Y W
157 2fveq3 i = W S ℤRHom K i = S ℤRHom K W
158 157 oveq2d i = W X + Poly 1 K S ℤRHom K i = X + Poly 1 K S ℤRHom K W
159 156 158 oveq12d i = W Y i × ˙ X + Poly 1 K S ℤRHom K i = Y W × ˙ X + Poly 1 K S ℤRHom K W
160 71 107 74 77 96 10 154 155 159 gsumunsn φ M i 0 A W W Y i × ˙ X + Poly 1 K S ℤRHom K i = M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K Y W × ˙ X + Poly 1 K S ℤRHom K W
161 153 160 eqtr2d φ M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K Y W × ˙ X + Poly 1 K S ℤRHom K W = G Y
162 132 161 eqtrd φ M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W = G Y
163 162 oveq2d φ G Y - Poly 1 K M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W = G Y - Poly 1 K G Y
164 21 ringgrpd φ Poly 1 K Grp
165 1 2 3 4 5 6 7 8 aks6d1c5lem0 φ G : 0 0 A Base Poly 1 K
166 165 9 ffvelcdmd φ G Y Base Poly 1 K
167 eqid 0 Poly 1 K = 0 Poly 1 K
168 eqid - Poly 1 K = - Poly 1 K
169 49 167 168 grpsubid Poly 1 K Grp G Y Base Poly 1 K G Y - Poly 1 K G Y = 0 Poly 1 K
170 164 166 169 syl2anc φ G Y - Poly 1 K G Y = 0 Poly 1 K
171 163 170 eqtrd φ G Y - Poly 1 K M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W = 0 Poly 1 K
172 118 171 eqtrd φ G Y - Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W = 0 Poly 1 K
173 172 fveq2d φ deg 1 K G Y - Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W = deg 1 K 0 Poly 1 K
174 eqid deg 1 K = deg 1 K
175 174 17 167 deg1z K Ring deg 1 K 0 Poly 1 K = −∞
176 48 175 syl φ deg 1 K 0 Poly 1 K = −∞
177 1 flddrngd φ K DivRing
178 drngdomn K DivRing K Domn
179 177 178 syl φ K Domn
180 17 ply1domn K Domn Poly 1 K Domn
181 179 180 syl φ Poly 1 K Domn
182 19 181 jca φ Poly 1 K CRing Poly 1 K Domn
183 isidom Poly 1 K IDomn Poly 1 K CRing Poly 1 K Domn
184 182 183 sylibr φ Poly 1 K IDomn
185 174 17 49 deg1xrcl S ℤRHom K W Base Poly 1 K deg 1 K S ℤRHom K W *
186 62 185 syl φ deg 1 K S ℤRHom K W *
187 0xr 0 *
188 187 a1i φ 0 *
189 174 17 49 deg1xrcl X Base Poly 1 K deg 1 K X *
190 51 189 syl φ deg 1 K X *
191 174 17 56 14 deg1sclle K Ring ℤRHom K W Base K deg 1 K S ℤRHom K W 0
192 48 60 191 syl2anc φ deg 1 K S ℤRHom K W 0
193 0lt1 0 < 1
194 193 a1i φ 0 < 1
195 51 66 eleqtrdi φ X Base mulGrp Poly 1 K
196 127 7 mulg1 X Base mulGrp Poly 1 K 1 × ˙ X = X
197 195 196 syl φ 1 × ˙ X = X
198 197 fveq2d φ deg 1 K 1 × ˙ X = deg 1 K X
199 isfld K Field K DivRing K CRing
200 199 biimpi K Field K DivRing K CRing
201 1 200 syl φ K DivRing K CRing
202 201 simpld φ K DivRing
203 drngnzr K DivRing K NzRing
204 202 203 syl φ K NzRing
205 1nn0 1 0
206 205 a1i φ 1 0
207 174 17 6 22 7 deg1pw K NzRing 1 0 deg 1 K 1 × ˙ X = 1
208 204 206 207 syl2anc φ deg 1 K 1 × ˙ X = 1
209 198 208 eqtr3d φ deg 1 K X = 1
210 209 eqcomd φ 1 = deg 1 K X
211 194 210 breqtrd φ 0 < deg 1 K X
212 186 188 190 192 211 xrlelttrd φ deg 1 K S ℤRHom K W < deg 1 K X
213 17 174 48 49 63 51 62 212 deg1add φ deg 1 K X + Poly 1 K S ℤRHom K W = deg 1 K X
214 209 206 eqeltrd φ deg 1 K X 0
215 213 214 eqeltrd φ deg 1 K X + Poly 1 K S ℤRHom K W 0
216 174 17 167 49 deg1nn0clb K Ring X + Poly 1 K S ℤRHom K W Base Poly 1 K X + Poly 1 K S ℤRHom K W 0 Poly 1 K deg 1 K X + Poly 1 K S ℤRHom K W 0
217 48 65 216 syl2anc φ X + Poly 1 K S ℤRHom K W 0 Poly 1 K deg 1 K X + Poly 1 K S ℤRHom K W 0
218 215 217 mpbird φ X + Poly 1 K S ℤRHom K W 0 Poly 1 K
219 184 65 218 11 7 idomnnzpownz φ C × ˙ X + Poly 1 K S ℤRHom K W 0 Poly 1 K
220 174 17 167 49 deg1nn0clb K Ring C × ˙ X + Poly 1 K S ℤRHom K W Base Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W 0 Poly 1 K deg 1 K C × ˙ X + Poly 1 K S ℤRHom K W 0
221 48 114 220 syl2anc φ C × ˙ X + Poly 1 K S ℤRHom K W 0 Poly 1 K deg 1 K C × ˙ X + Poly 1 K S ℤRHom K W 0
222 219 221 mpbid φ deg 1 K C × ˙ X + Poly 1 K S ℤRHom K W 0
223 222 nn0red φ deg 1 K C × ˙ X + Poly 1 K S ℤRHom K W
224 223 mnfltd φ −∞ < deg 1 K C × ˙ X + Poly 1 K S ℤRHom K W
225 176 224 eqbrtrd φ deg 1 K 0 Poly 1 K < deg 1 K C × ˙ X + Poly 1 K S ℤRHom K W
226 173 225 eqbrtrd φ deg 1 K G Y - Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W < deg 1 K C × ˙ X + Poly 1 K S ℤRHom K W
227 102 226 jca φ Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Base Poly 1 K deg 1 K G Y - Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W < deg 1 K C × ˙ X + Poly 1 K S ℤRHom K W
228 eqid Unic 1p K = Unic 1p K
229 17 49 167 228 drnguc1p K DivRing C × ˙ X + Poly 1 K S ℤRHom K W Base Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W 0 Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W Unic 1p K
230 177 114 219 229 syl3anc φ C × ˙ X + Poly 1 K S ℤRHom K W Unic 1p K
231 13 17 49 174 168 106 228 q1peqb K Ring G Y Base Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W Unic 1p K Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Base Poly 1 K deg 1 K G Y - Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W < deg 1 K C × ˙ X + Poly 1 K S ℤRHom K W G Y Q C × ˙ X + Poly 1 K S ℤRHom K W = Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i
232 48 166 230 231 syl3anc φ Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Base Poly 1 K deg 1 K G Y - Poly 1 K Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i Poly 1 K C × ˙ X + Poly 1 K S ℤRHom K W < deg 1 K C × ˙ X + Poly 1 K S ℤRHom K W G Y Q C × ˙ X + Poly 1 K S ℤRHom K W = Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i
233 227 232 mpbid φ G Y Q C × ˙ X + Poly 1 K S ℤRHom K W = Y W C × ˙ X + Poly 1 K S ℤRHom K W + M M i 0 A W Y i × ˙ X + Poly 1 K S ℤRHom K i