Metamath Proof Explorer


Theorem gsumval3

Description: Value of the group sum operation over an arbitrary finite set. (Contributed by Mario Carneiro, 15-Dec-2014) (Revised by AV, 31-May-2019)

Ref Expression
Hypotheses gsumval3.b B=BaseG
gsumval3.0 0˙=0G
gsumval3.p +˙=+G
gsumval3.z Z=CntzG
gsumval3.g φGMnd
gsumval3.a φAV
gsumval3.f φF:AB
gsumval3.c φranFZranF
gsumval3.m φM
gsumval3.h φH:1M1-1A
gsumval3.n φFsupp0˙ranH
gsumval3.w W=FHsupp0˙
Assertion gsumval3 φGF=seq1+˙FHM

Proof

Step Hyp Ref Expression
1 gsumval3.b B=BaseG
2 gsumval3.0 0˙=0G
3 gsumval3.p +˙=+G
4 gsumval3.z Z=CntzG
5 gsumval3.g φGMnd
6 gsumval3.a φAV
7 gsumval3.f φF:AB
8 gsumval3.c φranFZranF
9 gsumval3.m φM
10 gsumval3.h φH:1M1-1A
11 gsumval3.n φFsupp0˙ranH
12 gsumval3.w W=FHsupp0˙
13 2 gsumz GMndAVGxA0˙=0˙
14 5 6 13 syl2anc φGxA0˙=0˙
15 14 adantr φW=GxA0˙=0˙
16 7 feqmptd φF=xAFx
17 16 adantr φW=F=xAFx
18 f1f H:1M1-1AH:1MA
19 10 18 syl φH:1MA
20 19 ad2antrr φW=xranHH:1MA
21 f1f1orn H:1M1-1AH:1M1-1 ontoranH
22 10 21 syl φH:1M1-1 ontoranH
23 22 adantr φW=H:1M1-1 ontoranH
24 f1ocnv H:1M1-1 ontoranHH-1:ranH1-1 onto1M
25 f1of H-1:ranH1-1 onto1MH-1:ranH1M
26 23 24 25 3syl φW=H-1:ranH1M
27 26 ffvelrnda φW=xranHH-1x1M
28 fvco3 H:1MAH-1x1MFHH-1x=FHH-1x
29 20 27 28 syl2anc φW=xranHFHH-1x=FHH-1x
30 simpr φW=W=
31 30 difeq2d φW=1MW=1M
32 dif0 1M=1M
33 31 32 eqtrdi φW=1MW=1M
34 33 adantr φW=xranH1MW=1M
35 27 34 eleqtrrd φW=xranHH-1x1MW
36 fco F:ABH:1MAFH:1MB
37 7 19 36 syl2anc φFH:1MB
38 37 adantr φW=FH:1MB
39 12 eqimss2i FHsupp0˙W
40 39 a1i φW=FHsupp0˙W
41 ovexd φW=1MV
42 2 fvexi 0˙V
43 42 a1i φW=0˙V
44 38 40 41 43 suppssr φW=H-1x1MWFHH-1x=0˙
45 35 44 syldan φW=xranHFHH-1x=0˙
46 f1ocnvfv2 H:1M1-1 ontoranHxranHHH-1x=x
47 23 46 sylan φW=xranHHH-1x=x
48 47 fveq2d φW=xranHFHH-1x=Fx
49 29 45 48 3eqtr3rd φW=xranHFx=0˙
50 fvex FxV
51 50 elsn Fx0˙Fx=0˙
52 49 51 sylibr φW=xranHFx0˙
53 52 adantlr φW=xAxranHFx0˙
54 eldif xAranHxA¬xranH
55 42 a1i φ0˙V
56 7 11 6 55 suppssr φxAranHFx=0˙
57 56 51 sylibr φxAranHFx0˙
58 54 57 sylan2br φxA¬xranHFx0˙
59 58 adantlr φW=xA¬xranHFx0˙
60 59 anassrs φW=xA¬xranHFx0˙
61 53 60 pm2.61dan φW=xAFx0˙
62 61 51 sylib φW=xAFx=0˙
63 62 mpteq2dva φW=xAFx=xA0˙
64 17 63 eqtrd φW=F=xA0˙
65 64 oveq2d φW=GF=GxA0˙
66 1 2 mndidcl GMnd0˙B
67 1 3 2 mndlid GMnd0˙B0˙+˙0˙=0˙
68 5 66 67 syl2anc2 φ0˙+˙0˙=0˙
69 68 adantr φW=0˙+˙0˙=0˙
70 nnuz =1
71 9 70 eleqtrdi φM1
72 71 adantr φW=M1
73 33 eleq2d φW=x1MWx1M
74 73 biimpar φW=x1Mx1MW
75 38 40 41 43 suppssr φW=x1MWFHx=0˙
76 74 75 syldan φW=x1MFHx=0˙
77 69 72 76 seqid3 φW=seq1+˙FHM=0˙
78 15 65 77 3eqtr4d φW=GF=seq1+˙FHM
79 fzf :×𝒫
80 ffn :×𝒫Fn×
81 ovelrn Fn×AranmnA=mn
82 79 80 81 mp2b AranmnA=mn
83 5 ad2antrr φWA=mnGMnd
84 simpr φWA=mnA=mn
85 frel F:ABRelF
86 reldm0 RelFF=domF=
87 7 85 86 3syl φF=domF=
88 7 fdmd φdomF=A
89 88 eqeq1d φdomF=A=
90 87 89 bitrd φF=A=
91 coeq1 F=FH=H
92 co01 H=
93 91 92 eqtrdi F=FH=
94 93 oveq1d F=FHsupp0˙=supp0˙
95 supp0 0˙Vsupp0˙=
96 42 95 ax-mp supp0˙=
97 94 96 eqtrdi F=FHsupp0˙=
98 12 97 eqtrid F=W=
99 90 98 syl6bir φA=W=
100 99 necon3d φWA
101 100 imp φWA
102 101 adantr φWA=mnA
103 84 102 eqnetrrd φWA=mnmn
104 fzn0 mnnm
105 103 104 sylib φWA=mnnm
106 7 ad2antrr φWA=mnF:AB
107 84 feq2d φWA=mnF:ABF:mnB
108 106 107 mpbid φWA=mnF:mnB
109 1 3 83 105 108 gsumval2 φWA=mnGF=seqm+˙Fn
110 frn H:1MAranHA
111 10 18 110 3syl φranHA
112 111 ad2antrr φWA=mnranHA
113 112 84 sseqtrd φWA=mnranHmn
114 fzssuz mnm
115 uzssz m
116 zssre
117 115 116 sstri m
118 114 117 sstri mn
119 113 118 sstrdi φWA=mnranH
120 ltso <Or
121 soss ranH<Or<OrranH
122 119 120 121 mpisyl φWA=mn<OrranH
123 fzfi 1MFin
124 123 a1i φ1MFin
125 19 124 fexd φHV
126 f1oen3g HVH:1M1-1 ontoranH1MranH
127 125 22 126 syl2anc φ1MranH
128 enfi 1MranH1MFinranHFin
129 127 128 syl φ1MFinranHFin
130 123 129 mpbii φranHFin
131 130 ad2antrr φWA=mnranHFin
132 fz1iso <OrranHranHFinffIsom<,<1ranHranH
133 122 131 132 syl2anc φWA=mnffIsom<,<1ranHranH
134 9 nnnn0d φM0
135 hashfz1 M01M=M
136 134 135 syl φ1M=M
137 124 22 hasheqf1od φ1M=ranH
138 136 137 eqtr3d φM=ranH
139 138 ad2antrr φWA=mnfIsom<,<1ranHranHM=ranH
140 139 fveq2d φWA=mnfIsom<,<1ranHranHseq1+˙FfM=seq1+˙FfranH
141 5 ad2antrr φWA=mnfIsom<,<1ranHranHGMnd
142 1 3 mndcl GMndxByBx+˙yB
143 142 3expb GMndxByBx+˙yB
144 141 143 sylan φWA=mnfIsom<,<1ranHranHxByBx+˙yB
145 8 ad2antrr φWA=mnfIsom<,<1ranHranHranFZranF
146 145 sselda φWA=mnfIsom<,<1ranHranHxranFxZranF
147 3 4 cntzi xZranFyranFx+˙y=y+˙x
148 146 147 sylan φWA=mnfIsom<,<1ranHranHxranFyranFx+˙y=y+˙x
149 148 anasss φWA=mnfIsom<,<1ranHranHxranFyranFx+˙y=y+˙x
150 1 3 mndass GMndxByBzBx+˙y+˙z=x+˙y+˙z
151 141 150 sylan φWA=mnfIsom<,<1ranHranHxByBzBx+˙y+˙z=x+˙y+˙z
152 71 ad2antrr φWA=mnfIsom<,<1ranHranHM1
153 7 ad2antrr φWA=mnfIsom<,<1ranHranHF:AB
154 153 frnd φWA=mnfIsom<,<1ranHranHranFB
155 simprr φWA=mnfIsom<,<1ranHranHfIsom<,<1ranHranH
156 isof1o fIsom<,<1ranHranHf:1ranH1-1 ontoranH
157 155 156 syl φWA=mnfIsom<,<1ranHranHf:1ranH1-1 ontoranH
158 139 oveq2d φWA=mnfIsom<,<1ranHranH1M=1ranH
159 158 f1oeq2d φWA=mnfIsom<,<1ranHranHf:1M1-1 ontoranHf:1ranH1-1 ontoranH
160 157 159 mpbird φWA=mnfIsom<,<1ranHranHf:1M1-1 ontoranH
161 f1ocnv f:1M1-1 ontoranHf-1:ranH1-1 onto1M
162 160 161 syl φWA=mnfIsom<,<1ranHranHf-1:ranH1-1 onto1M
163 22 ad2antrr φWA=mnfIsom<,<1ranHranHH:1M1-1 ontoranH
164 f1oco f-1:ranH1-1 onto1MH:1M1-1 ontoranHf-1H:1M1-1 onto1M
165 162 163 164 syl2anc φWA=mnfIsom<,<1ranHranHf-1H:1M1-1 onto1M
166 ffn F:ABFFnA
167 dffn4 FFnAF:AontoranF
168 166 167 sylib F:ABF:AontoranF
169 fof F:AontoranFF:AranF
170 153 168 169 3syl φWA=mnfIsom<,<1ranHranHF:AranF
171 f1of f:1M1-1 ontoranHf:1MranH
172 160 171 syl φWA=mnfIsom<,<1ranHranHf:1MranH
173 111 ad2antrr φWA=mnfIsom<,<1ranHranHranHA
174 172 173 fssd φWA=mnfIsom<,<1ranHranHf:1MA
175 fco F:AranFf:1MAFf:1MranF
176 170 174 175 syl2anc φWA=mnfIsom<,<1ranHranHFf:1MranF
177 176 ffvelrnda φWA=mnfIsom<,<1ranHranHx1MFfxranF
178 f1ococnv2 f:1M1-1 ontoranHff-1=IranH
179 160 178 syl φWA=mnfIsom<,<1ranHranHff-1=IranH
180 179 coeq1d φWA=mnfIsom<,<1ranHranHff-1H=IranHH
181 f1of H:1M1-1 ontoranHH:1MranH
182 fcoi2 H:1MranHIranHH=H
183 163 181 182 3syl φWA=mnfIsom<,<1ranHranHIranHH=H
184 180 183 eqtr2d φWA=mnfIsom<,<1ranHranHH=ff-1H
185 coass ff-1H=ff-1H
186 184 185 eqtrdi φWA=mnfIsom<,<1ranHranHH=ff-1H
187 186 coeq2d φWA=mnfIsom<,<1ranHranHFH=Fff-1H
188 coass Fff-1H=Fff-1H
189 187 188 eqtr4di φWA=mnfIsom<,<1ranHranHFH=Fff-1H
190 189 fveq1d φWA=mnfIsom<,<1ranHranHFHk=Fff-1Hk
191 190 adantr φWA=mnfIsom<,<1ranHranHk1MFHk=Fff-1Hk
192 f1of f-1:ranH1-1 onto1Mf-1:ranH1M
193 160 161 192 3syl φWA=mnfIsom<,<1ranHranHf-1:ranH1M
194 163 181 syl φWA=mnfIsom<,<1ranHranHH:1MranH
195 fco f-1:ranH1MH:1MranHf-1H:1M1M
196 193 194 195 syl2anc φWA=mnfIsom<,<1ranHranHf-1H:1M1M
197 fvco3 f-1H:1M1Mk1MFff-1Hk=Fff-1Hk
198 196 197 sylan φWA=mnfIsom<,<1ranHranHk1MFff-1Hk=Fff-1Hk
199 191 198 eqtrd φWA=mnfIsom<,<1ranHranHk1MFHk=Fff-1Hk
200 144 149 151 152 154 165 177 199 seqf1o φWA=mnfIsom<,<1ranHranHseq1+˙FHM=seq1+˙FfM
201 1 3 2 mndlid GMndxB0˙+˙x=x
202 141 201 sylan φWA=mnfIsom<,<1ranHranHxB0˙+˙x=x
203 1 3 2 mndrid GMndxBx+˙0˙=x
204 141 203 sylan φWA=mnfIsom<,<1ranHranHxBx+˙0˙=x
205 141 66 syl φWA=mnfIsom<,<1ranHranH0˙B
206 fdm H:1MAdomH=1M
207 10 18 206 3syl φdomH=1M
208 eluzfz1 M111M
209 ne0i 11M1M
210 71 208 209 3syl φ1M
211 207 210 eqnetrd φdomH
212 dm0rn0 domH=ranH=
213 212 necon3bii domHranH
214 211 213 sylib φranH
215 214 ad2antrr φWA=mnfIsom<,<1ranHranHranH
216 113 adantrr φWA=mnfIsom<,<1ranHranHranHmn
217 simprl φWA=mnfIsom<,<1ranHranHA=mn
218 217 eleq2d φWA=mnfIsom<,<1ranHranHxAxmn
219 218 biimpar φWA=mnfIsom<,<1ranHranHxmnxA
220 153 ffvelrnda φWA=mnfIsom<,<1ranHranHxAFxB
221 219 220 syldan φWA=mnfIsom<,<1ranHranHxmnFxB
222 217 difeq1d φWA=mnfIsom<,<1ranHranHAranH=mnranH
223 222 eleq2d φWA=mnfIsom<,<1ranHranHxAranHxmnranH
224 223 biimpar φWA=mnfIsom<,<1ranHranHxmnranHxAranH
225 56 ad4ant14 φWA=mnfIsom<,<1ranHranHxAranHFx=0˙
226 224 225 syldan φWA=mnfIsom<,<1ranHranHxmnranHFx=0˙
227 f1of f:1ranH1-1 ontoranHf:1ranHranH
228 155 156 227 3syl φWA=mnfIsom<,<1ranHranHf:1ranHranH
229 fvco3 f:1ranHranHy1ranHFfy=Ffy
230 228 229 sylan φWA=mnfIsom<,<1ranHranHy1ranHFfy=Ffy
231 202 204 144 205 155 215 216 221 226 230 seqcoll2 φWA=mnfIsom<,<1ranHranHseqm+˙Fn=seq1+˙FfranH
232 140 200 231 3eqtr4d φWA=mnfIsom<,<1ranHranHseq1+˙FHM=seqm+˙Fn
233 232 expr φWA=mnfIsom<,<1ranHranHseq1+˙FHM=seqm+˙Fn
234 233 exlimdv φWA=mnffIsom<,<1ranHranHseq1+˙FHM=seqm+˙Fn
235 133 234 mpd φWA=mnseq1+˙FHM=seqm+˙Fn
236 109 235 eqtr4d φWA=mnGF=seq1+˙FHM
237 236 ex φWA=mnGF=seq1+˙FHM
238 237 rexlimdvw φWnA=mnGF=seq1+˙FHM
239 238 rexlimdvw φWmnA=mnGF=seq1+˙FHM
240 82 239 syl5bi φWAranGF=seq1+˙FHM
241 suppssdm FHsupp0˙domFH
242 12 241 eqsstri WdomFH
243 242 37 fssdm φW1M
244 fz1ssnn 1M
245 nnssre
246 244 245 sstri 1M
247 243 246 sstrdi φW
248 soss W<Or<OrW
249 247 120 248 mpisyl φ<OrW
250 ssfi 1MFinW1MWFin
251 123 243 250 sylancr φWFin
252 fz1iso <OrWWFinffIsom<,<1WW
253 249 251 252 syl2anc φffIsom<,<1WW
254 253 ad2antrr φW¬AranffIsom<,<1WW
255 1 2 3 4 5 6 7 8 9 10 11 12 gsumval3lem2 φW¬AranfIsom<,<1WWGF=seq1+˙FHfW
256 5 ad2antrr φW¬AranfIsom<,<1WWGMnd
257 256 201 sylan φW¬AranfIsom<,<1WWxB0˙+˙x=x
258 256 203 sylan φW¬AranfIsom<,<1WWxBx+˙0˙=x
259 256 143 sylan φW¬AranfIsom<,<1WWxByBx+˙yB
260 256 66 syl φW¬AranfIsom<,<1WW0˙B
261 simprr φW¬AranfIsom<,<1WWfIsom<,<1WW
262 simplr φW¬AranfIsom<,<1WWW
263 243 ad2antrr φW¬AranfIsom<,<1WWW1M
264 37 ad2antrr φW¬AranfIsom<,<1WWFH:1MB
265 264 ffvelrnda φW¬AranfIsom<,<1WWx1MFHxB
266 39 a1i φW¬AranfIsom<,<1WWFHsupp0˙W
267 ovexd φW¬AranfIsom<,<1WW1MV
268 42 a1i φW¬AranfIsom<,<1WW0˙V
269 264 266 267 268 suppssr φW¬AranfIsom<,<1WWx1MWFHx=0˙
270 coass FHf=FHf
271 270 fveq1i FHfy=FHfy
272 isof1o fIsom<,<1WWf:1W1-1 ontoW
273 f1of f:1W1-1 ontoWf:1WW
274 261 272 273 3syl φW¬AranfIsom<,<1WWf:1WW
275 fvco3 f:1WWy1WFHfy=FHfy
276 274 275 sylan φW¬AranfIsom<,<1WWy1WFHfy=FHfy
277 271 276 eqtr3id φW¬AranfIsom<,<1WWy1WFHfy=FHfy
278 257 258 259 260 261 262 263 265 269 277 seqcoll2 φW¬AranfIsom<,<1WWseq1+˙FHM=seq1+˙FHfW
279 255 278 eqtr4d φW¬AranfIsom<,<1WWGF=seq1+˙FHM
280 279 expr φW¬AranfIsom<,<1WWGF=seq1+˙FHM
281 280 exlimdv φW¬AranffIsom<,<1WWGF=seq1+˙FHM
282 254 281 mpd φW¬AranGF=seq1+˙FHM
283 282 ex φW¬AranGF=seq1+˙FHM
284 240 283 pm2.61d φWGF=seq1+˙FHM
285 78 284 pm2.61dane φGF=seq1+˙FHM