Metamath Proof Explorer


Theorem unitscyglem2

Description: Lemma for unitscyg . (Contributed by metakunt, 13-Jul-2025)

Ref Expression
Hypotheses unitscyglem1.1 B = Base G
unitscyglem1.2 × ˙ = G
unitscyglem1.3 φ G Grp
unitscyglem1.4 φ B Fin
unitscyglem1.5 φ n x B | n × ˙ x = 0 G n
unitscyglem2.1 φ D
unitscyglem2.2 φ D B
unitscyglem2.3 φ A B
unitscyglem2.4 φ od G A = D
unitscyglem2.5 φ c c < D c B x B | od G x = c x B | od G x = c = ϕ c
Assertion unitscyglem2 φ x B | od G x = D = ϕ D

Proof

Step Hyp Ref Expression
1 unitscyglem1.1 B = Base G
2 unitscyglem1.2 × ˙ = G
3 unitscyglem1.3 φ G Grp
4 unitscyglem1.4 φ B Fin
5 unitscyglem1.5 φ n x B | n × ˙ x = 0 G n
6 unitscyglem2.1 φ D
7 unitscyglem2.2 φ D B
8 unitscyglem2.3 φ A B
9 unitscyglem2.4 φ od G A = D
10 unitscyglem2.5 φ c c < D c B x B | od G x = c x B | od G x = c = ϕ c
11 breq1 a = k a D k D
12 11 elrab k a 1 D 1 | a D k 1 D 1 k D
13 12 bilani φ k a 1 D 1 | a D k 1 D 1 k D
14 13 simpld φ k a 1 D 1 | a D k 1 D 1
15 14 elfzelzd φ k a 1 D 1 | a D k
16 6 adantr φ k a 1 D 1 | a D D
17 16 nnzd φ k a 1 D 1 | a D D
18 hashcl B Fin B 0
19 4 18 syl φ B 0
20 19 adantr φ k a 1 D 1 | a D B 0
21 20 nn0zd φ k a 1 D 1 | a D B
22 13 simprd φ k a 1 D 1 | a D k D
23 7 adantr φ k a 1 D 1 | a D D B
24 15 17 21 22 23 dvdstrd φ k a 1 D 1 | a D k B
25 simpl φ k 1 D 1 k D φ
26 12 14 sylan2br φ k 1 D 1 k D k 1 D 1
27 25 26 jca φ k 1 D 1 k D φ k 1 D 1
28 12 22 sylan2br φ k 1 D 1 k D k D
29 27 28 jca φ k 1 D 1 k D φ k 1 D 1 k D
30 fveqeq2 x = D k × ˙ A od G x = k od G D k × ˙ A = k
31 3 ad4antr φ k 1 D 1 k D l l k = D G Grp
32 simpr φ k 1 D 1 k D l l k = D l k = D
33 32 eqcomd φ k 1 D 1 k D l l k = D D = l k
34 33 oveq1d φ k 1 D 1 k D l l k = D D k = l k k
35 simplr φ k 1 D 1 k D l l k = D l
36 35 nncnd φ k 1 D 1 k D l l k = D l
37 elfzelz k 1 D 1 k
38 37 adantl φ k 1 D 1 k
39 38 ad3antrrr φ k 1 D 1 k D l l k = D k
40 39 zcnd φ k 1 D 1 k D l l k = D k
41 elfzle1 k 1 D 1 1 k
42 41 adantl φ k 1 D 1 1 k
43 38 42 jca φ k 1 D 1 k 1 k
44 elnnz1 k k 1 k
45 43 44 sylibr φ k 1 D 1 k
46 45 adantr φ k 1 D 1 k D k
47 46 ad2antrr φ k 1 D 1 k D l l k = D k
48 47 nnne0d φ k 1 D 1 k D l l k = D k 0
49 36 40 48 divcan4d φ k 1 D 1 k D l l k = D l k k = l
50 34 49 eqtrd φ k 1 D 1 k D l l k = D D k = l
51 50 35 eqeltrd φ k 1 D 1 k D l l k = D D k
52 51 nnnn0d φ k 1 D 1 k D l l k = D D k 0
53 52 nn0zd φ k 1 D 1 k D l l k = D D k
54 8 ad4antr φ k 1 D 1 k D l l k = D A B
55 1 2 31 53 54 mulgcld φ k 1 D 1 k D l l k = D D k × ˙ A B
56 6 ad2antrr φ k 1 D 1 k D D
57 56 ad2antrr φ k 1 D 1 k D l l k = D D
58 57 nncnd φ k 1 D 1 k D l l k = D D
59 58 40 48 divcan1d φ k 1 D 1 k D l l k = D D k k = D
60 9 ad4antr φ k 1 D 1 k D l l k = D od G A = D
61 60 eqcomd φ k 1 D 1 k D l l k = D D = od G A
62 eqid od G = od G
63 1 62 2 odmulg G Grp A B D k od G A = D k gcd od G A od G D k × ˙ A
64 31 54 53 63 syl3anc φ k 1 D 1 k D l l k = D od G A = D k gcd od G A od G D k × ˙ A
65 61 64 eqtrd φ k 1 D 1 k D l l k = D D = D k gcd od G A od G D k × ˙ A
66 60 oveq2d φ k 1 D 1 k D l l k = D D k gcd od G A = D k gcd D
67 58 40 48 divcan2d φ k 1 D 1 k D l l k = D k D k = D
68 67 eqcomd φ k 1 D 1 k D l l k = D D = k D k
69 68 oveq2d φ k 1 D 1 k D l l k = D D k gcd D = D k gcd k D k
70 52 39 gcdmultipled φ k 1 D 1 k D l l k = D D k gcd k D k = D k
71 69 70 eqtrd φ k 1 D 1 k D l l k = D D k gcd D = D k
72 66 71 eqtrd φ k 1 D 1 k D l l k = D D k gcd od G A = D k
73 72 oveq1d φ k 1 D 1 k D l l k = D D k gcd od G A od G D k × ˙ A = D k od G D k × ˙ A
74 65 73 eqtrd φ k 1 D 1 k D l l k = D D = D k od G D k × ˙ A
75 59 74 eqtr2d φ k 1 D 1 k D l l k = D D k od G D k × ˙ A = D k k
76 1 62 55 odcld φ k 1 D 1 k D l l k = D od G D k × ˙ A 0
77 76 nn0cnd φ k 1 D 1 k D l l k = D od G D k × ˙ A
78 53 zcnd φ k 1 D 1 k D l l k = D D k
79 57 nnne0d φ k 1 D 1 k D l l k = D D 0
80 58 40 79 48 divne0d φ k 1 D 1 k D l l k = D D k 0
81 77 40 78 80 mulcand φ k 1 D 1 k D l l k = D D k od G D k × ˙ A = D k k od G D k × ˙ A = k
82 75 81 mpbid φ k 1 D 1 k D l l k = D od G D k × ˙ A = k
83 30 55 82 elrabd φ k 1 D 1 k D l l k = D D k × ˙ A x B | od G x = k
84 83 ne0d φ k 1 D 1 k D l l k = D x B | od G x = k
85 nndivides k D k D l l k = D
86 46 56 85 syl2anc φ k 1 D 1 k D k D l l k = D
87 86 biimpd φ k 1 D 1 k D k D l l k = D
88 87 syldbl2 φ k 1 D 1 k D l l k = D
89 84 88 r19.29a φ k 1 D 1 k D x B | od G x = k
90 29 89 syl φ k 1 D 1 k D x B | od G x = k
91 90 ex φ k 1 D 1 k D x B | od G x = k
92 91 adantr φ k a 1 D 1 | a D k 1 D 1 k D x B | od G x = k
93 13 92 mpd φ k a 1 D 1 | a D x B | od G x = k
94 24 93 jca φ k a 1 D 1 | a D k B x B | od G x = k
95 14 41 syl φ k a 1 D 1 | a D 1 k
96 15 95 jca φ k a 1 D 1 | a D k 1 k
97 96 44 sylibr φ k a 1 D 1 | a D k
98 97 nnred φ k a 1 D 1 | a D k
99 16 nnred φ k a 1 D 1 | a D D
100 1red φ k a 1 D 1 | a D 1
101 99 100 resubcld φ k a 1 D 1 | a D D 1
102 elfzle2 k 1 D 1 k D 1
103 14 102 syl φ k a 1 D 1 | a D k D 1
104 99 ltm1d φ k a 1 D 1 | a D D 1 < D
105 98 101 99 103 104 lelttrd φ k a 1 D 1 | a D k < D
106 breq1 c = k c < D k < D
107 breq1 c = k c B k B
108 eqeq2 c = k od G x = c od G x = k
109 108 rabbidv c = k x B | od G x = c = x B | od G x = k
110 109 neeq1d c = k x B | od G x = c x B | od G x = k
111 107 110 anbi12d c = k c B x B | od G x = c k B x B | od G x = k
112 109 fveq2d c = k x B | od G x = c = x B | od G x = k
113 fveq2 c = k ϕ c = ϕ k
114 112 113 eqeq12d c = k x B | od G x = c = ϕ c x B | od G x = k = ϕ k
115 111 114 imbi12d c = k c B x B | od G x = c x B | od G x = c = ϕ c k B x B | od G x = k x B | od G x = k = ϕ k
116 106 115 imbi12d c = k c < D c B x B | od G x = c x B | od G x = c = ϕ c k < D k B x B | od G x = k x B | od G x = k = ϕ k
117 10 adantr φ k a 1 D 1 | a D c c < D c B x B | od G x = c x B | od G x = c = ϕ c
118 116 117 97 rspcdva φ k a 1 D 1 | a D k < D k B x B | od G x = k x B | od G x = k = ϕ k
119 105 118 mpd φ k a 1 D 1 | a D k B x B | od G x = k x B | od G x = k = ϕ k
120 94 119 mpd φ k a 1 D 1 | a D x B | od G x = k = ϕ k
121 120 sumeq2dv φ k a 1 D 1 | a D x B | od G x = k = k a 1 D 1 | a D ϕ k
122 121 eqcomd φ k a 1 D 1 | a D ϕ k = k a 1 D 1 | a D x B | od G x = k
123 122 oveq1d φ k a 1 D 1 | a D ϕ k + x B | od G x = D = k a 1 D 1 | a D x B | od G x = k + x B | od G x = D
124 elun y a 1 D 1 | a D D y a 1 D 1 | a D y D
125 124 bilani φ y a 1 D 1 | a D D y a 1 D 1 | a D y D
126 1zzd φ a 1 D 1 a D 1
127 6 adantr φ a 1 D 1 a D D
128 127 nnzd φ a 1 D 1 a D D
129 elfzelz a 1 D 1 a
130 129 adantr a 1 D 1 a D a
131 130 adantl φ a 1 D 1 a D a
132 elfzle1 a 1 D 1 1 a
133 132 adantr a 1 D 1 a D 1 a
134 133 adantl φ a 1 D 1 a D 1 a
135 131 zred φ a 1 D 1 a D a
136 127 nnred φ a 1 D 1 a D D
137 1red φ a 1 D 1 a D 1
138 136 137 resubcld φ a 1 D 1 a D D 1
139 elfzle2 a 1 D 1 a D 1
140 139 adantr a 1 D 1 a D a D 1
141 140 adantl φ a 1 D 1 a D a D 1
142 136 ltm1d φ a 1 D 1 a D D 1 < D
143 135 138 136 141 142 lelttrd φ a 1 D 1 a D a < D
144 135 136 143 ltled φ a 1 D 1 a D a D
145 126 128 131 134 144 elfzd φ a 1 D 1 a D a 1 D
146 145 rabss3d φ a 1 D 1 | a D a 1 D | a D
147 146 sseld φ y a 1 D 1 | a D y a 1 D | a D
148 147 imp φ y a 1 D 1 | a D y a 1 D | a D
149 elsni y D y = D
150 149 adantl φ y D y = D
151 simpr φ y = D y = D
152 breq1 a = D a D D D
153 1zzd φ 1
154 6 nnzd φ D
155 6 nnge1d φ 1 D
156 6 nnred φ D
157 156 leidd φ D D
158 153 154 154 155 157 elfzd φ D 1 D
159 iddvds D D D
160 154 159 syl φ D D
161 152 158 160 elrabd φ D a 1 D | a D
162 161 adantr φ y = D D a 1 D | a D
163 151 162 eqeltrd φ y = D y a 1 D | a D
164 163 ex φ y = D y a 1 D | a D
165 164 adantr φ y D y = D y a 1 D | a D
166 150 165 mpd φ y D y a 1 D | a D
167 148 166 jaodan φ y a 1 D 1 | a D y D y a 1 D | a D
168 167 ex φ y a 1 D 1 | a D y D y a 1 D | a D
169 168 adantr φ y a 1 D 1 | a D D y a 1 D 1 | a D y D y a 1 D | a D
170 125 169 mpd φ y a 1 D 1 | a D D y a 1 D | a D
171 170 ex φ y a 1 D 1 | a D D y a 1 D | a D
172 simpr φ y a 1 D | a D y = D y = D
173 eqidd φ y a 1 D | a D y = D D = D
174 6 ad2antrr φ y a 1 D | a D y = D D
175 elsng D D D D = D
176 174 175 syl φ y a 1 D | a D y = D D D D = D
177 173 176 mpbird φ y a 1 D | a D y = D D D
178 172 177 eqeltrd φ y a 1 D | a D y = D y D
179 178 olcd φ y a 1 D | a D y = D y a 1 D 1 | a D y D
180 breq1 a = y a D y D
181 180 elrab y a 1 D | a D y 1 D y D
182 181 bilani φ y a 1 D | a D y 1 D y D
183 182 adantr φ y a 1 D | a D ¬ y = D y 1 D y D
184 1zzd φ y a 1 D | a D ¬ y = D y 1 D y D 1
185 154 ad3antrrr φ y a 1 D | a D ¬ y = D y 1 D y D D
186 185 184 zsubcld φ y a 1 D | a D ¬ y = D y 1 D y D D 1
187 elfzelz y 1 D y
188 187 adantr y 1 D y D y
189 188 adantl φ y a 1 D | a D ¬ y = D y 1 D y D y
190 elfzle1 y 1 D 1 y
191 190 adantr y 1 D y D 1 y
192 191 adantl φ y a 1 D | a D ¬ y = D y 1 D y D 1 y
193 elfzle2 y 1 D y D
194 193 adantr y 1 D y D y D
195 194 adantl φ y a 1 D | a D ¬ y = D y 1 D y D y D
196 neqne ¬ y = D y D
197 196 adantl φ y a 1 D | a D ¬ y = D y D
198 197 necomd φ y a 1 D | a D ¬ y = D D y
199 198 adantr φ y a 1 D | a D ¬ y = D y 1 D y D D y
200 195 199 jca φ y a 1 D | a D ¬ y = D y 1 D y D y D D y
201 189 zred φ y a 1 D | a D ¬ y = D y 1 D y D y
202 156 ad3antrrr φ y a 1 D | a D ¬ y = D y 1 D y D D
203 201 202 ltlend φ y a 1 D | a D ¬ y = D y 1 D y D y < D y D D y
204 200 203 mpbird φ y a 1 D | a D ¬ y = D y 1 D y D y < D
205 6 ad3antrrr φ y a 1 D | a D ¬ y = D y 1 D y D D
206 205 nnzd φ y a 1 D | a D ¬ y = D y 1 D y D D
207 189 206 zltlem1d φ y a 1 D | a D ¬ y = D y 1 D y D y < D y D 1
208 204 207 mpbid φ y a 1 D | a D ¬ y = D y 1 D y D y D 1
209 184 186 189 192 208 elfzd φ y a 1 D | a D ¬ y = D y 1 D y D y 1 D 1
210 simprr φ y a 1 D | a D ¬ y = D y 1 D y D y D
211 180 209 210 elrabd φ y a 1 D | a D ¬ y = D y 1 D y D y a 1 D 1 | a D
212 211 ex φ y a 1 D | a D ¬ y = D y 1 D y D y a 1 D 1 | a D
213 183 212 mpd φ y a 1 D | a D ¬ y = D y a 1 D 1 | a D
214 213 orcd φ y a 1 D | a D ¬ y = D y a 1 D 1 | a D y D
215 179 214 pm2.61dan φ y a 1 D | a D y a 1 D 1 | a D y D
216 215 124 sylibr φ y a 1 D | a D y a 1 D 1 | a D D
217 216 ex φ y a 1 D | a D y a 1 D 1 | a D D
218 171 217 impbid φ y a 1 D 1 | a D D y a 1 D | a D
219 218 eqrdv φ a 1 D 1 | a D D = a 1 D | a D
220 219 sumeq1d φ k a 1 D 1 | a D D ϕ k = k a 1 D | a D ϕ k
221 phisum D k a | a D ϕ k = D
222 6 221 syl φ k a | a D ϕ k = D
223 eqcom od G A = D D = od G A
224 223 imbi2i φ od G A = D φ D = od G A
225 9 224 mpbi φ D = od G A
226 225 oveq1d φ D × ˙ x = od G A × ˙ x
227 226 eqeq1d φ D × ˙ x = 0 G od G A × ˙ x = 0 G
228 227 rabbidv φ x B | D × ˙ x = 0 G = x B | od G A × ˙ x = 0 G
229 228 fveq2d φ x B | D × ˙ x = 0 G = x B | od G A × ˙ x = 0 G
230 1 2 3 4 5 8 unitscyglem1 φ x B | od G A × ˙ x = 0 G = od G A
231 229 230 eqtrd φ x B | D × ˙ x = 0 G = od G A
232 231 9 eqtr2d φ D = x B | D × ˙ x = 0 G
233 1 2 3 4 6 grpods φ k a 1 D | a D x B | od G x = k = x B | D × ˙ x = 0 G
234 232 233 eqtr4d φ D = k a 1 D | a D x B | od G x = k
235 219 eqcomd φ a 1 D | a D = a 1 D 1 | a D D
236 235 sumeq1d φ k a 1 D | a D x B | od G x = k = k a 1 D 1 | a D D x B | od G x = k
237 234 236 eqtrd φ D = k a 1 D 1 | a D D x B | od G x = k
238 222 237 eqtr2d φ k a 1 D 1 | a D D x B | od G x = k = k a | a D ϕ k
239 1zzd φ y a | a D 1
240 154 adantr φ y a | a D D
241 180 elrab y a | a D y y D
242 241 bilani φ y a | a D y y D
243 242 simpld φ y a | a D y
244 243 nnzd φ y a | a D y
245 243 nnge1d φ y a | a D 1 y
246 242 simprd φ y a | a D y D
247 6 adantr φ y a | a D D
248 dvdsle y D y D y D
249 244 247 248 syl2anc φ y a | a D y D y D
250 246 249 mpd φ y a | a D y D
251 239 240 244 245 250 elfzd φ y a | a D y 1 D
252 180 251 246 elrabd φ y a | a D y a 1 D | a D
253 252 ex φ y a | a D y a 1 D | a D
254 elfzelz a 1 D a
255 elfzle1 a 1 D 1 a
256 254 255 jca a 1 D a 1 a
257 256 adantr a 1 D a D a 1 a
258 257 adantl φ a 1 D a D a 1 a
259 elnnz1 a a 1 a
260 258 259 sylibr φ a 1 D a D a
261 260 rabss3d φ a 1 D | a D a | a D
262 261 sseld φ y a 1 D | a D y a | a D
263 253 262 impbid φ y a | a D y a 1 D | a D
264 263 eqrdv φ a | a D = a 1 D | a D
265 264 sumeq1d φ k a | a D ϕ k = k a 1 D | a D ϕ k
266 238 265 eqtr2d φ k a 1 D | a D ϕ k = k a 1 D 1 | a D D x B | od G x = k
267 220 266 eqtrd φ k a 1 D 1 | a D D ϕ k = k a 1 D 1 | a D D x B | od G x = k
268 nfv k φ
269 nfcv _ k x B | od G x = D
270 fzfid φ 1 D 1 Fin
271 ssrab2 a 1 D 1 | a D 1 D 1
272 271 a1i φ a 1 D 1 | a D 1 D 1
273 270 272 ssfid φ a 1 D 1 | a D Fin
274 152 elrab D a 1 D 1 | a D D 1 D 1 D D
275 274 biimpi D a 1 D 1 | a D D 1 D 1 D D
276 275 simpld D a 1 D 1 | a D D 1 D 1
277 276 adantl φ D a 1 D 1 | a D D 1 D 1
278 elfzle2 D 1 D 1 D D 1
279 277 278 syl φ D a 1 D 1 | a D D D 1
280 156 ltm1d φ D 1 < D
281 1red φ 1
282 156 281 resubcld φ D 1
283 282 156 ltnled φ D 1 < D ¬ D D 1
284 280 283 mpbid φ ¬ D D 1
285 284 adantr φ D a 1 D 1 | a D ¬ D D 1
286 279 285 pm2.21dd φ D a 1 D 1 | a D ¬ D a 1 D 1 | a D
287 simpr φ ¬ D a 1 D 1 | a D ¬ D a 1 D 1 | a D
288 286 287 pm2.61dan φ ¬ D a 1 D 1 | a D
289 4 adantr φ k a 1 D 1 | a D B Fin
290 ssrab2 x B | od G x = k B
291 290 a1i φ k a 1 D 1 | a D x B | od G x = k B
292 289 291 ssfid φ k a 1 D 1 | a D x B | od G x = k Fin
293 hashcl x B | od G x = k Fin x B | od G x = k 0
294 292 293 syl φ k a 1 D 1 | a D x B | od G x = k 0
295 294 nn0cnd φ k a 1 D 1 | a D x B | od G x = k
296 eqeq2 k = D od G x = k od G x = D
297 296 rabbidv k = D x B | od G x = k = x B | od G x = D
298 297 fveq2d k = D x B | od G x = k = x B | od G x = D
299 ssrab2 x B | od G x = D B
300 299 a1i φ x B | od G x = D B
301 4 300 ssfid φ x B | od G x = D Fin
302 hashcl x B | od G x = D Fin x B | od G x = D 0
303 301 302 syl φ x B | od G x = D 0
304 303 nn0cnd φ x B | od G x = D
305 268 269 273 6 288 295 298 304 fsumsplitsn φ k a 1 D 1 | a D D x B | od G x = k = k a 1 D 1 | a D x B | od G x = k + x B | od G x = D
306 267 305 eqtr2d φ k a 1 D 1 | a D x B | od G x = k + x B | od G x = D = k a 1 D 1 | a D D ϕ k
307 nfcv _ k ϕ D
308 120 295 eqeltrrd φ k a 1 D 1 | a D ϕ k
309 fveq2 k = D ϕ k = ϕ D
310 6 phicld φ ϕ D
311 310 nncnd φ ϕ D
312 268 307 273 6 288 308 309 311 fsumsplitsn φ k a 1 D 1 | a D D ϕ k = k a 1 D 1 | a D ϕ k + ϕ D
313 306 312 eqtrd φ k a 1 D 1 | a D x B | od G x = k + x B | od G x = D = k a 1 D 1 | a D ϕ k + ϕ D
314 123 313 eqtrd φ k a 1 D 1 | a D ϕ k + x B | od G x = D = k a 1 D 1 | a D ϕ k + ϕ D
315 273 308 fsumcl φ k a 1 D 1 | a D ϕ k
316 315 304 311 addcand φ k a 1 D 1 | a D ϕ k + x B | od G x = D = k a 1 D 1 | a D ϕ k + ϕ D x B | od G x = D = ϕ D
317 314 316 mpbid φ x B | od G x = D = ϕ D