MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  frgpup3lem Unicode version

Theorem frgpup3lem 15364
Description: The evaluation map has the intended behavior on the generators. (Contributed by Mario Carneiro, 2-Oct-2015.) (Revised by Mario Carneiro, 28-Feb-2016.)
Hypotheses
Ref Expression
frgpup.b  |-  B  =  ( Base `  H
)
frgpup.n  |-  N  =  ( inv g `  H )
frgpup.t  |-  T  =  ( y  e.  I ,  z  e.  2o  |->  if ( z  =  (/) ,  ( F `  y
) ,  ( N `
 ( F `  y ) ) ) )
frgpup.h  |-  ( ph  ->  H  e.  Grp )
frgpup.i  |-  ( ph  ->  I  e.  V )
frgpup.a  |-  ( ph  ->  F : I --> B )
frgpup.w  |-  W  =  (  _I  ` Word  ( I  X.  2o ) )
frgpup.r  |-  .~  =  ( ~FG  `  I )
frgpup.g  |-  G  =  (freeGrp `  I )
frgpup.x  |-  X  =  ( Base `  G
)
frgpup.e  |-  E  =  ran  ( g  e.  W  |->  <. [ g ]  .~  ,  ( H 
gsumg  ( T  o.  g
) ) >. )
frgpup.u  |-  U  =  (varFGrp `  I )
frgpup3.k  |-  ( ph  ->  K  e.  ( G 
GrpHom  H ) )
frgpup3.e  |-  ( ph  ->  ( K  o.  U
)  =  F )
Assertion
Ref Expression
frgpup3lem  |-  ( ph  ->  K  =  E )
Distinct variable groups:    y, g,
z    g, H    y, F, z    y, N, z    B, g, y, z    T, g    .~ , g    ph, g, y, z    y, I, z   
g, W
Allowed substitution hints:    .~ ( y, z)    T( y, z)    U( y, z, g)    E( y, z, g)    F( g)    G( y, z, g)    H( y, z)    I( g)    K( y, z, g)    N( g)    V( y, z, g)    W( y, z)    X( y, z, g)

Proof of Theorem frgpup3lem
Dummy variables  a 
t  n  i  j  w are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 frgpup3.k . . 3  |-  ( ph  ->  K  e.  ( G 
GrpHom  H ) )
2 frgpup.x . . . 4  |-  X  =  ( Base `  G
)
3 frgpup.b . . . 4  |-  B  =  ( Base `  H
)
42, 3ghmf 14965 . . 3  |-  ( K  e.  ( G  GrpHom  H )  ->  K : X
--> B )
5 ffn 5550 . . 3  |-  ( K : X --> B  ->  K  Fn  X )
61, 4, 53syl 19 . 2  |-  ( ph  ->  K  Fn  X )
7 frgpup.n . . . 4  |-  N  =  ( inv g `  H )
8 frgpup.t . . . 4  |-  T  =  ( y  e.  I ,  z  e.  2o  |->  if ( z  =  (/) ,  ( F `  y
) ,  ( N `
 ( F `  y ) ) ) )
9 frgpup.h . . . 4  |-  ( ph  ->  H  e.  Grp )
10 frgpup.i . . . 4  |-  ( ph  ->  I  e.  V )
11 frgpup.a . . . 4  |-  ( ph  ->  F : I --> B )
12 frgpup.w . . . 4  |-  W  =  (  _I  ` Word  ( I  X.  2o ) )
13 frgpup.r . . . 4  |-  .~  =  ( ~FG  `  I )
14 frgpup.g . . . 4  |-  G  =  (freeGrp `  I )
15 frgpup.e . . . 4  |-  E  =  ran  ( g  e.  W  |->  <. [ g ]  .~  ,  ( H 
gsumg  ( T  o.  g
) ) >. )
163, 7, 8, 9, 10, 11, 12, 13, 14, 2, 15frgpup1 15362 . . 3  |-  ( ph  ->  E  e.  ( G 
GrpHom  H ) )
172, 3ghmf 14965 . . 3  |-  ( E  e.  ( G  GrpHom  H )  ->  E : X
--> B )
18 ffn 5550 . . 3  |-  ( E : X --> B  ->  E  Fn  X )
1916, 17, 183syl 19 . 2  |-  ( ph  ->  E  Fn  X )
20 eqid 2404 . . . . . . . . 9  |-  (freeMnd `  (
I  X.  2o ) )  =  (freeMnd `  (
I  X.  2o ) )
2114, 20, 13frgpval 15345 . . . . . . . 8  |-  ( I  e.  V  ->  G  =  ( (freeMnd `  (
I  X.  2o ) )  /.s 
.~  ) )
2210, 21syl 16 . . . . . . 7  |-  ( ph  ->  G  =  ( (freeMnd `  ( I  X.  2o ) )  /.s  .~  )
)
23 2on 6691 . . . . . . . . . . 11  |-  2o  e.  On
24 xpexg 4948 . . . . . . . . . . 11  |-  ( ( I  e.  V  /\  2o  e.  On )  -> 
( I  X.  2o )  e.  _V )
2510, 23, 24sylancl 644 . . . . . . . . . 10  |-  ( ph  ->  ( I  X.  2o )  e.  _V )
26 wrdexg 11694 . . . . . . . . . 10  |-  ( ( I  X.  2o )  e.  _V  -> Word  ( I  X.  2o )  e. 
_V )
27 fvi 5742 . . . . . . . . . 10  |-  (Word  (
I  X.  2o )  e.  _V  ->  (  _I  ` Word  ( I  X.  2o ) )  = Word  (
I  X.  2o ) )
2825, 26, 273syl 19 . . . . . . . . 9  |-  ( ph  ->  (  _I  ` Word  ( I  X.  2o ) )  = Word  ( I  X.  2o ) )
2912, 28syl5eq 2448 . . . . . . . 8  |-  ( ph  ->  W  = Word  ( I  X.  2o ) )
30 eqid 2404 . . . . . . . . . 10  |-  ( Base `  (freeMnd `  ( I  X.  2o ) ) )  =  ( Base `  (freeMnd `  ( I  X.  2o ) ) )
3120, 30frmdbas 14752 . . . . . . . . 9  |-  ( ( I  X.  2o )  e.  _V  ->  ( Base `  (freeMnd `  (
I  X.  2o ) ) )  = Word  (
I  X.  2o ) )
3225, 31syl 16 . . . . . . . 8  |-  ( ph  ->  ( Base `  (freeMnd `  ( I  X.  2o ) ) )  = Word  ( I  X.  2o ) )
3329, 32eqtr4d 2439 . . . . . . 7  |-  ( ph  ->  W  =  ( Base `  (freeMnd `  ( I  X.  2o ) ) ) )
34 fvex 5701 . . . . . . . . 9  |-  ( ~FG  `  I
)  e.  _V
3513, 34eqeltri 2474 . . . . . . . 8  |-  .~  e.  _V
3635a1i 11 . . . . . . 7  |-  ( ph  ->  .~  e.  _V )
37 fvex 5701 . . . . . . . 8  |-  (freeMnd `  (
I  X.  2o ) )  e.  _V
3837a1i 11 . . . . . . 7  |-  ( ph  ->  (freeMnd `  ( I  X.  2o ) )  e. 
_V )
3922, 33, 36, 38divsbas 13725 . . . . . 6  |-  ( ph  ->  ( W /.  .~  )  =  ( Base `  G ) )
4039, 2syl6reqr 2455 . . . . 5  |-  ( ph  ->  X  =  ( W /.  .~  ) )
41 eqimss 3360 . . . . 5  |-  ( X  =  ( W /.  .~  )  ->  X  C_  ( W /.  .~  ) )
4240, 41syl 16 . . . 4  |-  ( ph  ->  X  C_  ( W /.  .~  ) )
4342sselda 3308 . . 3  |-  ( (
ph  /\  a  e.  X )  ->  a  e.  ( W /.  .~  ) )
44 eqid 2404 . . . 4  |-  ( W /.  .~  )  =  ( W /.  .~  )
45 fveq2 5687 . . . . 5  |-  ( [ t ]  .~  =  a  ->  ( K `  [ t ]  .~  )  =  ( K `  a ) )
46 fveq2 5687 . . . . 5  |-  ( [ t ]  .~  =  a  ->  ( E `  [ t ]  .~  )  =  ( E `  a ) )
4745, 46eqeq12d 2418 . . . 4  |-  ( [ t ]  .~  =  a  ->  ( ( K `
 [ t ]  .~  )  =  ( E `  [ t ]  .~  )  <->  ( K `  a )  =  ( E `  a ) ) )
48 simpr 448 . . . . . . . . . . . . . 14  |-  ( (
ph  /\  t  e.  W )  ->  t  e.  W )
4929adantr 452 . . . . . . . . . . . . . 14  |-  ( (
ph  /\  t  e.  W )  ->  W  = Word  ( I  X.  2o ) )
5048, 49eleqtrd 2480 . . . . . . . . . . . . 13  |-  ( (
ph  /\  t  e.  W )  ->  t  e. Word  ( I  X.  2o ) )
51 wrdf 11688 . . . . . . . . . . . . 13  |-  ( t  e. Word  ( I  X.  2o )  ->  t : ( 0..^ ( # `  t ) ) --> ( I  X.  2o ) )
5250, 51syl 16 . . . . . . . . . . . 12  |-  ( (
ph  /\  t  e.  W )  ->  t : ( 0..^ (
# `  t )
) --> ( I  X.  2o ) )
5352ffvelrnda 5829 . . . . . . . . . . 11  |-  ( ( ( ph  /\  t  e.  W )  /\  n  e.  ( 0..^ ( # `  t ) ) )  ->  ( t `  n )  e.  ( I  X.  2o ) )
54 elxp2 4855 . . . . . . . . . . 11  |-  ( ( t `  n )  e.  ( I  X.  2o )  <->  E. i  e.  I  E. j  e.  2o  ( t `  n
)  =  <. i ,  j >. )
5553, 54sylib 189 . . . . . . . . . 10  |-  ( ( ( ph  /\  t  e.  W )  /\  n  e.  ( 0..^ ( # `  t ) ) )  ->  E. i  e.  I  E. j  e.  2o  ( t `  n
)  =  <. i ,  j >. )
56 fveq2 5687 . . . . . . . . . . . . . . . . 17  |-  ( y  =  i  ->  ( F `  y )  =  ( F `  i ) )
5756fveq2d 5691 . . . . . . . . . . . . . . . . 17  |-  ( y  =  i  ->  ( N `  ( F `  y ) )  =  ( N `  ( F `  i )
) )
5856, 57ifeq12d 3715 . . . . . . . . . . . . . . . 16  |-  ( y  =  i  ->  if ( z  =  (/) ,  ( F `  y
) ,  ( N `
 ( F `  y ) ) )  =  if ( z  =  (/) ,  ( F `
 i ) ,  ( N `  ( F `  i )
) ) )
59 eqeq1 2410 . . . . . . . . . . . . . . . . 17  |-  ( z  =  j  ->  (
z  =  (/)  <->  j  =  (/) ) )
6059ifbid 3717 . . . . . . . . . . . . . . . 16  |-  ( z  =  j  ->  if ( z  =  (/) ,  ( F `  i
) ,  ( N `
 ( F `  i ) ) )  =  if ( j  =  (/) ,  ( F `
 i ) ,  ( N `  ( F `  i )
) ) )
61 fvex 5701 . . . . . . . . . . . . . . . . 17  |-  ( F `
 i )  e. 
_V
62 fvex 5701 . . . . . . . . . . . . . . . . 17  |-  ( N `
 ( F `  i ) )  e. 
_V
6361, 62ifex 3757 . . . . . . . . . . . . . . . 16  |-  if ( j  =  (/) ,  ( F `  i ) ,  ( N `  ( F `  i ) ) )  e.  _V
6458, 60, 8, 63ovmpt2 6168 . . . . . . . . . . . . . . 15  |-  ( ( i  e.  I  /\  j  e.  2o )  ->  ( i T j )  =  if ( j  =  (/) ,  ( F `  i ) ,  ( N `  ( F `  i ) ) ) )
6564adantl 453 . . . . . . . . . . . . . 14  |-  ( (
ph  /\  ( i  e.  I  /\  j  e.  2o ) )  -> 
( i T j )  =  if ( j  =  (/) ,  ( F `  i ) ,  ( N `  ( F `  i ) ) ) )
66 elpri 3794 . . . . . . . . . . . . . . . . 17  |-  ( j  e.  { (/) ,  1o }  ->  ( j  =  (/)  \/  j  =  1o ) )
67 df2o3 6696 . . . . . . . . . . . . . . . . 17  |-  2o  =  { (/) ,  1o }
6866, 67eleq2s 2496 . . . . . . . . . . . . . . . 16  |-  ( j  e.  2o  ->  (
j  =  (/)  \/  j  =  1o ) )
69 frgpup3.e . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ph  ->  ( K  o.  U
)  =  F )
7069adantr 452 . . . . . . . . . . . . . . . . . . . . 21  |-  ( (
ph  /\  i  e.  I )  ->  ( K  o.  U )  =  F )
7170fveq1d 5689 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  i  e.  I )  ->  (
( K  o.  U
) `  i )  =  ( F `  i ) )
72 frgpup.u . . . . . . . . . . . . . . . . . . . . . . 23  |-  U  =  (varFGrp `  I )
7313, 72, 14, 2vrgpf 15355 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( I  e.  V  ->  U : I --> X )
7410, 73syl 16 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ph  ->  U : I --> X )
75 fvco3 5759 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( U : I --> X  /\  i  e.  I )  ->  ( ( K  o.  U ) `  i
)  =  ( K `
 ( U `  i ) ) )
7674, 75sylan 458 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  i  e.  I )  ->  (
( K  o.  U
) `  i )  =  ( K `  ( U `  i ) ) )
7771, 76eqtr3d 2438 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  i  e.  I )  ->  ( F `  i )  =  ( K `  ( U `  i ) ) )
7877adantr 452 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  (/) )  ->  ( F `  i )  =  ( K `  ( U `  i ) ) )
79 iftrue 3705 . . . . . . . . . . . . . . . . . . 19  |-  ( j  =  (/)  ->  if ( j  =  (/) ,  ( F `  i ) ,  ( N `  ( F `  i ) ) )  =  ( F `  i ) )
8079adantl 453 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  (/) )  ->  if ( j  =  (/) ,  ( F `  i
) ,  ( N `
 ( F `  i ) ) )  =  ( F `  i ) )
81 simpr 448 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  (/) )  ->  j  =  (/) )
8281opeq2d 3951 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  (/) )  ->  <. i ,  j >.  =  <. i ,  (/) >. )
8382s1eqd 11709 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  (/) )  ->  <" <. i ,  j >. ">  =  <" <. i ,  (/) >. "> )
84 eceq1 6900 . . . . . . . . . . . . . . . . . . . . 21  |-  ( <" <. i ,  j
>. ">  =  <"
<. i ,  (/) >. ">  ->  [ <" <. i ,  j >. "> ]  .~  =  [ <"
<. i ,  (/) >. "> ]  .~  )
8583, 84syl 16 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  (/) )  ->  [ <"
<. i ,  j >. "> ]  .~  =  [ <" <. i ,  (/) >. "> ]  .~  )
8613, 72vrgpval 15354 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( I  e.  V  /\  i  e.  I )  ->  ( U `  i
)  =  [ <"
<. i ,  (/) >. "> ]  .~  )
8710, 86sylan 458 . . . . . . . . . . . . . . . . . . . . 21  |-  ( (
ph  /\  i  e.  I )  ->  ( U `  i )  =  [ <" <. i ,  (/) >. "> ]  .~  )
8887adantr 452 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  (/) )  ->  ( U `  i )  =  [ <" <. i ,  (/) >. "> ]  .~  )
8985, 88eqtr4d 2439 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  (/) )  ->  [ <"
<. i ,  j >. "> ]  .~  =  ( U `  i ) )
9089fveq2d 5691 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  (/) )  ->  ( K `  [ <" <. i ,  j >. "> ]  .~  )  =  ( K `  ( U `
 i ) ) )
9178, 80, 903eqtr4d 2446 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  (/) )  ->  if ( j  =  (/) ,  ( F `  i
) ,  ( N `
 ( F `  i ) ) )  =  ( K `  [ <" <. i ,  j >. "> ]  .~  ) )
9277fveq2d 5691 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  i  e.  I )  ->  ( N `  ( F `  i ) )  =  ( N `  ( K `  ( U `  i ) ) ) )
931adantr 452 . . . . . . . . . . . . . . . . . . . . 21  |-  ( (
ph  /\  i  e.  I )  ->  K  e.  ( G  GrpHom  H ) )
9474ffvelrnda 5829 . . . . . . . . . . . . . . . . . . . . 21  |-  ( (
ph  /\  i  e.  I )  ->  ( U `  i )  e.  X )
95 eqid 2404 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( inv g `  G )  =  ( inv g `  G )
962, 95, 7ghminv 14968 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( K  e.  ( G 
GrpHom  H )  /\  ( U `  i )  e.  X )  ->  ( K `  ( ( inv g `  G ) `
 ( U `  i ) ) )  =  ( N `  ( K `  ( U `
 i ) ) ) )
9793, 94, 96syl2anc 643 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  i  e.  I )  ->  ( K `  ( ( inv g `  G ) `
 ( U `  i ) ) )  =  ( N `  ( K `  ( U `
 i ) ) ) )
9892, 97eqtr4d 2439 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  i  e.  I )  ->  ( N `  ( F `  i ) )  =  ( K `  (
( inv g `  G ) `  ( U `  i )
) ) )
9998adantr 452 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  1o )  ->  ( N `  ( F `  i ) )  =  ( K `  (
( inv g `  G ) `  ( U `  i )
) ) )
100 1n0 6698 . . . . . . . . . . . . . . . . . . . 20  |-  1o  =/=  (/)
101 simpr 448 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  1o )  ->  j  =  1o )
102101neeq1d 2580 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  1o )  ->  (
j  =/=  (/)  <->  1o  =/=  (/) ) )
103100, 102mpbiri 225 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  1o )  ->  j  =/=  (/) )
104 ifnefalse 3707 . . . . . . . . . . . . . . . . . . 19  |-  ( j  =/=  (/)  ->  if (
j  =  (/) ,  ( F `  i ) ,  ( N `  ( F `  i ) ) )  =  ( N `  ( F `
 i ) ) )
105103, 104syl 16 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  1o )  ->  if ( j  =  (/) ,  ( F `  i
) ,  ( N `
 ( F `  i ) ) )  =  ( N `  ( F `  i ) ) )
106101opeq2d 3951 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  1o )  ->  <. i ,  j >.  =  <. i ,  1o >. )
107106s1eqd 11709 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  1o )  ->  <" <. i ,  j >. ">  =  <" <. i ,  1o >. "> )
108 eceq1 6900 . . . . . . . . . . . . . . . . . . . . 21  |-  ( <" <. i ,  j
>. ">  =  <"
<. i ,  1o >. ">  ->  [ <" <. i ,  j >. "> ]  .~  =  [ <"
<. i ,  1o >. "> ]  .~  )
109107, 108syl 16 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  1o )  ->  [ <"
<. i ,  j >. "> ]  .~  =  [ <" <. i ,  1o >. "> ]  .~  )
11013, 72, 14, 95vrgpinv 15356 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ( I  e.  V  /\  i  e.  I )  ->  ( ( inv g `  G ) `  ( U `  i )
)  =  [ <"
<. i ,  1o >. "> ]  .~  )
11110, 110sylan 458 . . . . . . . . . . . . . . . . . . . . 21  |-  ( (
ph  /\  i  e.  I )  ->  (
( inv g `  G ) `  ( U `  i )
)  =  [ <"
<. i ,  1o >. "> ]  .~  )
112111adantr 452 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  1o )  ->  (
( inv g `  G ) `  ( U `  i )
)  =  [ <"
<. i ,  1o >. "> ]  .~  )
113109, 112eqtr4d 2439 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  1o )  ->  [ <"
<. i ,  j >. "> ]  .~  =  ( ( inv g `  G ) `  ( U `  i )
) )
114113fveq2d 5691 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  1o )  ->  ( K `  [ <" <. i ,  j >. "> ]  .~  )  =  ( K `  ( ( inv g `  G
) `  ( U `  i ) ) ) )
11599, 105, 1143eqtr4d 2446 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  i  e.  I )  /\  j  =  1o )  ->  if ( j  =  (/) ,  ( F `  i
) ,  ( N `
 ( F `  i ) ) )  =  ( K `  [ <" <. i ,  j >. "> ]  .~  ) )
11691, 115jaodan 761 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  i  e.  I )  /\  (
j  =  (/)  \/  j  =  1o ) )  ->  if ( j  =  (/) ,  ( F `  i
) ,  ( N `
 ( F `  i ) ) )  =  ( K `  [ <" <. i ,  j >. "> ]  .~  ) )
11768, 116sylan2 461 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  i  e.  I )  /\  j  e.  2o )  ->  if ( j  =  (/) ,  ( F `  i
) ,  ( N `
 ( F `  i ) ) )  =  ( K `  [ <" <. i ,  j >. "> ]  .~  ) )
118117anasss 629 . . . . . . . . . . . . . 14  |-  ( (
ph  /\  ( i  e.  I  /\  j  e.  2o ) )  ->  if ( j  =  (/) ,  ( F `  i
) ,  ( N `
 ( F `  i ) ) )  =  ( K `  [ <" <. i ,  j >. "> ]  .~  ) )
11965, 118eqtrd 2436 . . . . . . . . . . . . 13  |-  ( (
ph  /\  ( i  e.  I  /\  j  e.  2o ) )  -> 
( i T j )  =  ( K `
 [ <" <. i ,  j >. "> ]  .~  ) )
120 fveq2 5687 . . . . . . . . . . . . . . 15  |-  ( ( t `  n )  =  <. i ,  j
>.  ->  ( T `  ( t `  n
) )  =  ( T `  <. i ,  j >. )
)
121 df-ov 6043 . . . . . . . . . . . . . . 15  |-  ( i T j )  =  ( T `  <. i ,  j >. )
122120, 121syl6eqr 2454 . . . . . . . . . . . . . 14  |-  ( ( t `  n )  =  <. i ,  j
>.  ->  ( T `  ( t `  n
) )  =  ( i T j ) )
123 s1eq 11708 . . . . . . . . . . . . . . . 16  |-  ( ( t `  n )  =  <. i ,  j
>.  ->  <" ( t `
 n ) ">  =  <" <. i ,  j >. "> )
124 eceq1 6900 . . . . . . . . . . . . . . . 16  |-  ( <" ( t `  n ) ">  =  <" <. i ,  j >. ">  ->  [ <" (
t `  n ) "> ]  .~  =  [ <" <. i ,  j >. "> ]  .~  )
125123, 124syl 16 . . . . . . . . . . . . . . 15  |-  ( ( t `  n )  =  <. i ,  j
>.  ->  [ <" (
t `  n ) "> ]  .~  =  [ <" <. i ,  j >. "> ]  .~  )
126125fveq2d 5691 . . . . . . . . . . . . . 14  |-  ( ( t `  n )  =  <. i ,  j
>.  ->  ( K `  [ <" ( t `
 n ) "> ]  .~  )  =  ( K `  [ <" <. i ,  j >. "> ]  .~  ) )
127122, 126eqeq12d 2418 . . . . . . . . . . . . 13  |-  ( ( t `  n )  =  <. i ,  j
>.  ->  ( ( T `
 ( t `  n ) )  =  ( K `  [ <" ( t `  n ) "> ]  .~  )  <->  ( i T j )  =  ( K `  [ <" <. i ,  j
>. "> ]  .~  ) ) )
128119, 127syl5ibrcom 214 . . . . . . . . . . . 12  |-  ( (
ph  /\  ( i  e.  I  /\  j  e.  2o ) )  -> 
( ( t `  n )  =  <. i ,  j >.  ->  ( T `  ( t `  n ) )  =  ( K `  [ <" ( t `  n ) "> ]  .~  ) ) )
129128rexlimdvva 2797 . . . . . . . . . . 11  |-  ( ph  ->  ( E. i  e.  I  E. j  e.  2o  ( t `  n )  =  <. i ,  j >.  ->  ( T `  ( t `  n ) )  =  ( K `  [ <" ( t `  n ) "> ]  .~  ) ) )
130129ad2antrr 707 . . . . . . . . . 10  |-  ( ( ( ph  /\  t  e.  W )  /\  n  e.  ( 0..^ ( # `  t ) ) )  ->  ( E. i  e.  I  E. j  e.  2o  ( t `  n )  =  <. i ,  j >.  ->  ( T `  ( t `  n ) )  =  ( K `  [ <" ( t `  n ) "> ]  .~  ) ) )
13155, 130mpd 15 . . . . . . . . 9  |-  ( ( ( ph  /\  t  e.  W )  /\  n  e.  ( 0..^ ( # `  t ) ) )  ->  ( T `  ( t `  n
) )  =  ( K `  [ <" ( t `  n
) "> ]  .~  ) )
132131mpteq2dva 4255 . . . . . . . 8  |-  ( (
ph  /\  t  e.  W )  ->  (
n  e.  ( 0..^ ( # `  t
) )  |->  ( T `
 ( t `  n ) ) )  =  ( n  e.  ( 0..^ ( # `  t ) )  |->  ( K `  [ <" ( t `  n
) "> ]  .~  ) ) )
1333, 7, 8, 9, 10, 11frgpuptf 15357 . . . . . . . . . 10  |-  ( ph  ->  T : ( I  X.  2o ) --> B )
134133adantr 452 . . . . . . . . 9  |-  ( (
ph  /\  t  e.  W )  ->  T : ( I  X.  2o ) --> B )
135 fcompt 5863 . . . . . . . . 9  |-  ( ( T : ( I  X.  2o ) --> B  /\  t : ( 0..^ ( # `  t
) ) --> ( I  X.  2o ) )  ->  ( T  o.  t )  =  ( n  e.  ( 0..^ ( # `  t
) )  |->  ( T `
 ( t `  n ) ) ) )
136134, 52, 135syl2anc 643 . . . . . . . 8  |-  ( (
ph  /\  t  e.  W )  ->  ( T  o.  t )  =  ( n  e.  ( 0..^ ( # `  t ) )  |->  ( T `  ( t `
 n ) ) ) )
13753s1cld 11711 . . . . . . . . . . 11  |-  ( ( ( ph  /\  t  e.  W )  /\  n  e.  ( 0..^ ( # `  t ) ) )  ->  <" ( t `
 n ) ">  e. Word  ( I  X.  2o ) )
13829ad2antrr 707 . . . . . . . . . . 11  |-  ( ( ( ph  /\  t  e.  W )  /\  n  e.  ( 0..^ ( # `  t ) ) )  ->  W  = Word  (
I  X.  2o ) )
139137, 138eleqtrrd 2481 . . . . . . . . . 10  |-  ( ( ( ph  /\  t  e.  W )  /\  n  e.  ( 0..^ ( # `  t ) ) )  ->  <" ( t `
 n ) ">  e.  W )
14014, 13, 12, 2frgpeccl 15348 . . . . . . . . . 10  |-  ( <" ( t `  n ) ">  e.  W  ->  [ <" ( t `  n
) "> ]  .~  e.  X )
141139, 140syl 16 . . . . . . . . 9  |-  ( ( ( ph  /\  t  e.  W )  /\  n  e.  ( 0..^ ( # `  t ) ) )  ->  [ <" (
t `  n ) "> ]  .~  e.  X )
14252feqmptd 5738 . . . . . . . . . . 11  |-  ( (
ph  /\  t  e.  W )  ->  t  =  ( n  e.  ( 0..^ ( # `  t ) )  |->  ( t `  n ) ) )
14310adantr 452 . . . . . . . . . . . . 13  |-  ( (
ph  /\  t  e.  W )  ->  I  e.  V )
144143, 23, 24sylancl 644 . . . . . . . . . . . 12  |-  ( (
ph  /\  t  e.  W )  ->  (
I  X.  2o )  e.  _V )
145 eqid 2404 . . . . . . . . . . . . 13  |-  (varFMnd `  (
I  X.  2o ) )  =  (varFMnd `  (
I  X.  2o ) )
146145vrmdfval 14756 . . . . . . . . . . . 12  |-  ( ( I  X.  2o )  e.  _V  ->  (varFMnd `  (
I  X.  2o ) )  =  ( w  e.  ( I  X.  2o )  |->  <" w "> ) )
147144, 146syl 16 . . . . . . . . . . 11  |-  ( (
ph  /\  t  e.  W )  ->  (varFMnd `  (
I  X.  2o ) )  =  ( w  e.  ( I  X.  2o )  |->  <" w "> ) )
148 s1eq 11708 . . . . . . . . . . 11  |-  ( w  =  ( t `  n )  ->  <" w ">  =  <" (
t `  n ) "> )
14953, 142, 147, 148fmptco 5860 . . . . . . . . . 10  |-  ( (
ph  /\  t  e.  W )  ->  (
(varFMnd `  ( I  X.  2o ) )  o.  t
)  =  ( n  e.  ( 0..^ (
# `  t )
)  |->  <" ( t `
 n ) "> ) )
150 eqidd 2405 . . . . . . . . . 10  |-  ( (
ph  /\  t  e.  W )  ->  (
w  e.  W  |->  [ w ]  .~  )  =  ( w  e.  W  |->  [ w ]  .~  ) )
151 eceq1 6900 . . . . . . . . . 10  |-  ( w  =  <" ( t `
 n ) ">  ->  [ w ]  .~  =  [ <" ( t `  n
) "> ]  .~  )
152139, 149, 150, 151fmptco 5860 . . . . . . . . 9  |-  ( (
ph  /\  t  e.  W )  ->  (
( w  e.  W  |->  [ w ]  .~  )  o.  ( (varFMnd `  (
I  X.  2o ) )  o.  t ) )  =  ( n  e.  ( 0..^ (
# `  t )
)  |->  [ <" (
t `  n ) "> ]  .~  )
)
1531adantr 452 . . . . . . . . . . 11  |-  ( (
ph  /\  t  e.  W )  ->  K  e.  ( G  GrpHom  H ) )
154153, 4syl 16 . . . . . . . . . 10  |-  ( (
ph  /\  t  e.  W )  ->  K : X --> B )
155154feqmptd 5738 . . . . . . . . 9  |-  ( (
ph  /\  t  e.  W )  ->  K  =  ( w  e.  X  |->  ( K `  w ) ) )
156 fveq2 5687 . . . . . . . . 9  |-  ( w  =  [ <" (
t `  n ) "> ]  .~  ->  ( K `  w )  =  ( K `  [ <" ( t `
 n ) "> ]  .~  )
)
157141, 152, 155, 156fmptco 5860 . . . . . . . 8  |-  ( (
ph  /\  t  e.  W )  ->  ( K  o.  ( (
w  e.  W  |->  [ w ]  .~  )  o.  ( (varFMnd `  ( I  X.  2o ) )  o.  t
) ) )  =  ( n  e.  ( 0..^ ( # `  t
) )  |->  ( K `
 [ <" (
t `  n ) "> ]  .~  )
) )
158132, 136, 1573eqtr4d 2446 . . . . . . 7  |-  ( (
ph  /\  t  e.  W )  ->  ( T  o.  t )  =  ( K  o.  ( ( w  e.  W  |->  [ w ]  .~  )  o.  (
(varFMnd `  ( I  X.  2o ) )  o.  t
) ) ) )
159158oveq2d 6056 . . . . . 6  |-  ( (
ph  /\  t  e.  W )  ->  ( H  gsumg  ( T  o.  t
) )  =  ( H  gsumg  ( K  o.  (
( w  e.  W  |->  [ w ]  .~  )  o.  ( (varFMnd `  (
I  X.  2o ) )  o.  t ) ) ) ) )
1603, 7, 8, 9, 10, 11, 12, 13, 14, 2, 15frgpupval 15361 . . . . . 6  |-  ( (
ph  /\  t  e.  W )  ->  ( E `  [ t ]  .~  )  =  ( H  gsumg  ( T  o.  t
) ) )
161 ghmmhm 14971 . . . . . . . 8  |-  ( K  e.  ( G  GrpHom  H )  ->  K  e.  ( G MndHom  H ) )
162153, 161syl 16 . . . . . . 7  |-  ( (
ph  /\  t  e.  W )  ->  K  e.  ( G MndHom  H ) )
163145vrmdf 14758 . . . . . . . . . . 11  |-  ( ( I  X.  2o )  e.  _V  ->  (varFMnd `  (
I  X.  2o ) ) : ( I  X.  2o ) -->Word  ( I  X.  2o ) )
164144, 163syl 16 . . . . . . . . . 10  |-  ( (
ph  /\  t  e.  W )  ->  (varFMnd `  (
I  X.  2o ) ) : ( I  X.  2o ) -->Word  ( I  X.  2o ) )
165 feq3 5537 . . . . . . . . . . 11  |-  ( W  = Word  ( I  X.  2o )  ->  ( (varFMnd `  ( I  X.  2o ) ) : ( I  X.  2o ) --> W  <->  (varFMnd `  ( I  X.  2o ) ) : ( I  X.  2o ) -->Word  ( I  X.  2o ) ) )
16649, 165syl 16 . . . . . . . . . 10  |-  ( (
ph  /\  t  e.  W )  ->  (
(varFMnd `  ( I  X.  2o ) ) : ( I  X.  2o ) --> W  <->  (varFMnd `  ( I  X.  2o ) ) : ( I  X.  2o ) -->Word  ( I  X.  2o ) ) )
167164, 166mpbird 224 . . . . . . . . 9  |-  ( (
ph  /\  t  e.  W )  ->  (varFMnd `  (
I  X.  2o ) ) : ( I  X.  2o ) --> W )
168 wrdco 11755 . . . . . . . . 9  |-  ( ( t  e. Word  ( I  X.  2o )  /\  (varFMnd `  ( I  X.  2o ) ) : ( I  X.  2o ) --> W )  ->  (
(varFMnd `  ( I  X.  2o ) )  o.  t
)  e. Word  W )
16950, 167, 168syl2anc 643 . . . . . . . 8  |-  ( (
ph  /\  t  e.  W )  ->  (
(varFMnd `  ( I  X.  2o ) )  o.  t
)  e. Word  W )
17033adantr 452 . . . . . . . . . . . 12  |-  ( (
ph  /\  t  e.  W )  ->  W  =  ( Base `  (freeMnd `  ( I  X.  2o ) ) ) )
171170mpteq1d 4250 . . . . . . . . . . 11  |-  ( (
ph  /\  t  e.  W )  ->  (
w  e.  W  |->  [ w ]  .~  )  =  ( w  e.  ( Base `  (freeMnd `  ( I  X.  2o ) ) )  |->  [ w ]  .~  )
)
172 eqid 2404 . . . . . . . . . . . . 13  |-  ( w  e.  ( Base `  (freeMnd `  ( I  X.  2o ) ) )  |->  [ w ]  .~  )  =  ( w  e.  ( Base `  (freeMnd `  ( I  X.  2o ) ) )  |->  [ w ]  .~  )
17320, 30, 14, 13, 172frgpmhm 15352 . . . . . . . . . . . 12  |-  ( I  e.  V  ->  (
w  e.  ( Base `  (freeMnd `  ( I  X.  2o ) ) ) 
|->  [ w ]  .~  )  e.  ( (freeMnd `  ( I  X.  2o ) ) MndHom  G ) )
174143, 173syl 16 . . . . . . . . . . 11  |-  ( (
ph  /\  t  e.  W )  ->  (
w  e.  ( Base `  (freeMnd `  ( I  X.  2o ) ) ) 
|->  [ w ]  .~  )  e.  ( (freeMnd `  ( I  X.  2o ) ) MndHom  G ) )
175171, 174eqeltrd 2478 . . . . . . . . . 10  |-  ( (
ph  /\  t  e.  W )  ->  (
w  e.  W  |->  [ w ]  .~  )  e.  ( (freeMnd `  (
I  X.  2o ) ) MndHom  G ) )
17630, 2mhmf 14698 . . . . . . . . . 10  |-  ( ( w  e.  W  |->  [ w ]  .~  )  e.  ( (freeMnd `  (
I  X.  2o ) ) MndHom  G )  -> 
( w  e.  W  |->  [ w ]  .~  ) : ( Base `  (freeMnd `  ( I  X.  2o ) ) ) --> X )
177175, 176syl 16 . . . . . . . . 9  |-  ( (
ph  /\  t  e.  W )  ->  (
w  e.  W  |->  [ w ]  .~  ) : ( Base `  (freeMnd `  ( I  X.  2o ) ) ) --> X )
178170feq2d 5540 . . . . . . . . 9  |-  ( (
ph  /\  t  e.  W )  ->  (
( w  e.  W  |->  [ w ]  .~  ) : W --> X  <->  ( w  e.  W  |->  [ w ]  .~  ) : (
Base `  (freeMnd `  (
I  X.  2o ) ) ) --> X ) )
179177, 178mpbird 224 . . . . . . . 8  |-  ( (
ph  /\  t  e.  W )  ->  (
w  e.  W  |->  [ w ]  .~  ) : W --> X )
180 wrdco 11755 . . . . . . . 8  |-  ( ( ( (varFMnd `  ( I  X.  2o ) )  o.  t
)  e. Word  W  /\  ( w  e.  W  |->  [ w ]  .~  ) : W --> X )  ->  ( ( w  e.  W  |->  [ w ]  .~  )  o.  (
(varFMnd `  ( I  X.  2o ) )  o.  t
) )  e. Word  X
)
181169, 179, 180syl2anc 643 . . . . . . 7  |-  ( (
ph  /\  t  e.  W )  ->  (
( w  e.  W  |->  [ w ]  .~  )  o.  ( (varFMnd `  (
I  X.  2o ) )  o.  t ) )  e. Word  X )
1822gsumwmhm 14745 . . . . . . 7  |-  ( ( K  e.  ( G MndHom  H )  /\  (
( w  e.  W  |->  [ w ]  .~  )  o.  ( (varFMnd `  (
I  X.  2o ) )  o.  t ) )  e. Word  X )  ->  ( K `  ( G  gsumg  ( ( w  e.  W  |->  [ w ]  .~  )  o.  (
(varFMnd `  ( I  X.  2o ) )  o.  t
) ) ) )  =  ( H  gsumg  ( K  o.  ( ( w  e.  W  |->  [ w ]  .~  )  o.  (
(varFMnd `  ( I  X.  2o ) )  o.  t
) ) ) ) )
183162, 181, 182syl2anc 643 . . . . . 6  |-  ( (
ph  /\  t  e.  W )  ->  ( K `  ( G  gsumg  ( ( w  e.  W  |->  [ w ]  .~  )  o.  ( (varFMnd `  (
I  X.  2o ) )  o.  t ) ) ) )  =  ( H  gsumg  ( K  o.  (
( w  e.  W  |->  [ w ]  .~  )  o.  ( (varFMnd `  (
I  X.  2o ) )  o.  t ) ) ) ) )
184159, 160, 1833eqtr4d 2446 . . . . 5  |-  ( (
ph  /\  t  e.  W )  ->  ( E `  [ t ]  .~  )  =  ( K `  ( G 
gsumg  ( ( w  e.  W  |->  [ w ]  .~  )  o.  (
(varFMnd `  ( I  X.  2o ) )  o.  t
) ) ) ) )
18520, 145frmdgsum 14762 . . . . . . . . 9  |-  ( ( ( I  X.  2o )  e.  _V  /\  t  e. Word  ( I  X.  2o ) )  ->  (
(freeMnd `  ( I  X.  2o ) )  gsumg  ( (varFMnd `  ( I  X.  2o ) )  o.  t
) )  =  t )
186144, 50, 185syl2anc 643 . . . . . . . 8  |-  ( (
ph  /\  t  e.  W )  ->  (
(freeMnd `  ( I  X.  2o ) )  gsumg  ( (varFMnd `  ( I  X.  2o ) )  o.  t
) )  =  t )
187186fveq2d 5691 . . . . . . 7  |-  ( (
ph  /\  t  e.  W )  ->  (
( w  e.  W  |->  [ w ]  .~  ) `  ( (freeMnd `  ( I  X.  2o ) )  gsumg  ( (varFMnd `  ( I  X.  2o ) )  o.  t
) ) )  =  ( ( w  e.  W  |->  [ w ]  .~  ) `  t ) )
188 wrdco 11755 . . . . . . . . . 10  |-  ( ( t  e. Word  ( I  X.  2o )  /\  (varFMnd `  ( I  X.  2o ) ) : ( I  X.  2o ) -->Word  ( I  X.  2o ) )  ->  (
(varFMnd `  ( I  X.  2o ) )  o.  t
)  e. Word Word  ( I  X.  2o ) )
18950, 164, 188syl2anc 643 . . . . . . . . 9  |-  ( (
ph  /\  t  e.  W )  ->  (
(varFMnd `  ( I  X.  2o ) )  o.  t
)  e. Word Word  ( I  X.  2o ) )
19032adantr 452 . . . . . . . . . 10  |-  ( (
ph  /\  t  e.  W )  ->  ( Base `  (freeMnd `  (
I  X.  2o ) ) )  = Word  (
I  X.  2o ) )
191 wrdeq 11693 . . . . . . . . . 10  |-  ( (
Base `  (freeMnd `  (
I  X.  2o ) ) )  = Word  (
I  X.  2o )  -> Word  ( Base `  (freeMnd `  ( I  X.  2o ) ) )  = Word Word  ( I  X.  2o ) )
192190, 191syl 16 . . . . . . . . 9  |-  ( (
ph  /\  t  e.  W )  -> Word  ( Base `  (freeMnd `  ( I  X.  2o ) ) )  = Word Word  ( I  X.  2o ) )
193189, 192eleqtrrd 2481 . . . . . . . 8  |-  ( (
ph  /\  t  e.  W )  ->  (
(varFMnd `  ( I  X.  2o ) )  o.  t
)  e. Word  ( Base `  (freeMnd `  ( I  X.  2o ) ) ) )
19430gsumwmhm 14745 . . . . . . . 8  |-  ( ( ( w  e.  W  |->  [ w ]  .~  )  e.  ( (freeMnd `  ( I  X.  2o ) ) MndHom  G )  /\  ( (varFMnd `  ( I  X.  2o ) )  o.  t
)  e. Word  ( Base `  (freeMnd `  ( I  X.  2o ) ) ) )  ->  ( (
w  e.  W  |->  [ w ]  .~  ) `  ( (freeMnd `  (
I  X.  2o ) )  gsumg  ( (varFMnd `  ( I  X.  2o ) )  o.  t
) ) )  =  ( G  gsumg  ( ( w  e.  W  |->  [ w ]  .~  )  o.  (
(varFMnd `  ( I  X.  2o ) )  o.  t
) ) ) )
195175, 193, 194syl2anc 643 . . . . . . 7  |-  ( (
ph  /\  t  e.  W )  ->  (
( w  e.  W  |->  [ w ]  .~  ) `  ( (freeMnd `  ( I  X.  2o ) )  gsumg  ( (varFMnd `  ( I  X.  2o ) )  o.  t
) ) )  =  ( G  gsumg  ( ( w  e.  W  |->  [ w ]  .~  )  o.  (
(varFMnd `  ( I  X.  2o ) )  o.  t
) ) ) )
19612, 13efger 15305 . . . . . . . . 9  |-  .~  Er  W
197196a1i 11 . . . . . . . 8  |-  ( (
ph  /\  t  e.  W )  ->  .~  Er  W )
198 fvex 5701 . . . . . . . . . 10  |-  (  _I 
` Word  ( I  X.  2o ) )  e.  _V
19912, 198eqeltri 2474 . . . . . . . . 9  |-  W  e. 
_V
200199a1i 11 . . . . . . . 8  |-  ( (
ph  /\  t  e.  W )  ->  W  e.  _V )
201 eqid 2404 . . . . . . . 8  |-  ( w  e.  W  |->  [ w ]  .~  )  =  ( w  e.  W  |->  [ w ]  .~  )
202197, 200, 201divsfval 13727 . . . . . . 7  |-  ( (
ph  /\  t  e.  W )  ->  (
( w  e.  W  |->  [ w ]  .~  ) `  t )  =  [ t ]  .~  )
203187, 195, 2023eqtr3d 2444 . . . . . 6  |-  ( (
ph  /\  t  e.  W )  ->  ( G  gsumg  ( ( w  e.  W  |->  [ w ]  .~  )  o.  (
(varFMnd `  ( I  X.  2o ) )  o.  t
) ) )  =  [ t ]  .~  )
204203fveq2d 5691 . . . . 5  |-  ( (
ph  /\  t  e.  W )  ->  ( K `  ( G  gsumg  ( ( w  e.  W  |->  [ w ]  .~  )  o.  ( (varFMnd `  (
I  X.  2o ) )  o.  t ) ) ) )  =  ( K `  [
t ]  .~  )
)
205184, 204eqtr2d 2437 . . . 4  |-  ( (
ph  /\  t  e.  W )  ->  ( K `  [ t ]  .~  )  =  ( E `  [ t ]  .~  ) )
20644, 47, 205ectocld 6930 . . 3  |-  ( (
ph  /\  a  e.  ( W /.  .~  )
)  ->  ( K `  a )  =  ( E `  a ) )
20743, 206syldan 457 . 2  |-  ( (
ph  /\  a  e.  X )  ->  ( K `  a )  =  ( E `  a ) )
2086, 19, 207eqfnfvd 5789 1  |-  ( ph  ->  K  =  E )
Colors of variables: wff set class
Syntax hints:    -> wi 4    <-> wb 177    \/ wo 358    /\ wa 359    = wceq 1649    e. wcel 1721    =/= wne 2567   E.wrex 2667   _Vcvv 2916    C_ wss 3280   (/)c0 3588   ifcif 3699   {cpr 3775   <.cop 3777    e. cmpt 4226    _I cid 4453   Oncon0 4541    X. cxp 4835   ran crn 4838    o. ccom 4841    Fn wfn 5408   -->wf 5409   ` cfv 5413  (class class class)co 6040    e. cmpt2 6042   1oc1o 6676   2oc2o 6677    Er wer 6861   [cec 6862   /.cqs 6863   0cc0 8946  ..^cfzo 11090   #chash 11573  Word cword 11672   <"cs1 11674   Basecbs 13424    gsumg cgsu 13679    /.s cqus 13686   Grpcgrp 14640   inv gcminusg 14641   MndHom cmhm 14691  freeMndcfrmd 14747  varFMndcvrmd 14748    GrpHom cghm 14958   ~FG cefg 15293  freeGrpcfrgp 15294  varFGrpcvrgp 15295
This theorem is referenced by:  frgpup3  15365
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1552  ax-5 1563  ax-17 1623  ax-9 1662  ax-8 1683  ax-13 1723  ax-14 1725  ax-6 1740  ax-7 1745  ax-11 1757  ax-12 1946  ax-ext 2385  ax-rep 4280  ax-sep 4290  ax-nul 4298  ax-pow 4337  ax-pr 4363  ax-un 4660  ax-cnex 9002  ax-resscn 9003  ax-1cn 9004  ax-icn 9005  ax-addcl 9006  ax-addrcl 9007  ax-mulcl 9008  ax-mulrcl 9009  ax-mulcom 9010  ax-addass 9011  ax-mulass 9012  ax-distr 9013  ax-i2m1 9014  ax-1ne0 9015  ax-1rid 9016  ax-rnegex 9017  ax-rrecex 9018  ax-cnre 9019  ax-pre-lttri 9020  ax-pre-lttrn 9021  ax-pre-ltadd 9022  ax-pre-mulgt0 9023
This theorem depends on definitions:  df-bi 178  df-or 360  df-an 361  df-3or 937  df-3an 938  df-tru 1325  df-ex 1548  df-nf 1551  df-sb 1656  df-eu 2258  df-mo 2259  df-clab 2391  df-cleq 2397  df-clel 2400  df-nfc 2529  df-ne 2569  df-nel 2570  df-ral 2671  df-rex 2672  df-reu 2673  df-rmo 2674  df-rab 2675  df-v 2918  df-sbc 3122  df-csb 3212  df-dif 3283  df-un 3285  df-in 3287  df-ss 3294  df-pss 3296  df-nul 3589  df-if 3700  df-pw 3761  df-sn 3780  df-pr 3781  df-tp 3782  df-op 3783  df-ot 3784  df-uni 3976  df-int 4011  df-iun 4055  df-iin 4056  df-br 4173  df-opab 4227  df-mpt 4228  df-tr 4263  df-eprel 4454  df-id 4458  df-po 4463  df-so 4464  df-fr 4501  df-we 4503  df-ord 4544  df-on 4545  df-lim 4546  df-suc 4547  df-om 4805  df-xp 4843  df-rel 4844  df-cnv 4845  df-co 4846  df-dm 4847  df-rn 4848  df-res 4849  df-ima 4850  df-iota 5377  df-fun 5415  df-fn 5416  df-f 5417  df-f1 5418  df-fo 5419  df-f1o 5420  df-fv 5421  df-ov 6043  df-oprab 6044  df-mpt2 6045  df-1st 6308  df-2nd 6309  df-riota 6508  df-recs 6592  df-rdg 6627  df-1o 6683  df-2o 6684  df-oadd 6687  df-er 6864  df-ec 6866  df-qs 6870  df-map 6979  df-pm 6980  df-en 7069  df-dom 7070  df-sdom 7071  df-fin 7072  df-sup 7404  df-card 7782  df-pnf 9078  df-mnf 9079  df-xr 9080  df-ltxr 9081  df-le 9082  df-sub 9249  df-neg 9250  df-nn 9957  df-2 10014  df-3 10015  df-4 10016  df-5 10017  df-6 10018  df-7 10019  df-8 10020  df-9 10021  df-10 10022  df-n0 10178  df-z 10239  df-dec 10339  df-uz 10445  df-fz 11000  df-fzo 11091  df-seq 11279  df-hash 11574  df-word 11678  df-concat 11679  df-s1 11680  df-substr 11681  df-splice 11682  df-reverse 11683  df-s2 11767  df-struct 13426  df-ndx 13427  df-slot 13428  df-base 13429  df-sets 13430  df-ress 13431  df-plusg 13497  df-mulr 13498  df-sca 13500  df-vsca 13501  df-tset 13503  df-ple 13504  df-ds 13506  df-0g 13682  df-gsum 13683  df-imas 13689  df-divs 13690  df-mnd 14645  df-mhm 14693  df-submnd 14694  df-frmd 14749  df-vrmd 14750  df-grp 14767  df-minusg 14768  df-ghm 14959  df-efg 15296  df-frgp 15297  df-vrgp 15298
  Copyright terms: Public domain W3C validator