ILE Home Intuitionistic Logic Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >  gsumvalfi Unicode version

Theorem gsumvalfi 14152
Description: Value of the finite group sum over an unordered finite set. (Contributed by Jim Kingdon, 24-Mar-2026.)
Hypotheses
Ref Expression
gsumvalfi.b  |-  B  =  ( Base `  W
)
gsumvalfi.w  |-  ( ph  ->  W  e. CMnd )
gsumvalfi.f  |-  ( ph  ->  F : A --> B )
gsumvalfi.fi  |-  ( ph  ->  A  e.  Fin )
gsumvalfi.g  |-  ( ph  ->  G : ( 1 ... ( `  A
) ) -1-1-onto-> A )
Assertion
Ref Expression
gsumvalfi  |-  ( ph  ->  ( W  gsumg  F )  =  ( W  gzsumgz  ( F  o.  G
) ) )

Proof of Theorem gsumvalfi
Dummy variables  p  q  r  s  f  g  w  x  h  y are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 gsumvalfi.w . . 3  |-  ( ph  ->  W  e. CMnd )
2 gsumvalfi.f . . . 4  |-  ( ph  ->  F : A --> B )
3 gsumvalfi.fi . . . 4  |-  ( ph  ->  A  e.  Fin )
42, 3fexd 5948 . . 3  |-  ( ph  ->  F  e.  _V )
5 fngzsum 13708 . . . . . . 7  |-  gzsumgz 
Fn  ( _V  X.  _V )
61elexd 2835 . . . . . . 7  |-  ( ph  ->  W  e.  _V )
7 gsumvalfi.g . . . . . . . . . 10  |-  ( ph  ->  G : ( 1 ... ( `  A
) ) -1-1-onto-> A )
8 f1of 5639 . . . . . . . . . 10  |-  ( G : ( 1 ... ( `  A )
)
-1-1-onto-> A  ->  G : ( 1 ... ( `  A
) ) --> A )
97, 8syl 14 . . . . . . . . 9  |-  ( ph  ->  G : ( 1 ... ( `  A
) ) --> A )
10 1zzd 9671 . . . . . . . . . 10  |-  ( ph  ->  1  e.  ZZ )
11 hashcl 11220 . . . . . . . . . . . 12  |-  ( A  e.  Fin  ->  ( `  A )  e.  NN0 )
123, 11syl 14 . . . . . . . . . . 11  |-  ( ph  ->  ( `  A )  e.  NN0 )
1312nn0zd 9766 . . . . . . . . . 10  |-  ( ph  ->  ( `  A )  e.  ZZ )
1410, 13fzfigd 10868 . . . . . . . . 9  |-  ( ph  ->  ( 1 ... ( `  A ) )  e. 
Fin )
159, 14fexd 5948 . . . . . . . 8  |-  ( ph  ->  G  e.  _V )
16 coexg 5332 . . . . . . . 8  |-  ( ( F  e.  _V  /\  G  e.  _V )  ->  ( F  o.  G
)  e.  _V )
174, 15, 16syl2anc 415 . . . . . . 7  |-  ( ph  ->  ( F  o.  G
)  e.  _V )
18 fnovex 6118 . . . . . . 7  |-  ( ( 
gzsumgz  Fn  ( _V  X.  _V )  /\  W  e.  _V  /\  ( F  o.  G
)  e.  _V )  ->  ( W  gzsumgz  ( F  o.  G
) )  e.  _V )
195, 6, 17, 18mp3an2i 1383 . . . . . 6  |-  ( ph  ->  ( W  gzsumgz  ( F  o.  G
) )  e.  _V )
202fdmd 5540 . . . . . . . 8  |-  ( ph  ->  dom  F  =  A )
2120, 3eqeltrd 2315 . . . . . . 7  |-  ( ph  ->  dom  F  e.  Fin )
22 eqidd 2239 . . . . . . . . . . 11  |-  ( ph  ->  G  =  G )
2320fveq2d 5699 . . . . . . . . . . . 12  |-  ( ph  ->  ( `  dom  F )  =  ( `  A
) )
2423oveq2d 6101 . . . . . . . . . . 11  |-  ( ph  ->  ( 1 ... ( ` 
dom  F ) )  =  ( 1 ... ( `  A )
) )
2522, 24, 20f1oeq123d 5633 . . . . . . . . . 10  |-  ( ph  ->  ( G : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  <->  G :
( 1 ... ( `  A ) ) -1-1-onto-> A ) )
267, 25mpbird 167 . . . . . . . . 9  |-  ( ph  ->  G : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F )
27 eqidd 2239 . . . . . . . . 9  |-  ( ph  ->  ( W  gzsumgz  ( F  o.  G
) )  =  ( W  gzsumgz  ( F  o.  G
) ) )
2826, 27jca 306 . . . . . . . 8  |-  ( ph  ->  ( G : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  ( W  gzsumgz  ( F  o.  G
) )  =  ( W  gzsumgz  ( F  o.  G
) ) ) )
29 f1oeq1 5627 . . . . . . . . 9  |-  ( g  =  G  ->  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  <->  G :
( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F ) )
30 coeq2 4938 . . . . . . . . . . 11  |-  ( g  =  G  ->  ( F  o.  g )  =  ( F  o.  G ) )
3130oveq2d 6101 . . . . . . . . . 10  |-  ( g  =  G  ->  ( W  gzsumgz  ( F  o.  g
) )  =  ( W  gzsumgz  ( F  o.  G
) ) )
3231eqeq2d 2250 . . . . . . . . 9  |-  ( g  =  G  ->  (
( W  gzsumgz  ( F  o.  G
) )  =  ( W  gzsumgz  ( F  o.  g
) )  <->  ( W  gzsumgz  ( F  o.  G ) )  =  ( W 
gzsumgz  ( F  o.  G
) ) ) )
3329, 32anbi12d 477 . . . . . . . 8  |-  ( g  =  G  ->  (
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  ( W  gzsumgz  ( F  o.  G
) )  =  ( W  gzsumgz  ( F  o.  g
) ) )  <->  ( G : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  ( W  gzsumgz  ( F  o.  G
) )  =  ( W  gzsumgz  ( F  o.  G
) ) ) ) )
3415, 28, 33elabd 2971 . . . . . . 7  |-  ( ph  ->  E. g ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  ( W  gzsumgz  ( F  o.  G
) )  =  ( W  gzsumgz  ( F  o.  g
) ) ) )
3521, 34jca 306 . . . . . 6  |-  ( ph  ->  ( dom  F  e. 
Fin  /\  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  ( W  gzsumgz  ( F  o.  G
) )  =  ( W  gzsumgz  ( F  o.  g
) ) ) ) )
36 eqeq1 2245 . . . . . . . . 9  |-  ( x  =  ( W  gzsumgz  ( F  o.  G ) )  ->  ( x  =  ( W  gzsumgz  ( F  o.  g
) )  <->  ( W  gzsumgz  ( F  o.  G ) )  =  ( W 
gzsumgz  ( F  o.  g
) ) ) )
3736anbi2d 468 . . . . . . . 8  |-  ( x  =  ( W  gzsumgz  ( F  o.  G ) )  ->  ( ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) )  <->  ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  ( W  gzsumgz  ( F  o.  G ) )  =  ( W 
gzsumgz  ( F  o.  g
) ) ) ) )
3837exbidv 1878 . . . . . . 7  |-  ( x  =  ( W  gzsumgz  ( F  o.  G ) )  ->  ( E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) )  <->  E. g ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  ( W  gzsumgz  ( F  o.  G
) )  =  ( W  gzsumgz  ( F  o.  g
) ) ) ) )
3938anbi2d 468 . . . . . 6  |-  ( x  =  ( W  gzsumgz  ( F  o.  G ) )  ->  ( ( dom 
F  e.  Fin  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) ) )  <-> 
( dom  F  e.  Fin  /\  E. g ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  ( W  gzsumgz  ( F  o.  G
) )  =  ( W  gzsumgz  ( F  o.  g
) ) ) ) ) )
4019, 35, 39elabd 2971 . . . . 5  |-  ( ph  ->  E. x ( dom 
F  e.  Fin  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) ) ) )
41 anandi 598 . . . . . . . 8  |-  ( ( dom  F  e.  Fin  /\  ( E. g ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) )  /\  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  g ) ) ) ) )  <->  ( ( dom  F  e.  Fin  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) ) )  /\  ( dom  F  e.  Fin  /\  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  g ) ) ) ) ) )
42 f1oeq1 5627 . . . . . . . . . . . . 13  |-  ( g  =  h  ->  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  <->  h :
( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F ) )
43 coeq2 4938 . . . . . . . . . . . . . . 15  |-  ( g  =  h  ->  ( F  o.  g )  =  ( F  o.  h ) )
4443oveq2d 6101 . . . . . . . . . . . . . 14  |-  ( g  =  h  ->  ( W  gzsumgz  ( F  o.  g
) )  =  ( W  gzsumgz  ( F  o.  h
) ) )
4544eqeq2d 2250 . . . . . . . . . . . . 13  |-  ( g  =  h  ->  (
y  =  ( W 
gzsumgz  ( F  o.  g
) )  <->  y  =  ( W  gzsumgz  ( F  o.  h
) ) ) )
4642, 45anbi12d 477 . . . . . . . . . . . 12  |-  ( g  =  h  ->  (
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  g ) ) )  <->  ( h : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  y  =  ( W  gzsumgz  ( F  o.  h
) ) ) ) )
4746cbvexv 1974 . . . . . . . . . . 11  |-  ( E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  y  =  ( W  gzsumgz  ( F  o.  g
) ) )  <->  E. h
( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )
481ad2antrr 492 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  W  e. CMnd )
4948cmnmndd 14111 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  W  e.  Mnd )
5049ad2antrr 492 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  (
p  e.  B  /\  q  e.  B )
)  ->  W  e.  Mnd )
51 simprl 535 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  (
p  e.  B  /\  q  e.  B )
)  ->  p  e.  B )
52 simprr 537 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  (
p  e.  B  /\  q  e.  B )
)  ->  q  e.  B )
53 gsumvalfi.b . . . . . . . . . . . . . . . . . . . . . . . 24  |-  B  =  ( Base `  W
)
54 eqid 2238 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( +g  `  W )  =  ( +g  `  W )
5553, 54mndcl 13736 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( W  e.  Mnd  /\  p  e.  B  /\  q  e.  B )  ->  ( p ( +g  `  W ) q )  e.  B )
5650, 51, 52, 55syl3anc 1278 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  (
p  e.  B  /\  q  e.  B )
)  ->  ( p
( +g  `  W ) q )  e.  B
)
5748ad2antrr 492 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  (
p  e.  B  /\  q  e.  B )
)  ->  W  e. CMnd )
5853, 54cmncom 14105 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( W  e. CMnd  /\  p  e.  B  /\  q  e.  B )  ->  (
p ( +g  `  W
) q )  =  ( q ( +g  `  W ) p ) )
5957, 51, 52, 58syl3anc 1278 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  (
p  e.  B  /\  q  e.  B )
)  ->  ( p
( +g  `  W ) q )  =  ( q ( +g  `  W
) p ) )
6049ad2antrr 492 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  (
p  e.  B  /\  q  e.  B  /\  r  e.  B )
)  ->  W  e.  Mnd )
6153, 54mndass 13737 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( W  e.  Mnd  /\  ( p  e.  B  /\  q  e.  B  /\  r  e.  B
) )  ->  (
( p ( +g  `  W ) q ) ( +g  `  W
) r )  =  ( p ( +g  `  W ) ( q ( +g  `  W
) r ) ) )
6260, 61sylancom 424 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  (
p  e.  B  /\  q  e.  B  /\  r  e.  B )
)  ->  ( (
p ( +g  `  W
) q ) ( +g  `  W ) r )  =  ( p ( +g  `  W
) ( q ( +g  `  W ) r ) ) )
63 elnnuz 9959 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( `  dom  F )  e.  NN  <->  ( `  dom  F )  e.  ( ZZ>= `  1
) )
6463biimpi 120 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( `  dom  F )  e.  NN  ->  ( `  dom  F )  e.  ( ZZ>= ` 
1 ) )
6564adantl 277 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  ( ` 
dom  F )  e.  ( ZZ>= `  1 )
)
66 ssidd 3269 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  B  C_  B )
671ad3antrrr 496 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  W  e. CMnd )
68 plusgslid 13466 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( +g  = Slot  ( +g  `  ndx )  /\  ( +g  `  ndx )  e.  NN )
6968slotex 13379 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( W  e. CMnd  ->  ( +g  `  W
)  e.  _V )
7067, 69syl 14 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  ( +g  `  W )  e. 
_V )
71 simprl 535 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F )
7220ad2antrr 492 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  dom  F  =  A )
7372f1oeq3d 5636 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  <->  g :
( 1 ... ( ` 
dom  F ) ) -1-1-onto-> A ) )
7471, 73mpbid 147 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> A )
7574adantr 276 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> A )
76 f1ocnv 5652 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> A  ->  `' g : A -1-1-onto-> ( 1 ... ( ` 
dom  F ) ) )
7775, 76syl 14 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  `' g : A -1-1-onto-> ( 1 ... ( ` 
dom  F ) ) )
78 simplrl 541 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F )
7972f1oeq3d 5636 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  <->  h :
( 1 ... ( ` 
dom  F ) ) -1-1-onto-> A ) )
8078, 79mpbid 147 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> A )
8180adantr 276 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> A )
82 f1oco 5662 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( `' g : A -1-1-onto-> (
1 ... ( `  dom  F ) )  /\  h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> A )  ->  ( `' g  o.  h
) : ( 1 ... ( `  dom  F ) ) -1-1-onto-> ( 1 ... ( ` 
dom  F ) ) )
8377, 81, 82syl2anc 415 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  ( `' g  o.  h
) : ( 1 ... ( `  dom  F ) ) -1-1-onto-> ( 1 ... ( ` 
dom  F ) ) )
842ad4antr 498 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  p  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  F : A
--> B )
85 f1of 5639 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  ->  g : ( 1 ... ( `  dom  F ) ) --> dom  F )
8671, 85syl 14 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  g : ( 1 ... ( `  dom  F ) ) --> dom  F )
8772feq3d 5522 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  (
g : ( 1 ... ( `  dom  F ) ) --> dom  F  <->  g : ( 1 ... ( `  dom  F ) ) --> A ) )
8886, 87mpbid 147 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  g : ( 1 ... ( `  dom  F ) ) --> A )
8988ad2antrr 492 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  p  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  g :
( 1 ... ( ` 
dom  F ) ) --> A )
9084, 89fcod 5553 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  p  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  ( F  o.  g ) : ( 1 ... ( `  dom  F ) ) --> B )
91 simpr 110 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  p  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  p  e.  ( 1 ... ( ` 
dom  F ) ) )
9290, 91ffvelcdmd 5844 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  p  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  ( ( F  o.  g ) `  p )  e.  B
)
93 f1of 5639 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  ->  h : ( 1 ... ( `  dom  F ) ) --> dom  F )
9478, 93syl 14 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  h : ( 1 ... ( `  dom  F ) ) --> dom  F )
9572feq3d 5522 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  (
h : ( 1 ... ( `  dom  F ) ) --> dom  F  <->  h : ( 1 ... ( `  dom  F ) ) --> A ) )
9694, 95mpbid 147 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  h : ( 1 ... ( `  dom  F ) ) --> A )
9796ad2antrr 492 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  s  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  h :
( 1 ... ( ` 
dom  F ) ) --> A )
98 fvco3 5776 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( h : ( 1 ... ( `  dom  F ) ) --> A  /\  s  e.  ( 1 ... ( `  dom  F ) ) )  -> 
( ( `' g  o.  h ) `  s )  =  ( `' g `  (
h `  s )
) )
9997, 98sylancom 424 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  s  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  ( ( `' g  o.  h
) `  s )  =  ( `' g `
 ( h `  s ) ) )
10099fveq2d 5699 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  s  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  ( g `  ( ( `' g  o.  h ) `  s ) )  =  ( g `  ( `' g `  (
h `  s )
) ) )
10175adantr 276 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  s  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  g :
( 1 ... ( ` 
dom  F ) ) -1-1-onto-> A )
102 simpr 110 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  s  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  s  e.  ( 1 ... ( ` 
dom  F ) ) )
10397, 102ffvelcdmd 5844 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  s  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  ( h `  s )  e.  A
)
104 f1ocnvfv2 5984 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> A  /\  ( h `
 s )  e.  A )  ->  (
g `  ( `' g `  ( h `  s ) ) )  =  ( h `  s ) )
105101, 103, 104syl2anc 415 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  s  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  ( g `  ( `' g `  ( h `  s
) ) )  =  ( h `  s
) )
106100, 105eqtrd 2271 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  s  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  ( g `  ( ( `' g  o.  h ) `  s ) )  =  ( h `  s
) )
107106fveq2d 5699 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  s  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  ( F `  ( g `  (
( `' g  o.  h ) `  s
) ) )  =  ( F `  (
h `  s )
) )
10888ad2antrr 492 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  s  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  g :
( 1 ... ( ` 
dom  F ) ) --> A )
109 f1ocnv 5652 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  ->  `' g : dom  F -1-1-onto-> ( 1 ... ( `  dom  F ) ) )
110 f1of 5639 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( `' g : dom  F -1-1-onto-> (
1 ... ( `  dom  F ) )  ->  `' g : dom  F --> ( 1 ... ( `  dom  F ) ) )
11171, 109, 1103syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  `' g : dom  F --> ( 1 ... ( `  dom  F ) ) )
11272feq2d 5521 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  ( `' g : dom  F --> ( 1 ... ( ` 
dom  F ) )  <->  `' g : A --> ( 1 ... ( ` 
dom  F ) ) ) )
113111, 112mpbid 147 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  `' g : A --> ( 1 ... ( `  dom  F ) ) )
114113ad2antrr 492 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  s  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  `' g : A --> ( 1 ... ( `  dom  F ) ) )
115114, 103ffvelcdmd 5844 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  s  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  ( `' g `  ( h `  s ) )  e.  ( 1 ... ( ` 
dom  F ) ) )
11699, 115eqeltrd 2315 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  s  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  ( ( `' g  o.  h
) `  s )  e.  ( 1 ... ( ` 
dom  F ) ) )
117 fvco3 5776 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( g : ( 1 ... ( `  dom  F ) ) --> A  /\  ( ( `' g  o.  h ) `  s )  e.  ( 1 ... ( `  dom  F ) ) )  -> 
( ( F  o.  g ) `  (
( `' g  o.  h ) `  s
) )  =  ( F `  ( g `
 ( ( `' g  o.  h ) `
 s ) ) ) )
118108, 116, 117syl2anc 415 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  s  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  ( ( F  o.  g ) `  ( ( `' g  o.  h ) `  s ) )  =  ( F `  (
g `  ( ( `' g  o.  h
) `  s )
) ) )
119 fvco3 5776 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( h : ( 1 ... ( `  dom  F ) ) --> A  /\  s  e.  ( 1 ... ( `  dom  F ) ) )  -> 
( ( F  o.  h ) `  s
)  =  ( F `
 ( h `  s ) ) )
12097, 119sylancom 424 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  s  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  ( ( F  o.  h ) `  s )  =  ( F `  ( h `
 s ) ) )
121107, 118, 1203eqtr4rd 2282 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  /\  s  e.  ( 1 ... ( ` 
dom  F ) ) )  ->  ( ( F  o.  h ) `  s )  =  ( ( F  o.  g
) `  ( ( `' g  o.  h
) `  s )
) )
1224ad2antrr 492 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  F  e.  _V )
123 vex 2824 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  g  e. 
_V
124 coexg 5332 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( F  e.  _V  /\  g  e.  _V )  ->  ( F  o.  g
)  e.  _V )
125122, 123, 124sylancl 417 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  ( F  o.  g )  e.  _V )
126125adantr 276 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  ( F  o.  g )  e.  _V )
127 vex 2824 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  h  e. 
_V
128 coexg 5332 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( F  e.  _V  /\  h  e.  _V )  ->  ( F  o.  h
)  e.  _V )
129122, 127, 128sylancl 417 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  ( F  o.  h )  e.  _V )
130129adantr 276 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  ( F  o.  h )  e.  _V )
13156, 59, 62, 65, 66, 70, 83, 92, 121, 126, 130seqf1og 10958 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  (  seq 1 ( ( +g  `  W ) ,  ( F  o.  h ) ) `  ( `  dom  F ) )  =  (  seq 1 ( ( +g  `  W ) ,  ( F  o.  g ) ) `  ( `  dom  F ) ) )
1322ad3antrrr 496 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  F : A --> B )
13396adantr 276 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  h : ( 1 ... ( `  dom  F ) ) --> A )
134132, 133fcod 5553 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  ( F  o.  h ) : ( 1 ... ( `  dom  F ) ) --> B )
13553, 54, 67, 65, 134gzsumval2 13714 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  ( W  gzsumgz  ( F  o.  h
) )  =  (  seq 1 ( ( +g  `  W ) ,  ( F  o.  h ) ) `  ( `  dom  F ) ) )
136 simplrl 541 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F )
137136, 85syl 14 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  g : ( 1 ... ( `  dom  F ) ) --> dom  F )
138132fdmd 5540 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  dom  F  =  A )
139138feq3d 5522 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  (
g : ( 1 ... ( `  dom  F ) ) --> dom  F  <->  g : ( 1 ... ( `  dom  F ) ) --> A ) )
140137, 139mpbid 147 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  g : ( 1 ... ( `  dom  F ) ) --> A )
141132, 140fcod 5553 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  ( F  o.  g ) : ( 1 ... ( `  dom  F ) ) --> B )
14253, 54, 67, 65, 141gzsumval2 13714 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  ( W  gzsumgz  ( F  o.  g
) )  =  (  seq 1 ( ( +g  `  W ) ,  ( F  o.  g ) ) `  ( `  dom  F ) ) )
143131, 135, 1423eqtr4d 2281 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  ( W  gzsumgz  ( F  o.  h
) )  =  ( W  gzsumgz  ( F  o.  g
) ) )
144 simprr 537 . . . . . . . . . . . . . . . . . . . . 21  |-  ( (
ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  ->  y  =  ( W  gzsumgz  ( F  o.  h ) ) )
145144ad2antrr 492 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  y  =  ( W  gzsumgz  ( F  o.  h ) ) )
146 simplrr 542 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  x  =  ( W  gzsumgz  ( F  o.  g ) ) )
147143, 145, 1463eqtr4rd 2282 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  e.  NN )  ->  x  =  y )
148 simprl 535 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( (
ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  ->  h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F )
149148ad2antrr 492 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F )
150149, 93syl 14 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  h : ( 1 ... ( `  dom  F ) ) --> dom  F )
151 simpr 110 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  ( ` 
dom  F )  =  0 )
152 fihasheq0 11232 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 31  |-  ( dom 
F  e.  Fin  ->  ( ( `  dom  F )  =  0  <->  dom  F  =  (/) ) )
15321, 152syl 14 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30  |-  ( ph  ->  ( ( `  dom  F )  =  0  <->  dom  F  =  (/) ) )
154153ad3antrrr 496 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  (
( `  dom  F )  =  0  <->  dom  F  =  (/) ) )
155151, 154mpbid 147 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  dom  F  =  (/) )
156155feq3d 5522 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  (
h : ( 1 ... ( `  dom  F ) ) --> dom  F  <->  h : ( 1 ... ( `  dom  F ) ) --> (/) ) )
157150, 156mpbid 147 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  h : ( 1 ... ( `  dom  F ) ) --> (/) )
158 f00 5584 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( h : ( 1 ... ( `  dom  F ) ) --> (/)  <->  ( h  =  (/)  /\  ( 1 ... ( `  dom  F ) )  =  (/) ) )
159157, 158sylib 122 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  (
h  =  (/)  /\  (
1 ... ( `  dom  F ) )  =  (/) ) )
160159simpld 112 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  h  =  (/) )
161160coeq2d 4942 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  ( F  o.  h )  =  ( F  o.  (/) ) )
162 co02 5301 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( F  o.  (/) )  =  (/)
163161, 162eqtrdi 2287 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  ( F  o.  h )  =  (/) )
164163oveq2d 6101 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  ( W  gzsumgz  ( F  o.  h
) )  =  ( W  gzsumgz  (/) ) )
165 eqid 2238 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( 0g
`  W )  =  ( 0g `  W
)
166165gzsum0 13713 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( W  e. CMnd  ->  ( W  gzsumgz  (/) )  =  ( 0g `  W
) )
1671, 166syl 14 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ph  ->  ( W  gzsumgz  (/) )  =  ( 0g `  W ) )
168167ad3antrrr 496 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  ( W  gzsumgz  (/) )  =  ( 0g `  W ) )
169164, 168eqtrd 2271 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  ( W  gzsumgz  ( F  o.  h
) )  =  ( 0g `  W ) )
170144ad2antrr 492 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  y  =  ( W  gzsumgz  ( F  o.  h ) ) )
171 simplrr 542 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  x  =  ( W  gzsumgz  ( F  o.  g ) ) )
172 simplrl 541 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F )
173172, 85syl 14 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  g : ( 1 ... ( `  dom  F ) ) --> dom  F )
174155feq3d 5522 . . . . . . . . . . . . . . . . . . . . . . . . . . 27  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  (
g : ( 1 ... ( `  dom  F ) ) --> dom  F  <->  g : ( 1 ... ( `  dom  F ) ) --> (/) ) )
175173, 174mpbid 147 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  g : ( 1 ... ( `  dom  F ) ) --> (/) )
176 f00 5584 . . . . . . . . . . . . . . . . . . . . . . . . . 26  |-  ( g : ( 1 ... ( `  dom  F ) ) --> (/)  <->  ( g  =  (/)  /\  ( 1 ... ( `  dom  F ) )  =  (/) ) )
177175, 176sylib 122 . . . . . . . . . . . . . . . . . . . . . . . . 25  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  (
g  =  (/)  /\  (
1 ... ( `  dom  F ) )  =  (/) ) )
178177simpld 112 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  g  =  (/) )
179178coeq2d 4942 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  ( F  o.  g )  =  ( F  o.  (/) ) )
180179, 162eqtrdi 2287 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  ( F  o.  g )  =  (/) )
181180oveq2d 6101 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  ( W  gzsumgz  ( F  o.  g
) )  =  ( W  gzsumgz  (/) ) )
182171, 181, 1683eqtrd 2275 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  x  =  ( 0g `  W ) )
183169, 170, 1823eqtr4rd 2282 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( ` 
dom  F )  =  0 )  ->  x  =  y )
18423, 12eqeltrd 2315 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ph  ->  ( `  dom  F )  e.  NN0 )
185 elnn0 9565 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( `  dom  F )  e. 
NN0 
<->  ( ( `  dom  F )  e.  NN  \/  ( `  dom  F )  =  0 ) )
186184, 185sylib 122 . . . . . . . . . . . . . . . . . . . 20  |-  ( ph  ->  ( ( `  dom  F )  e.  NN  \/  ( `  dom  F )  =  0 ) )
187186ad2antrr 492 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  (
( `  dom  F )  e.  NN  \/  ( ` 
dom  F )  =  0 ) )
188147, 183, 187mpjaodan 810 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  /\  (
g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  x  =  y )
189188ex 115 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  ->  (
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) )  ->  x  =  y ) )
190189exlimdv 1872 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) ) )  ->  ( E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) )  ->  x  =  y )
)
191190ex 115 . . . . . . . . . . . . . . 15  |-  ( ph  ->  ( ( h : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  y  =  ( W  gzsumgz  ( F  o.  h
) ) )  -> 
( E. g ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) )  ->  x  =  y ) ) )
192191com23 78 . . . . . . . . . . . . . 14  |-  ( ph  ->  ( E. g ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) )  ->  ( (
h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) )  ->  x  =  y ) ) )
193192adantr 276 . . . . . . . . . . . . 13  |-  ( (
ph  /\  dom  F  e. 
Fin )  ->  ( E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) )  -> 
( ( h : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  y  =  ( W  gzsumgz  ( F  o.  h
) ) )  ->  x  =  y )
) )
194193imp 124 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  dom  F  e.  Fin )  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) ) )  ->  ( ( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) )  ->  x  =  y ) )
195194exlimdv 1872 . . . . . . . . . . 11  |-  ( ( ( ph  /\  dom  F  e.  Fin )  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) ) )  ->  ( E. h
( h : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  h ) ) )  ->  x  =  y ) )
19647, 195biimtrid 152 . . . . . . . . . 10  |-  ( ( ( ph  /\  dom  F  e.  Fin )  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) ) )  ->  ( E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  g ) ) )  ->  x  =  y ) )
197196impr 379 . . . . . . . . 9  |-  ( ( ( ph  /\  dom  F  e.  Fin )  /\  ( E. g ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) )  /\  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  g ) ) ) ) )  ->  x  =  y )
198197anasss 403 . . . . . . . 8  |-  ( (
ph  /\  ( dom  F  e.  Fin  /\  ( E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) )  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  y  =  ( W  gzsumgz  ( F  o.  g
) ) ) ) ) )  ->  x  =  y )
19941, 198sylan2br 288 . . . . . . 7  |-  ( (
ph  /\  ( ( dom  F  e.  Fin  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) ) )  /\  ( dom  F  e.  Fin  /\  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  g ) ) ) ) ) )  ->  x  =  y )
200199ex 115 . . . . . 6  |-  ( ph  ->  ( ( ( dom 
F  e.  Fin  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) ) )  /\  ( dom  F  e.  Fin  /\  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  g ) ) ) ) )  ->  x  =  y )
)
201200alrimivv 1928 . . . . 5  |-  ( ph  ->  A. x A. y
( ( ( dom 
F  e.  Fin  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) ) )  /\  ( dom  F  e.  Fin  /\  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  g ) ) ) ) )  ->  x  =  y )
)
202 eqeq1 2245 . . . . . . . . 9  |-  ( x  =  y  ->  (
x  =  ( W 
gzsumgz  ( F  o.  g
) )  <->  y  =  ( W  gzsumgz  ( F  o.  g
) ) ) )
203202anbi2d 468 . . . . . . . 8  |-  ( x  =  y  ->  (
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) )  <->  ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  y  =  ( W  gzsumgz  ( F  o.  g
) ) ) ) )
204203exbidv 1878 . . . . . . 7  |-  ( x  =  y  ->  ( E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) )  <->  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  y  =  ( W  gzsumgz  ( F  o.  g ) ) ) ) )
205204anbi2d 468 . . . . . 6  |-  ( x  =  y  ->  (
( dom  F  e.  Fin  /\  E. g ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  <->  ( dom  F  e.  Fin  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  y  =  ( W  gzsumgz  ( F  o.  g
) ) ) ) ) )
206205eu4 2149 . . . . 5  |-  ( E! x ( dom  F  e.  Fin  /\  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  <->  ( E. x ( dom  F  e.  Fin  /\  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  A. x A. y ( ( ( dom  F  e. 
Fin  /\  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  /\  ( dom  F  e.  Fin  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  y  =  ( W  gzsumgz  ( F  o.  g
) ) ) ) )  ->  x  =  y ) ) )
20740, 201, 206sylanbrc 421 . . . 4  |-  ( ph  ->  E! x ( dom 
F  e.  Fin  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) ) ) )
208 euiotaex 5354 . . . 4  |-  ( E! x ( dom  F  e.  Fin  /\  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) )  ->  ( iota x ( dom  F  e.  Fin  /\  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) ) )  e. 
_V )
209207, 208syl 14 . . 3  |-  ( ph  ->  ( iota x ( dom  F  e.  Fin  /\ 
E. g ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) ) )  e. 
_V )
210 oveq1 6092 . . . . . . . . 9  |-  ( w  =  W  ->  (
w  gzsumgz  ( f  o.  g
) )  =  ( W  gzsumgz  ( f  o.  g
) ) )
211210eqeq2d 2250 . . . . . . . 8  |-  ( w  =  W  ->  (
x  =  ( w 
gzsumgz  ( f  o.  g
) )  <->  x  =  ( W  gzsumgz  ( f  o.  g
) ) ) )
212211anbi2d 468 . . . . . . 7  |-  ( w  =  W  ->  (
( g : ( 1 ... ( `  dom  f ) ) -1-1-onto-> dom  f  /\  x  =  (
w  gzsumgz  ( f  o.  g
) ) )  <->  ( g : ( 1 ... ( `  dom  f ) ) -1-1-onto-> dom  f  /\  x  =  ( W  gzsumgz  ( f  o.  g ) ) ) ) )
213212exbidv 1878 . . . . . 6  |-  ( w  =  W  ->  ( E. g ( g : ( 1 ... ( ` 
dom  f ) ) -1-1-onto-> dom  f  /\  x  =  ( w  gzsumgz  ( f  o.  g
) ) )  <->  E. g
( g : ( 1 ... ( `  dom  f ) ) -1-1-onto-> dom  f  /\  x  =  ( W  gzsumgz  ( f  o.  g
) ) ) ) )
214213anbi2d 468 . . . . 5  |-  ( w  =  W  ->  (
( dom  f  e.  Fin  /\  E. g ( g : ( 1 ... ( `  dom  f ) ) -1-1-onto-> dom  f  /\  x  =  (
w  gzsumgz  ( f  o.  g
) ) ) )  <-> 
( dom  f  e.  Fin  /\  E. g ( g : ( 1 ... ( `  dom  f ) ) -1-1-onto-> dom  f  /\  x  =  ( W  gzsumgz  ( f  o.  g
) ) ) ) ) )
215214iotabidv 5360 . . . 4  |-  ( w  =  W  ->  ( iota x ( dom  f  e.  Fin  /\  E. g
( g : ( 1 ... ( `  dom  f ) ) -1-1-onto-> dom  f  /\  x  =  (
w  gzsumgz  ( f  o.  g
) ) ) ) )  =  ( iota
x ( dom  f  e.  Fin  /\  E. g
( g : ( 1 ... ( `  dom  f ) ) -1-1-onto-> dom  f  /\  x  =  ( W  gzsumgz  ( f  o.  g
) ) ) ) ) )
216 dmeq 4981 . . . . . . 7  |-  ( f  =  F  ->  dom  f  =  dom  F )
217216eleq1d 2307 . . . . . 6  |-  ( f  =  F  ->  ( dom  f  e.  Fin  <->  dom  F  e.  Fin ) )
218 eqidd 2239 . . . . . . . . 9  |-  ( f  =  F  ->  g  =  g )
219216fveq2d 5699 . . . . . . . . . 10  |-  ( f  =  F  ->  ( ` 
dom  f )  =  ( `  dom  F ) )
220219oveq2d 6101 . . . . . . . . 9  |-  ( f  =  F  ->  (
1 ... ( `  dom  f ) )  =  ( 1 ... ( ` 
dom  F ) ) )
221218, 220, 216f1oeq123d 5633 . . . . . . . 8  |-  ( f  =  F  ->  (
g : ( 1 ... ( `  dom  f ) ) -1-1-onto-> dom  f  <->  g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F ) )
222 coeq1 4937 . . . . . . . . . 10  |-  ( f  =  F  ->  (
f  o.  g )  =  ( F  o.  g ) )
223222oveq2d 6101 . . . . . . . . 9  |-  ( f  =  F  ->  ( W  gzsumgz  ( f  o.  g
) )  =  ( W  gzsumgz  ( F  o.  g
) ) )
224223eqeq2d 2250 . . . . . . . 8  |-  ( f  =  F  ->  (
x  =  ( W 
gzsumgz  ( f  o.  g
) )  <->  x  =  ( W  gzsumgz  ( F  o.  g
) ) ) )
225221, 224anbi12d 477 . . . . . . 7  |-  ( f  =  F  ->  (
( g : ( 1 ... ( `  dom  f ) ) -1-1-onto-> dom  f  /\  x  =  ( W  gzsumgz  ( f  o.  g
) ) )  <->  ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) ) )
226225exbidv 1878 . . . . . 6  |-  ( f  =  F  ->  ( E. g ( g : ( 1 ... ( ` 
dom  f ) ) -1-1-onto-> dom  f  /\  x  =  ( W  gzsumgz  ( f  o.  g
) ) )  <->  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) ) )
227217, 226anbi12d 477 . . . . 5  |-  ( f  =  F  ->  (
( dom  f  e.  Fin  /\  E. g ( g : ( 1 ... ( `  dom  f ) ) -1-1-onto-> dom  f  /\  x  =  ( W  gzsumgz  ( f  o.  g
) ) ) )  <-> 
( dom  F  e.  Fin  /\  E. g ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) ) ) )
228227iotabidv 5360 . . . 4  |-  ( f  =  F  ->  ( iota x ( dom  f  e.  Fin  /\  E. g
( g : ( 1 ... ( `  dom  f ) ) -1-1-onto-> dom  f  /\  x  =  ( W  gzsumgz  ( f  o.  g
) ) ) ) )  =  ( iota
x ( dom  F  e.  Fin  /\  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) ) ) )
229 df-gsumfi 14151 . . . 4  |-  gsumg  =  ( w  e. CMnd ,  f  e.  _V  |->  ( iota x ( dom  f  e.  Fin  /\  E. g ( g : ( 1 ... ( ` 
dom  f ) ) -1-1-onto-> dom  f  /\  x  =  ( w  gzsumgz  ( f  o.  g
) ) ) ) ) )
230215, 228, 229ovmpog 6223 . . 3  |-  ( ( W  e. CMnd  /\  F  e.  _V  /\  ( iota
x ( dom  F  e.  Fin  /\  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) ) )  e. 
_V )  ->  ( W  gsumg  F )  =  ( iota x ( dom 
F  e.  Fin  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) ) ) ) )
2311, 4, 209, 230syl3anc 1278 . 2  |-  ( ph  ->  ( W  gsumg  F )  =  ( iota x ( dom 
F  e.  Fin  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) ) ) ) )
23239iota2 5367 . . . 4  |-  ( ( ( W  gzsumgz  ( F  o.  G
) )  e.  _V  /\  E! x ( dom 
F  e.  Fin  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) ) ) )  ->  ( ( dom  F  e.  Fin  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  ( W  gzsumgz  ( F  o.  G ) )  =  ( W 
gzsumgz  ( F  o.  g
) ) ) )  <-> 
( iota x ( dom 
F  e.  Fin  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) ) ) )  =  ( W 
gzsumgz  ( F  o.  G
) ) ) )
23319, 207, 232syl2anc 415 . . 3  |-  ( ph  ->  ( ( dom  F  e.  Fin  /\  E. g
( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  ( W  gzsumgz  ( F  o.  G
) )  =  ( W  gzsumgz  ( F  o.  g
) ) ) )  <-> 
( iota x ( dom 
F  e.  Fin  /\  E. g ( g : ( 1 ... ( ` 
dom  F ) ) -1-1-onto-> dom 
F  /\  x  =  ( W  gzsumgz  ( F  o.  g
) ) ) ) )  =  ( W 
gzsumgz  ( F  o.  G
) ) ) )
23435, 233mpbid 147 . 2  |-  ( ph  ->  ( iota x ( dom  F  e.  Fin  /\ 
E. g ( g : ( 1 ... ( `  dom  F ) ) -1-1-onto-> dom  F  /\  x  =  ( W  gzsumgz  ( F  o.  g ) ) ) ) )  =  ( W  gzsumgz  ( F  o.  G
) ) )
235231, 234eqtrd 2271 1  |-  ( ph  ->  ( W  gsumg  F )  =  ( W  gzsumgz  ( F  o.  G
) ) )
Colors of variables:    wff set class
This proof depends on syntax axioms:    -> wi 4    /\ wa 104    <-> wb 105    \/ wo 720    /\ w3a 1009   A.wal 1400    = wceq 1402   E.wex 1545   E!weu 2086    e. wcel 2209   _Vcvv 2821   (/)c0 3520    X. cxp 4772   `'ccnv 4773   dom cdm 4774    o. ccom 4778   iotacio 5335    Fn wfn 5372   -->wf 5373   -1-1-onto->wf1o 5376   ` cfv 5377  (class class class)co 6085   Fincfn 7022   0cc0 8179   1c1 8180   NNcn 9304   NN0cn0 9563   ZZ>=cuz 9921   ...cfz 10411    seqcseq 10884  ♯chash 11214   Basecbs 13352   +g cplusg 13431   0gc0g 13610    gzsumgz cgzsu 13611   Mndcmnd 13729  CMndccmn 14087    gsumg cgsu 14150
This proof depends on axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 623  ax-in2 624  ax-io 721  ax-5 1500  ax-7 1501  ax-gen 1502  ax-ie1 1546  ax-ie2 1547  ax-8 1557  ax-10 1558  ax-11 1559  ax-i12 1560  ax-bndl 1562  ax-4 1563  ax-17 1579  ax-i9 1583  ax-ial 1587  ax-i5r 1588  ax-14 2212  ax-ext 2220  ax-coll 4246  ax-sep 4249  ax-nul 4259  ax-pow 4311  ax-pr 4346  ax-un 4578  ax-setind 4684  ax-iinf 4735  ax-cnex 8270  ax-resscn 8271  ax-1cn 8272  ax-1re 8273  ax-icn 8274  ax-addcl 8275  ax-addrcl 8276  ax-mulcl 8277  ax-mulrcl 8278  ax-addcom 8279  ax-mulcom 8280  ax-addass 8281  ax-mulass 8282  ax-distr 8283  ax-i2m1 8284  ax-0lt1 8285  ax-1rid 8286  ax-0id 8287  ax-rnegex 8288  ax-precex 8289  ax-cnre 8290  ax-pre-ltirr 8291  ax-pre-ltwlin 8292  ax-pre-lttrn 8293  ax-pre-apti 8294  ax-pre-ltadd 8295  ax-pre-mulgt0 8296
This proof depends on definitions:  df-bi 117  df-stab 843  df-dc 847  df-3or 1010  df-3an 1011  df-tru 1405  df-fal 1408  df-nf 1514  df-sb 1816  df-eu 2089  df-mo 2090  df-clab 2225  df-cleq 2231  df-clel 2234  df-nfc 2381  df-ne 2421  df-nel 2516  df-ral 2533  df-rex 2534  df-reu 2535  df-rab 2537  df-v 2823  df-sbc 3052  df-csb 3148  df-dif 3222  df-un 3224  df-in 3226  df-ss 3233  df-nul 3521  df-if 3639  df-pw 3690  df-sn 3715  df-pr 3716  df-op 3718  df-uni 3936  df-int 3971  df-iun 4014  df-br 4131  df-opab 4193  df-mpt 4194  df-tr 4230  df-id 4438  df-iord 4511  df-on 4513  df-ilim 4514  df-suc 4516  df-iom 4738  df-xp 4780  df-rel 4781  df-cnv 4782  df-co 4783  df-dm 4784  df-rn 4785  df-res 4786  df-ima 4787  df-iota 5337  df-fun 5379  df-fn 5380  df-f 5381  df-f1 5382  df-fo 5383  df-f1o 5384  df-fv 5385  df-riota 6038  df-ov 6088  df-oprab 6089  df-mpo 6090  df-1st 6374  df-2nd 6375  df-recs 6576  df-frec 6662  df-1o 6687  df-er 6807  df-en 7023  df-dom 7024  df-fin 7025  df-pnf 8362  df-mnf 8363  df-xr 8364  df-ltxr 8365  df-le 8366  df-sub 8499  df-neg 8500  df-reap 8903  df-ap 8910  df-inn 9305  df-2 9363  df-n0 9564  df-z 9645  df-uz 9922  df-fz 10412  df-fzo 10550  df-seqfrec 10885  df-ihash 11215  df-ndx 13355  df-slot 13356  df-base 13358  df-plusg 13444  df-0g 13612  df-gzsum 13613  df-mgm 13676  df-sgrp 13717  df-mnd 13730  df-cmn 14089  df-gsumfi 14151
This theorem is used by:  gzsumgsum1  14153  gzsumgsum  14155  gsumsncmn  14156  gsump1  14157  gsumf1ofi  14160  gsummhmfi  14164  gsumressfi  14167
  Copyright terms: Public domain W3C validator