Users' Mathboxes Mathbox for Thierry Arnoux < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  reprpmtf1o Structured version   Visualization version   Unicode version

Theorem reprpmtf1o 30704
Description: Transposing  0 and  X maps representations with a condition on the first index to transpositions with the same condition on the index  X. (Contributed by Thierry Arnoux, 27-Dec-2021.)
Hypotheses
Ref Expression
reprpmtf1o.s  |-  ( ph  ->  S  e.  NN )
reprpmtf1o.m  |-  ( ph  ->  M  e.  ZZ )
reprpmtf1o.a  |-  ( ph  ->  A  C_  NN )
reprpmtf1o.x  |-  ( ph  ->  X  e.  ( 0..^ S ) )
reprpmtf1o.o  |-  O  =  { c  e.  ( A (repr `  S
) M )  |  -.  ( c ` 
0 )  e.  B }
reprpmtf1o.p  |-  P  =  { c  e.  ( A (repr `  S
) M )  |  -.  ( c `  X )  e.  B }
reprpmtf1o.t  |-  T  =  if ( X  =  0 ,  (  _I  |`  ( 0..^ S ) ) ,  ( (pmTrsp `  ( 0..^ S ) ) `  { X ,  0 } ) )
reprpmtf1o.f  |-  F  =  ( c  e.  P  |->  ( c  o.  T
) )
Assertion
Ref Expression
reprpmtf1o  |-  ( ph  ->  F : P -1-1-onto-> O )
Distinct variable groups:    A, c    B, c    M, c    P, c    S, c    T, c    X, c    ph, c
Allowed substitution hints:    F( c)    O( c)

Proof of Theorem reprpmtf1o
Dummy variables  a 
b  d are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqid 2622 . . . . 5  |-  ( A  ^m  ( 0..^ S ) )  =  ( A  ^m  ( 0..^ S ) )
2 eqid 2622 . . . . 5  |-  ( c  e.  ( A  ^m  ( 0..^ S ) ) 
|->  ( c  o.  T
) )  =  ( c  e.  ( A  ^m  ( 0..^ S ) )  |->  ( c  o.  T ) )
3 ovexd 6680 . . . . 5  |-  ( ph  ->  ( 0..^ S )  e.  _V )
4 nnex 11026 . . . . . . 7  |-  NN  e.  _V
54a1i 11 . . . . . 6  |-  ( ph  ->  NN  e.  _V )
6 reprpmtf1o.a . . . . . 6  |-  ( ph  ->  A  C_  NN )
75, 6ssexd 4805 . . . . 5  |-  ( ph  ->  A  e.  _V )
8 reprpmtf1o.x . . . . . 6  |-  ( ph  ->  X  e.  ( 0..^ S ) )
9 reprpmtf1o.s . . . . . . 7  |-  ( ph  ->  S  e.  NN )
10 lbfzo0 12507 . . . . . . 7  |-  ( 0  e.  ( 0..^ S )  <->  S  e.  NN )
119, 10sylibr 224 . . . . . 6  |-  ( ph  ->  0  e.  ( 0..^ S ) )
12 reprpmtf1o.t . . . . . 6  |-  T  =  if ( X  =  0 ,  (  _I  |`  ( 0..^ S ) ) ,  ( (pmTrsp `  ( 0..^ S ) ) `  { X ,  0 } ) )
133, 8, 11, 12pmtridf1o 29856 . . . . 5  |-  ( ph  ->  T : ( 0..^ S ) -1-1-onto-> ( 0..^ S ) )
141, 1, 2, 3, 3, 7, 13fmptco1f1o 29434 . . . 4  |-  ( ph  ->  ( c  e.  ( A  ^m  ( 0..^ S ) )  |->  ( c  o.  T ) ) : ( A  ^m  ( 0..^ S ) ) -1-1-onto-> ( A  ^m  (
0..^ S ) ) )
15 f1of1 6136 . . . 4  |-  ( ( c  e.  ( A  ^m  ( 0..^ S ) )  |->  ( c  o.  T ) ) : ( A  ^m  ( 0..^ S ) ) -1-1-onto-> ( A  ^m  ( 0..^ S ) )  -> 
( c  e.  ( A  ^m  ( 0..^ S ) )  |->  ( c  o.  T ) ) : ( A  ^m  ( 0..^ S ) ) -1-1-> ( A  ^m  ( 0..^ S ) ) )
1614, 15syl 17 . . 3  |-  ( ph  ->  ( c  e.  ( A  ^m  ( 0..^ S ) )  |->  ( c  o.  T ) ) : ( A  ^m  ( 0..^ S ) ) -1-1-> ( A  ^m  ( 0..^ S ) ) )
17 ssrab2 3687 . . . . . 6  |-  { c  e.  ( A  ^m  ( 0..^ S ) )  |  sum_ a  e.  ( 0..^ S ) ( c `  a )  =  M }  C_  ( A  ^m  (
0..^ S ) )
18 reprpmtf1o.p . . . . . . . . . 10  |-  P  =  { c  e.  ( A (repr `  S
) M )  |  -.  ( c `  X )  e.  B }
1918ssrab3 3688 . . . . . . . . 9  |-  P  C_  ( A (repr `  S
) M )
2019a1i 11 . . . . . . . 8  |-  ( ph  ->  P  C_  ( A
(repr `  S ) M ) )
21 reprpmtf1o.m . . . . . . . . 9  |-  ( ph  ->  M  e.  ZZ )
229nnnn0d 11351 . . . . . . . . 9  |-  ( ph  ->  S  e.  NN0 )
236, 21, 22reprval 30688 . . . . . . . 8  |-  ( ph  ->  ( A (repr `  S ) M )  =  { c  e.  ( A  ^m  (
0..^ S ) )  |  sum_ a  e.  ( 0..^ S ) ( c `  a )  =  M } )
2420, 23sseqtrd 3641 . . . . . . 7  |-  ( ph  ->  P  C_  { c  e.  ( A  ^m  (
0..^ S ) )  |  sum_ a  e.  ( 0..^ S ) ( c `  a )  =  M } )
2524sselda 3603 . . . . . 6  |-  ( (
ph  /\  c  e.  P )  ->  c  e.  { c  e.  ( A  ^m  ( 0..^ S ) )  | 
sum_ a  e.  ( 0..^ S ) ( c `  a )  =  M } )
2617, 25sseldi 3601 . . . . 5  |-  ( (
ph  /\  c  e.  P )  ->  c  e.  ( A  ^m  (
0..^ S ) ) )
2726ex 450 . . . 4  |-  ( ph  ->  ( c  e.  P  ->  c  e.  ( A  ^m  ( 0..^ S ) ) ) )
2827ssrdv 3609 . . 3  |-  ( ph  ->  P  C_  ( A  ^m  ( 0..^ S ) ) )
29 f1ores 6151 . . 3  |-  ( ( ( c  e.  ( A  ^m  ( 0..^ S ) )  |->  ( c  o.  T ) ) : ( A  ^m  ( 0..^ S ) ) -1-1-> ( A  ^m  ( 0..^ S ) )  /\  P  C_  ( A  ^m  (
0..^ S ) ) )  ->  ( (
c  e.  ( A  ^m  ( 0..^ S ) )  |->  ( c  o.  T ) )  |`  P ) : P -1-1-onto-> (
( c  e.  ( A  ^m  ( 0..^ S ) )  |->  ( c  o.  T ) ) " P ) )
3016, 28, 29syl2anc 693 . 2  |-  ( ph  ->  ( ( c  e.  ( A  ^m  (
0..^ S ) ) 
|->  ( c  o.  T
) )  |`  P ) : P -1-1-onto-> ( ( c  e.  ( A  ^m  (
0..^ S ) ) 
|->  ( c  o.  T
) ) " P
) )
31 resmpt 5449 . . . . 5  |-  ( P 
C_  ( A  ^m  ( 0..^ S ) )  ->  ( ( c  e.  ( A  ^m  ( 0..^ S ) ) 
|->  ( c  o.  T
) )  |`  P )  =  ( c  e.  P  |->  ( c  o.  T ) ) )
3228, 31syl 17 . . . 4  |-  ( ph  ->  ( ( c  e.  ( A  ^m  (
0..^ S ) ) 
|->  ( c  o.  T
) )  |`  P )  =  ( c  e.  P  |->  ( c  o.  T ) ) )
33 reprpmtf1o.f . . . 4  |-  F  =  ( c  e.  P  |->  ( c  o.  T
) )
3432, 33syl6eqr 2674 . . 3  |-  ( ph  ->  ( ( c  e.  ( A  ^m  (
0..^ S ) ) 
|->  ( c  o.  T
) )  |`  P )  =  F )
35 eqidd 2623 . . 3  |-  ( ph  ->  P  =  P )
36 vex 3203 . . . . . . . . 9  |-  d  e. 
_V
3736a1i 11 . . . . . . . 8  |-  ( ph  ->  d  e.  _V )
382, 37, 28elimampt 29438 . . . . . . 7  |-  ( ph  ->  ( d  e.  ( ( c  e.  ( A  ^m  ( 0..^ S ) )  |->  ( c  o.  T ) ) " P )  <->  E. c  e.  P  d  =  ( c  o.  T ) ) )
39 simpr 477 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  -> 
d  =  ( c  o.  T ) )
40 f1of 6137 . . . . . . . . . . . . . . . . 17  |-  ( ( c  e.  ( A  ^m  ( 0..^ S ) )  |->  ( c  o.  T ) ) : ( A  ^m  ( 0..^ S ) ) -1-1-onto-> ( A  ^m  ( 0..^ S ) )  -> 
( c  e.  ( A  ^m  ( 0..^ S ) )  |->  ( c  o.  T ) ) : ( A  ^m  ( 0..^ S ) ) --> ( A  ^m  ( 0..^ S ) ) )
4114, 40syl 17 . . . . . . . . . . . . . . . 16  |-  ( ph  ->  ( c  e.  ( A  ^m  ( 0..^ S ) )  |->  ( c  o.  T ) ) : ( A  ^m  ( 0..^ S ) ) --> ( A  ^m  ( 0..^ S ) ) )
4241ad2antrr 762 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  -> 
( c  e.  ( A  ^m  ( 0..^ S ) )  |->  ( c  o.  T ) ) : ( A  ^m  ( 0..^ S ) ) --> ( A  ^m  ( 0..^ S ) ) )
432fmpt 6381 . . . . . . . . . . . . . . 15  |-  ( A. c  e.  ( A  ^m  ( 0..^ S ) ) ( c  o.  T )  e.  ( A  ^m  ( 0..^ S ) )  <->  ( c  e.  ( A  ^m  (
0..^ S ) ) 
|->  ( c  o.  T
) ) : ( A  ^m  ( 0..^ S ) ) --> ( A  ^m  ( 0..^ S ) ) )
4442, 43sylibr 224 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  ->  A. c  e.  ( A  ^m  ( 0..^ S ) ) ( c  o.  T )  e.  ( A  ^m  (
0..^ S ) ) )
4526adantr 481 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  -> 
c  e.  ( A  ^m  ( 0..^ S ) ) )
46 rspa 2930 . . . . . . . . . . . . . 14  |-  ( ( A. c  e.  ( A  ^m  ( 0..^ S ) ) ( c  o.  T )  e.  ( A  ^m  ( 0..^ S ) )  /\  c  e.  ( A  ^m  ( 0..^ S ) ) )  ->  ( c  o.  T )  e.  ( A  ^m  ( 0..^ S ) ) )
4744, 45, 46syl2anc 693 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  -> 
( c  o.  T
)  e.  ( A  ^m  ( 0..^ S ) ) )
4839, 47eqeltrd 2701 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  -> 
d  e.  ( A  ^m  ( 0..^ S ) ) )
4939adantr 481 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ph  /\  c  e.  P )  /\  d  =  (
c  o.  T ) )  /\  a  e.  ( 0..^ S ) )  ->  d  =  ( c  o.  T
) )
5049fveq1d 6193 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  c  e.  P )  /\  d  =  (
c  o.  T ) )  /\  a  e.  ( 0..^ S ) )  ->  ( d `  a )  =  ( ( c  o.  T
) `  a )
)
51 f1ofun 6139 . . . . . . . . . . . . . . . . . . 19  |-  ( T : ( 0..^ S ) -1-1-onto-> ( 0..^ S )  ->  Fun  T )
5213, 51syl 17 . . . . . . . . . . . . . . . . . 18  |-  ( ph  ->  Fun  T )
5352ad2antrr 762 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  c  e.  P )  /\  a  e.  ( 0..^ S ) )  ->  Fun  T )
54 simpr 477 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  c  e.  P )  /\  a  e.  ( 0..^ S ) )  ->  a  e.  ( 0..^ S ) )
55 f1odm 6141 . . . . . . . . . . . . . . . . . . . 20  |-  ( T : ( 0..^ S ) -1-1-onto-> ( 0..^ S )  ->  dom  T  =  ( 0..^ S ) )
5613, 55syl 17 . . . . . . . . . . . . . . . . . . 19  |-  ( ph  ->  dom  T  =  ( 0..^ S ) )
5756ad2antrr 762 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  c  e.  P )  /\  a  e.  ( 0..^ S ) )  ->  dom  T  =  ( 0..^ S ) )
5854, 57eleqtrrd 2704 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  c  e.  P )  /\  a  e.  ( 0..^ S ) )  ->  a  e.  dom  T )
59 fvco 6274 . . . . . . . . . . . . . . . . 17  |-  ( ( Fun  T  /\  a  e.  dom  T )  -> 
( ( c  o.  T ) `  a
)  =  ( c `
 ( T `  a ) ) )
6053, 58, 59syl2anc 693 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  c  e.  P )  /\  a  e.  ( 0..^ S ) )  ->  ( (
c  o.  T ) `
 a )  =  ( c `  ( T `  a )
) )
6160adantlr 751 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  c  e.  P )  /\  d  =  (
c  o.  T ) )  /\  a  e.  ( 0..^ S ) )  ->  ( (
c  o.  T ) `
 a )  =  ( c `  ( T `  a )
) )
6250, 61eqtrd 2656 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  c  e.  P )  /\  d  =  (
c  o.  T ) )  /\  a  e.  ( 0..^ S ) )  ->  ( d `  a )  =  ( c `  ( T `
 a ) ) )
6362sumeq2dv 14433 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  ->  sum_ a  e.  ( 0..^ S ) ( d `
 a )  = 
sum_ a  e.  ( 0..^ S ) ( c `  ( T `
 a ) ) )
64 fveq2 6191 . . . . . . . . . . . . . . 15  |-  ( b  =  ( T `  a )  ->  (
c `  b )  =  ( c `  ( T `  a ) ) )
65 fzofi 12773 . . . . . . . . . . . . . . . 16  |-  ( 0..^ S )  e.  Fin
6665a1i 11 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  c  e.  P )  ->  (
0..^ S )  e. 
Fin )
6713adantr 481 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  c  e.  P )  ->  T : ( 0..^ S ) -1-1-onto-> ( 0..^ S ) )
68 eqidd 2623 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  c  e.  P )  /\  a  e.  ( 0..^ S ) )  ->  ( T `  a )  =  ( T `  a ) )
696ad2antrr 762 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  c  e.  P )  /\  b  e.  ( 0..^ S ) )  ->  A  C_  NN )
706adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  c  e.  P )  ->  A  C_  NN )
7121adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  c  e.  P )  ->  M  e.  ZZ )
7222adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  c  e.  P )  ->  S  e.  NN0 )
7320sselda 3603 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  c  e.  P )  ->  c  e.  ( A (repr `  S ) M ) )
7470, 71, 72, 73reprf 30690 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  c  e.  P )  ->  c : ( 0..^ S ) --> A )
7574ffvelrnda 6359 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  c  e.  P )  /\  b  e.  ( 0..^ S ) )  ->  ( c `  b )  e.  A
)
7669, 75sseldd 3604 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  c  e.  P )  /\  b  e.  ( 0..^ S ) )  ->  ( c `  b )  e.  NN )
7776nncnd 11036 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  c  e.  P )  /\  b  e.  ( 0..^ S ) )  ->  ( c `  b )  e.  CC )
7864, 66, 67, 68, 77fsumf1o 14454 . . . . . . . . . . . . . 14  |-  ( (
ph  /\  c  e.  P )  ->  sum_ b  e.  ( 0..^ S ) ( c `  b
)  =  sum_ a  e.  ( 0..^ S ) ( c `  ( T `  a )
) )
7978adantr 481 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  ->  sum_ b  e.  ( 0..^ S ) ( c `
 b )  = 
sum_ a  e.  ( 0..^ S ) ( c `  ( T `
 a ) ) )
8070, 71, 72, 73reprsum 30691 . . . . . . . . . . . . . 14  |-  ( (
ph  /\  c  e.  P )  ->  sum_ b  e.  ( 0..^ S ) ( c `  b
)  =  M )
8180adantr 481 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  ->  sum_ b  e.  ( 0..^ S ) ( c `
 b )  =  M )
8263, 79, 813eqtr2d 2662 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  ->  sum_ a  e.  ( 0..^ S ) ( d `
 a )  =  M )
83 fveq1 6190 . . . . . . . . . . . . . . 15  |-  ( c  =  d  ->  (
c `  a )  =  ( d `  a ) )
8483sumeq2sdv 14435 . . . . . . . . . . . . . 14  |-  ( c  =  d  ->  sum_ a  e.  ( 0..^ S ) ( c `  a
)  =  sum_ a  e.  ( 0..^ S ) ( d `  a
) )
8584eqeq1d 2624 . . . . . . . . . . . . 13  |-  ( c  =  d  ->  ( sum_ a  e.  ( 0..^ S ) ( c `
 a )  =  M  <->  sum_ a  e.  ( 0..^ S ) ( d `  a )  =  M ) )
8685elrab 3363 . . . . . . . . . . . 12  |-  ( d  e.  { c  e.  ( A  ^m  (
0..^ S ) )  |  sum_ a  e.  ( 0..^ S ) ( c `  a )  =  M }  <->  ( d  e.  ( A  ^m  (
0..^ S ) )  /\  sum_ a  e.  ( 0..^ S ) ( d `  a )  =  M ) )
8748, 82, 86sylanbrc 698 . . . . . . . . . . 11  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  -> 
d  e.  { c  e.  ( A  ^m  ( 0..^ S ) )  |  sum_ a  e.  ( 0..^ S ) ( c `  a )  =  M } )
8823ad2antrr 762 . . . . . . . . . . 11  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  -> 
( A (repr `  S ) M )  =  { c  e.  ( A  ^m  (
0..^ S ) )  |  sum_ a  e.  ( 0..^ S ) ( c `  a )  =  M } )
8987, 88eleqtrrd 2704 . . . . . . . . . 10  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  -> 
d  e.  ( A (repr `  S ) M ) )
9039fveq1d 6193 . . . . . . . . . . 11  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  -> 
( d `  0
)  =  ( ( c  o.  T ) `
 0 ) )
9152ad2antrr 762 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  ->  Fun  T )
9211, 56eleqtrrd 2704 . . . . . . . . . . . . . 14  |-  ( ph  ->  0  e.  dom  T
)
9392ad2antrr 762 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  -> 
0  e.  dom  T
)
94 fvco 6274 . . . . . . . . . . . . 13  |-  ( ( Fun  T  /\  0  e.  dom  T )  -> 
( ( c  o.  T ) `  0
)  =  ( c `
 ( T ` 
0 ) ) )
9591, 93, 94syl2anc 693 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  -> 
( ( c  o.  T ) `  0
)  =  ( c `
 ( T ` 
0 ) ) )
963, 8, 11, 12pmtridfv2 29858 . . . . . . . . . . . . . . 15  |-  ( ph  ->  ( T `  0
)  =  X )
9796ad2antrr 762 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  -> 
( T `  0
)  =  X )
9897fveq2d 6195 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  -> 
( c `  ( T `  0 )
)  =  ( c `
 X ) )
99 simpr 477 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  c  e.  P )  ->  c  e.  P )
10099, 18syl6eleq 2711 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  c  e.  P )  ->  c  e.  { c  e.  ( A (repr `  S
) M )  |  -.  ( c `  X )  e.  B } )
101 rabid 3116 . . . . . . . . . . . . . . . 16  |-  ( c  e.  { c  e.  ( A (repr `  S ) M )  |  -.  ( c `
 X )  e.  B }  <->  ( c  e.  ( A (repr `  S ) M )  /\  -.  ( c `
 X )  e.  B ) )
102100, 101sylib 208 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  c  e.  P )  ->  (
c  e.  ( A (repr `  S ) M )  /\  -.  ( c `  X
)  e.  B ) )
103102simprd 479 . . . . . . . . . . . . . 14  |-  ( (
ph  /\  c  e.  P )  ->  -.  ( c `  X
)  e.  B )
104103adantr 481 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  ->  -.  ( c `  X
)  e.  B )
10598, 104eqneltrd 2720 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  ->  -.  ( c `  ( T `  0 )
)  e.  B )
10695, 105eqneltrd 2720 . . . . . . . . . . 11  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  ->  -.  ( ( c  o.  T ) `  0
)  e.  B )
10790, 106eqneltrd 2720 . . . . . . . . . 10  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  ->  -.  ( d `  0
)  e.  B )
10889, 107jca 554 . . . . . . . . 9  |-  ( ( ( ph  /\  c  e.  P )  /\  d  =  ( c  o.  T ) )  -> 
( d  e.  ( A (repr `  S
) M )  /\  -.  ( d `  0
)  e.  B ) )
109108r19.29an 3077 . . . . . . . 8  |-  ( (
ph  /\  E. c  e.  P  d  =  ( c  o.  T
) )  ->  (
d  e.  ( A (repr `  S ) M )  /\  -.  ( d `  0
)  e.  B ) )
1106adantr 481 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  d  e.  ( A (repr `  S
) M ) )  ->  A  C_  NN )
11121adantr 481 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  d  e.  ( A (repr `  S
) M ) )  ->  M  e.  ZZ )
11222adantr 481 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  d  e.  ( A (repr `  S
) M ) )  ->  S  e.  NN0 )
113 simpr 477 . . . . . . . . . . . . . . . . . 18  |-  ( (
ph  /\  d  e.  ( A (repr `  S
) M ) )  ->  d  e.  ( A (repr `  S
) M ) )
114110, 111, 112, 113reprf 30690 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  d  e.  ( A (repr `  S
) M ) )  ->  d : ( 0..^ S ) --> A )
115 f1ocnv 6149 . . . . . . . . . . . . . . . . . . 19  |-  ( T : ( 0..^ S ) -1-1-onto-> ( 0..^ S )  ->  `' T :
( 0..^ S ) -1-1-onto-> ( 0..^ S ) )
116 f1of 6137 . . . . . . . . . . . . . . . . . . 19  |-  ( `' T : ( 0..^ S ) -1-1-onto-> ( 0..^ S )  ->  `' T :
( 0..^ S ) --> ( 0..^ S ) )
11713, 115, 1163syl 18 . . . . . . . . . . . . . . . . . 18  |-  ( ph  ->  `' T : ( 0..^ S ) --> ( 0..^ S ) )
118117adantr 481 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  d  e.  ( A (repr `  S
) M ) )  ->  `' T :
( 0..^ S ) --> ( 0..^ S ) )
119 fco 6058 . . . . . . . . . . . . . . . . 17  |-  ( ( d : ( 0..^ S ) --> A  /\  `' T : ( 0..^ S ) --> ( 0..^ S ) )  -> 
( d  o.  `' T ) : ( 0..^ S ) --> A )
120114, 118, 119syl2anc 693 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  d  e.  ( A (repr `  S
) M ) )  ->  ( d  o.  `' T ) : ( 0..^ S ) --> A )
121 elmapg 7870 . . . . . . . . . . . . . . . . . 18  |-  ( ( A  e.  _V  /\  ( 0..^ S )  e. 
_V )  ->  (
( d  o.  `' T )  e.  ( A  ^m  ( 0..^ S ) )  <->  ( d  o.  `' T ) : ( 0..^ S ) --> A ) )
1227, 3, 121syl2anc 693 . . . . . . . . . . . . . . . . 17  |-  ( ph  ->  ( ( d  o.  `' T )  e.  ( A  ^m  ( 0..^ S ) )  <->  ( d  o.  `' T ) : ( 0..^ S ) --> A ) )
123122adantr 481 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  d  e.  ( A (repr `  S
) M ) )  ->  ( ( d  o.  `' T )  e.  ( A  ^m  ( 0..^ S ) )  <-> 
( d  o.  `' T ) : ( 0..^ S ) --> A ) )
124120, 123mpbird 247 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  d  e.  ( A (repr `  S
) M ) )  ->  ( d  o.  `' T )  e.  ( A  ^m  ( 0..^ S ) ) )
125124adantr 481 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  -.  (
d `  0 )  e.  B )  ->  (
d  o.  `' T
)  e.  ( A  ^m  ( 0..^ S ) ) )
126 f1ofun 6139 . . . . . . . . . . . . . . . . . . . 20  |-  ( `' T : ( 0..^ S ) -1-1-onto-> ( 0..^ S )  ->  Fun  `' T
)
12713, 115, 1263syl 18 . . . . . . . . . . . . . . . . . . 19  |-  ( ph  ->  Fun  `' T )
128127ad2antrr 762 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  a  e.  ( 0..^ S ) )  ->  Fun  `' T
)
129 simpr 477 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  a  e.  ( 0..^ S ) )  ->  a  e.  ( 0..^ S ) )
130 f1odm 6141 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( `' T : ( 0..^ S ) -1-1-onto-> ( 0..^ S )  ->  dom  `' T  =  ( 0..^ S ) )
13113, 115, 1303syl 18 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ph  ->  dom  `' T  =  ( 0..^ S ) )
132131adantr 481 . . . . . . . . . . . . . . . . . . . 20  |-  ( (
ph  /\  a  e.  ( 0..^ S ) )  ->  dom  `' T  =  ( 0..^ S ) )
133129, 132eleqtrrd 2704 . . . . . . . . . . . . . . . . . . 19  |-  ( (
ph  /\  a  e.  ( 0..^ S ) )  ->  a  e.  dom  `' T )
134133adantlr 751 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  a  e.  ( 0..^ S ) )  ->  a  e.  dom  `' T )
135 fvco 6274 . . . . . . . . . . . . . . . . . 18  |-  ( ( Fun  `' T  /\  a  e.  dom  `' T
)  ->  ( (
d  o.  `' T
) `  a )  =  ( d `  ( `' T `  a ) ) )
136128, 134, 135syl2anc 693 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  a  e.  ( 0..^ S ) )  ->  ( (
d  o.  `' T
) `  a )  =  ( d `  ( `' T `  a ) ) )
137136sumeq2dv 14433 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  d  e.  ( A (repr `  S
) M ) )  ->  sum_ a  e.  ( 0..^ S ) ( ( d  o.  `' T ) `  a
)  =  sum_ a  e.  ( 0..^ S ) ( d `  ( `' T `  a ) ) )
138 fveq2 6191 . . . . . . . . . . . . . . . . 17  |-  ( b  =  ( `' T `  a )  ->  (
d `  b )  =  ( d `  ( `' T `  a ) ) )
13965a1i 11 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  d  e.  ( A (repr `  S
) M ) )  ->  ( 0..^ S )  e.  Fin )
14013, 115syl 17 . . . . . . . . . . . . . . . . . 18  |-  ( ph  ->  `' T : ( 0..^ S ) -1-1-onto-> ( 0..^ S ) )
141140adantr 481 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  d  e.  ( A (repr `  S
) M ) )  ->  `' T :
( 0..^ S ) -1-1-onto-> ( 0..^ S ) )
142 eqidd 2623 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  a  e.  ( 0..^ S ) )  ->  ( `' T `  a )  =  ( `' T `  a ) )
143110adantr 481 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  b  e.  ( 0..^ S ) )  ->  A  C_  NN )
144114ffvelrnda 6359 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  b  e.  ( 0..^ S ) )  ->  ( d `  b )  e.  A
)
145143, 144sseldd 3604 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  b  e.  ( 0..^ S ) )  ->  ( d `  b )  e.  NN )
146145nncnd 11036 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  b  e.  ( 0..^ S ) )  ->  ( d `  b )  e.  CC )
147138, 139, 141, 142, 146fsumf1o 14454 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  d  e.  ( A (repr `  S
) M ) )  ->  sum_ b  e.  ( 0..^ S ) ( d `  b )  =  sum_ a  e.  ( 0..^ S ) ( d `  ( `' T `  a ) ) )
148110, 111, 112, 113reprsum 30691 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  d  e.  ( A (repr `  S
) M ) )  ->  sum_ b  e.  ( 0..^ S ) ( d `  b )  =  M )
149137, 147, 1483eqtr2d 2662 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  d  e.  ( A (repr `  S
) M ) )  ->  sum_ a  e.  ( 0..^ S ) ( ( d  o.  `' T ) `  a
)  =  M )
150149adantr 481 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  -.  (
d `  0 )  e.  B )  ->  sum_ a  e.  ( 0..^ S ) ( ( d  o.  `' T ) `  a
)  =  M )
151 fveq1 6190 . . . . . . . . . . . . . . . . 17  |-  ( c  =  ( d  o.  `' T )  ->  (
c `  a )  =  ( ( d  o.  `' T ) `
 a ) )
152151sumeq2sdv 14435 . . . . . . . . . . . . . . . 16  |-  ( c  =  ( d  o.  `' T )  ->  sum_ a  e.  ( 0..^ S ) ( c `  a
)  =  sum_ a  e.  ( 0..^ S ) ( ( d  o.  `' T ) `  a
) )
153152eqeq1d 2624 . . . . . . . . . . . . . . 15  |-  ( c  =  ( d  o.  `' T )  ->  ( sum_ a  e.  ( 0..^ S ) ( c `
 a )  =  M  <->  sum_ a  e.  ( 0..^ S ) ( ( d  o.  `' T ) `  a
)  =  M ) )
154153elrab 3363 . . . . . . . . . . . . . 14  |-  ( ( d  o.  `' T
)  e.  { c  e.  ( A  ^m  ( 0..^ S ) )  |  sum_ a  e.  ( 0..^ S ) ( c `  a )  =  M }  <->  ( (
d  o.  `' T
)  e.  ( A  ^m  ( 0..^ S ) )  /\  sum_ a  e.  ( 0..^ S ) ( ( d  o.  `' T
) `  a )  =  M ) )
155125, 150, 154sylanbrc 698 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  -.  (
d `  0 )  e.  B )  ->  (
d  o.  `' T
)  e.  { c  e.  ( A  ^m  ( 0..^ S ) )  |  sum_ a  e.  ( 0..^ S ) ( c `  a )  =  M } )
15623ad2antrr 762 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  -.  (
d `  0 )  e.  B )  ->  ( A (repr `  S ) M )  =  {
c  e.  ( A  ^m  ( 0..^ S ) )  |  sum_ a  e.  ( 0..^ S ) ( c `
 a )  =  M } )
157155, 156eleqtrrd 2704 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  -.  (
d `  0 )  e.  B )  ->  (
d  o.  `' T
)  e.  ( A (repr `  S ) M ) )
158127ad2antrr 762 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  -.  (
d `  0 )  e.  B )  ->  Fun  `' T )
1598, 131eleqtrrd 2704 . . . . . . . . . . . . . . 15  |-  ( ph  ->  X  e.  dom  `' T )
160159ad2antrr 762 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  -.  (
d `  0 )  e.  B )  ->  X  e.  dom  `' T )
161 fvco 6274 . . . . . . . . . . . . . 14  |-  ( ( Fun  `' T  /\  X  e.  dom  `' T
)  ->  ( (
d  o.  `' T
) `  X )  =  ( d `  ( `' T `  X ) ) )
162158, 160, 161syl2anc 693 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  -.  (
d `  0 )  e.  B )  ->  (
( d  o.  `' T ) `  X
)  =  ( d `
 ( `' T `  X ) ) )
163 f1ocnvfv 6534 . . . . . . . . . . . . . . . . . 18  |-  ( ( T : ( 0..^ S ) -1-1-onto-> ( 0..^ S )  /\  0  e.  ( 0..^ S ) )  ->  ( ( T `
 0 )  =  X  ->  ( `' T `  X )  =  0 ) )
164163imp 445 . . . . . . . . . . . . . . . . 17  |-  ( ( ( T : ( 0..^ S ) -1-1-onto-> ( 0..^ S )  /\  0  e.  ( 0..^ S ) )  /\  ( T `
 0 )  =  X )  ->  ( `' T `  X )  =  0 )
16513, 11, 96, 164syl21anc 1325 . . . . . . . . . . . . . . . 16  |-  ( ph  ->  ( `' T `  X )  =  0 )
166165ad2antrr 762 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  -.  (
d `  0 )  e.  B )  ->  ( `' T `  X )  =  0 )
167166fveq2d 6195 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  -.  (
d `  0 )  e.  B )  ->  (
d `  ( `' T `  X )
)  =  ( d `
 0 ) )
168 simpr 477 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  -.  (
d `  0 )  e.  B )  ->  -.  ( d `  0
)  e.  B )
169167, 168eqneltrd 2720 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  -.  (
d `  0 )  e.  B )  ->  -.  ( d `  ( `' T `  X ) )  e.  B )
170162, 169eqneltrd 2720 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  -.  (
d `  0 )  e.  B )  ->  -.  ( ( d  o.  `' T ) `  X
)  e.  B )
171 fveq1 6190 . . . . . . . . . . . . . . 15  |-  ( c  =  ( d  o.  `' T )  ->  (
c `  X )  =  ( ( d  o.  `' T ) `
 X ) )
172171eleq1d 2686 . . . . . . . . . . . . . 14  |-  ( c  =  ( d  o.  `' T )  ->  (
( c `  X
)  e.  B  <->  ( (
d  o.  `' T
) `  X )  e.  B ) )
173172notbid 308 . . . . . . . . . . . . 13  |-  ( c  =  ( d  o.  `' T )  ->  ( -.  ( c `  X
)  e.  B  <->  -.  (
( d  o.  `' T ) `  X
)  e.  B ) )
174173elrab 3363 . . . . . . . . . . . 12  |-  ( ( d  o.  `' T
)  e.  { c  e.  ( A (repr `  S ) M )  |  -.  ( c `
 X )  e.  B }  <->  ( (
d  o.  `' T
)  e.  ( A (repr `  S ) M )  /\  -.  ( ( d  o.  `' T ) `  X
)  e.  B ) )
175157, 170, 174sylanbrc 698 . . . . . . . . . . 11  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  -.  (
d `  0 )  e.  B )  ->  (
d  o.  `' T
)  e.  { c  e.  ( A (repr `  S ) M )  |  -.  ( c `
 X )  e.  B } )
176175, 18syl6eleqr 2712 . . . . . . . . . 10  |-  ( ( ( ph  /\  d  e.  ( A (repr `  S ) M ) )  /\  -.  (
d `  0 )  e.  B )  ->  (
d  o.  `' T
)  e.  P )
177176anasss 679 . . . . . . . . 9  |-  ( (
ph  /\  ( d  e.  ( A (repr `  S ) M )  /\  -.  ( d `
 0 )  e.  B ) )  -> 
( d  o.  `' T )  e.  P
)
178 simpr 477 . . . . . . . . . . 11  |-  ( ( ( ph  /\  (
d  e.  ( A (repr `  S ) M )  /\  -.  ( d `  0
)  e.  B ) )  /\  c  =  ( d  o.  `' T ) )  -> 
c  =  ( d  o.  `' T ) )
179178coeq1d 5283 . . . . . . . . . 10  |-  ( ( ( ph  /\  (
d  e.  ( A (repr `  S ) M )  /\  -.  ( d `  0
)  e.  B ) )  /\  c  =  ( d  o.  `' T ) )  -> 
( c  o.  T
)  =  ( ( d  o.  `' T
)  o.  T ) )
180179eqeq2d 2632 . . . . . . . . 9  |-  ( ( ( ph  /\  (
d  e.  ( A (repr `  S ) M )  /\  -.  ( d `  0
)  e.  B ) )  /\  c  =  ( d  o.  `' T ) )  -> 
( d  =  ( c  o.  T )  <-> 
d  =  ( ( d  o.  `' T
)  o.  T ) ) )
181 f1ococnv1 6165 . . . . . . . . . . . . . 14  |-  ( T : ( 0..^ S ) -1-1-onto-> ( 0..^ S )  ->  ( `' T  o.  T )  =  (  _I  |`  ( 0..^ S ) ) )
18213, 181syl 17 . . . . . . . . . . . . 13  |-  ( ph  ->  ( `' T  o.  T )  =  (  _I  |`  ( 0..^ S ) ) )
183182adantr 481 . . . . . . . . . . . 12  |-  ( (
ph  /\  ( d  e.  ( A (repr `  S ) M )  /\  -.  ( d `
 0 )  e.  B ) )  -> 
( `' T  o.  T )  =  (  _I  |`  ( 0..^ S ) ) )
184183coeq2d 5284 . . . . . . . . . . 11  |-  ( (
ph  /\  ( d  e.  ( A (repr `  S ) M )  /\  -.  ( d `
 0 )  e.  B ) )  -> 
( d  o.  ( `' T  o.  T
) )  =  ( d  o.  (  _I  |`  ( 0..^ S ) ) ) )
185114adantrr 753 . . . . . . . . . . . 12  |-  ( (
ph  /\  ( d  e.  ( A (repr `  S ) M )  /\  -.  ( d `
 0 )  e.  B ) )  -> 
d : ( 0..^ S ) --> A )
186 fcoi1 6078 . . . . . . . . . . . 12  |-  ( d : ( 0..^ S ) --> A  ->  (
d  o.  (  _I  |`  ( 0..^ S ) ) )  =  d )
187185, 186syl 17 . . . . . . . . . . 11  |-  ( (
ph  /\  ( d  e.  ( A (repr `  S ) M )  /\  -.  ( d `
 0 )  e.  B ) )  -> 
( d  o.  (  _I  |`  ( 0..^ S ) ) )  =  d )
188184, 187eqtr2d 2657 . . . . . . . . . 10  |-  ( (
ph  /\  ( d  e.  ( A (repr `  S ) M )  /\  -.  ( d `
 0 )  e.  B ) )  -> 
d  =  ( d  o.  ( `' T  o.  T ) ) )
189 coass 5654 . . . . . . . . . 10  |-  ( ( d  o.  `' T
)  o.  T )  =  ( d  o.  ( `' T  o.  T ) )
190188, 189syl6eqr 2674 . . . . . . . . 9  |-  ( (
ph  /\  ( d  e.  ( A (repr `  S ) M )  /\  -.  ( d `
 0 )  e.  B ) )  -> 
d  =  ( ( d  o.  `' T
)  o.  T ) )
191177, 180, 190rspcedvd 3317 . . . . . . . 8  |-  ( (
ph  /\  ( d  e.  ( A (repr `  S ) M )  /\  -.  ( d `
 0 )  e.  B ) )  ->  E. c  e.  P  d  =  ( c  o.  T ) )
192109, 191impbida 877 . . . . . . 7  |-  ( ph  ->  ( E. c  e.  P  d  =  ( c  o.  T )  <-> 
( d  e.  ( A (repr `  S
) M )  /\  -.  ( d `  0
)  e.  B ) ) )
19338, 192bitrd 268 . . . . . 6  |-  ( ph  ->  ( d  e.  ( ( c  e.  ( A  ^m  ( 0..^ S ) )  |->  ( c  o.  T ) ) " P )  <-> 
( d  e.  ( A (repr `  S
) M )  /\  -.  ( d `  0
)  e.  B ) ) )
194 fveq1 6190 . . . . . . . . 9  |-  ( c  =  d  ->  (
c `  0 )  =  ( d ` 
0 ) )
195194eleq1d 2686 . . . . . . . 8  |-  ( c  =  d  ->  (
( c `  0
)  e.  B  <->  ( d `  0 )  e.  B ) )
196195notbid 308 . . . . . . 7  |-  ( c  =  d  ->  ( -.  ( c `  0
)  e.  B  <->  -.  (
d `  0 )  e.  B ) )
197196elrab 3363 . . . . . 6  |-  ( d  e.  { c  e.  ( A (repr `  S ) M )  |  -.  ( c `
 0 )  e.  B }  <->  ( d  e.  ( A (repr `  S ) M )  /\  -.  ( d `
 0 )  e.  B ) )
198193, 197syl6bbr 278 . . . . 5  |-  ( ph  ->  ( d  e.  ( ( c  e.  ( A  ^m  ( 0..^ S ) )  |->  ( c  o.  T ) ) " P )  <-> 
d  e.  { c  e.  ( A (repr `  S ) M )  |  -.  ( c `
 0 )  e.  B } ) )
199198eqrdv 2620 . . . 4  |-  ( ph  ->  ( ( c  e.  ( A  ^m  (
0..^ S ) ) 
|->  ( c  o.  T
) ) " P
)  =  { c  e.  ( A (repr `  S ) M )  |  -.  ( c `
 0 )  e.  B } )
200 reprpmtf1o.o . . . 4  |-  O  =  { c  e.  ( A (repr `  S
) M )  |  -.  ( c ` 
0 )  e.  B }
201199, 200syl6eqr 2674 . . 3  |-  ( ph  ->  ( ( c  e.  ( A  ^m  (
0..^ S ) ) 
|->  ( c  o.  T
) ) " P
)  =  O )
20234, 35, 201f1oeq123d 6133 . 2  |-  ( ph  ->  ( ( ( c  e.  ( A  ^m  ( 0..^ S ) ) 
|->  ( c  o.  T
) )  |`  P ) : P -1-1-onto-> ( ( c  e.  ( A  ^m  (
0..^ S ) ) 
|->  ( c  o.  T
) ) " P
)  <->  F : P -1-1-onto-> O ) )
20330, 202mpbid 222 1  |-  ( ph  ->  F : P -1-1-onto-> O )
Colors of variables: wff setvar class
Syntax hints:   -. wn 3    -> wi 4    <-> wb 196    /\ wa 384    = wceq 1483    e. wcel 1990   A.wral 2912   E.wrex 2913   {crab 2916   _Vcvv 3200    C_ wss 3574   ifcif 4086   {cpr 4179    |-> cmpt 4729    _I cid 5023   `'ccnv 5113   dom cdm 5114    |` cres 5116   "cima 5117    o. ccom 5118   Fun wfun 5882   -->wf 5884   -1-1->wf1 5885   -1-1-onto->wf1o 5887   ` cfv 5888  (class class class)co 6650    ^m cmap 7857   Fincfn 7955   0cc0 9936   NNcn 11020   NN0cn0 11292   ZZcz 11377  ..^cfzo 12465   sum_csu 14416  pmTrspcpmtr 17861  reprcrepr 30686
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1722  ax-4 1737  ax-5 1839  ax-6 1888  ax-7 1935  ax-8 1992  ax-9 1999  ax-10 2019  ax-11 2034  ax-12 2047  ax-13 2246  ax-ext 2602  ax-rep 4771  ax-sep 4781  ax-nul 4789  ax-pow 4843  ax-pr 4906  ax-un 6949  ax-inf2 8538  ax-cnex 9992  ax-resscn 9993  ax-1cn 9994  ax-icn 9995  ax-addcl 9996  ax-addrcl 9997  ax-mulcl 9998  ax-mulrcl 9999  ax-mulcom 10000  ax-addass 10001  ax-mulass 10002  ax-distr 10003  ax-i2m1 10004  ax-1ne0 10005  ax-1rid 10006  ax-rnegex 10007  ax-rrecex 10008  ax-cnre 10009  ax-pre-lttri 10010  ax-pre-lttrn 10011  ax-pre-ltadd 10012  ax-pre-mulgt0 10013  ax-pre-sup 10014
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1038  df-3an 1039  df-tru 1486  df-fal 1489  df-ex 1705  df-nf 1710  df-sb 1881  df-eu 2474  df-mo 2475  df-clab 2609  df-cleq 2615  df-clel 2618  df-nfc 2753  df-ne 2795  df-nel 2898  df-ral 2917  df-rex 2918  df-reu 2919  df-rmo 2920  df-rab 2921  df-v 3202  df-sbc 3436  df-csb 3534  df-dif 3577  df-un 3579  df-in 3581  df-ss 3588  df-pss 3590  df-nul 3916  df-if 4087  df-pw 4160  df-sn 4178  df-pr 4180  df-tp 4182  df-op 4184  df-uni 4437  df-int 4476  df-iun 4522  df-br 4654  df-opab 4713  df-mpt 4730  df-tr 4753  df-id 5024  df-eprel 5029  df-po 5035  df-so 5036  df-fr 5073  df-se 5074  df-we 5075  df-xp 5120  df-rel 5121  df-cnv 5122  df-co 5123  df-dm 5124  df-rn 5125  df-res 5126  df-ima 5127  df-pred 5680  df-ord 5726  df-on 5727  df-lim 5728  df-suc 5729  df-iota 5851  df-fun 5890  df-fn 5891  df-f 5892  df-f1 5893  df-fo 5894  df-f1o 5895  df-fv 5896  df-isom 5897  df-riota 6611  df-ov 6653  df-oprab 6654  df-mpt2 6655  df-om 7066  df-1st 7168  df-2nd 7169  df-wrecs 7407  df-recs 7468  df-rdg 7506  df-1o 7560  df-2o 7561  df-oadd 7564  df-er 7742  df-map 7859  df-en 7956  df-dom 7957  df-sdom 7958  df-fin 7959  df-sup 8348  df-oi 8415  df-card 8765  df-pnf 10076  df-mnf 10077  df-xr 10078  df-ltxr 10079  df-le 10080  df-sub 10268  df-neg 10269  df-div 10685  df-nn 11021  df-2 11079  df-3 11080  df-n0 11293  df-z 11378  df-uz 11688  df-rp 11833  df-fz 12327  df-fzo 12466  df-seq 12802  df-exp 12861  df-hash 13118  df-cj 13839  df-re 13840  df-im 13841  df-sqrt 13975  df-abs 13976  df-clim 14219  df-sum 14417  df-pmtr 17862  df-repr 30687
This theorem is referenced by:  hgt750lema  30735
  Copyright terms: Public domain W3C validator