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

Theorem wemapweOLD 8053
Description: Construct lexicographic order on a function space based on a reverse well-ordering of the indexes and a well-ordering of the values. (Contributed by Mario Carneiro, 29-May-2015.) Obsolete version of wemapwe 8052 as of 3-Jul-2019. (New usage is discouraged.) (Proof modification is discouraged.)
Hypotheses
Ref Expression
wemapweOLD.t  |-  T  =  { <. x ,  y
>.  |  E. z  e.  A  ( (
x `  z ) S ( y `  z )  /\  A. w  e.  A  (
z R w  -> 
( x `  w
)  =  ( y `
 w ) ) ) }
wemapweOLD.u  |-  U  =  { x  e.  ( B  ^m  A )  |  ( `' x " ( _V  \  { Z } ) )  e. 
Fin }
wemapweOLD.2  |-  ( ph  ->  R  We  A )
wemapweOLD.3  |-  ( ph  ->  S  We  B )
wemapweOLD.4  |-  ( ph  ->  B  =/=  (/) )
wemapweOLD.5  |-  F  = OrdIso
( R ,  A
)
wemapweOLD.6  |-  G  = OrdIso
( S ,  B
)
wemapweOLD.7  |-  Z  =  ( G `  (/) )
Assertion
Ref Expression
wemapweOLD  |-  ( ph  ->  T  We  U )
Distinct variable groups:    x, w, y, z, A    x, B, y    w, F, x, y, z    x, G, y    ph, x, y    w, R, z    z, S    x, U, y    x, Z
Allowed substitution hints:    ph( z, w)    B( z, w)    R( x, y)    S( x, y, w)    T( x, y, z, w)    U( z, w)    G( z, w)    Z( y, z, w)

Proof of Theorem wemapweOLD
Dummy variables  a 
b  c  d  f are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 wemapweOLD.u . . . . . . . . 9  |-  U  =  { x  e.  ( B  ^m  A )  |  ( `' x " ( _V  \  { Z } ) )  e. 
Fin }
2 eqid 2382 . . . . . . . . 9  |-  { x  e.  ( dom  G  ^m  dom  F )  |  ( `' x " ( _V 
\  { ( `' G `  Z ) } ) )  e. 
Fin }  =  {
x  e.  ( dom 
G  ^m  dom  F )  |  ( `' x " ( _V  \  {
( `' G `  Z ) } ) )  e.  Fin }
3 eqid 2382 . . . . . . . . 9  |-  ( `' G `  Z )  =  ( `' G `  Z )
4 simprr 755 . . . . . . . . . . 11  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  A  e.  _V )
5 wemapweOLD.2 . . . . . . . . . . . 12  |-  ( ph  ->  R  We  A )
65adantr 463 . . . . . . . . . . 11  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  R  We  A )
7 wemapweOLD.5 . . . . . . . . . . . 12  |-  F  = OrdIso
( R ,  A
)
87oiiso 7877 . . . . . . . . . . 11  |-  ( ( A  e.  _V  /\  R  We  A )  ->  F  Isom  _E  ,  R  ( dom  F ,  A
) )
94, 6, 8syl2anc 659 . . . . . . . . . 10  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  F  Isom  _E  ,  R  ( dom  F ,  A
) )
10 isof1o 6122 . . . . . . . . . 10  |-  ( F 
Isom  _E  ,  R  ( dom  F ,  A
)  ->  F : dom  F -1-1-onto-> A )
119, 10syl 16 . . . . . . . . 9  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  F : dom  F -1-1-onto-> A )
12 simprl 754 . . . . . . . . . . 11  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  B  e.  _V )
13 wemapweOLD.3 . . . . . . . . . . . 12  |-  ( ph  ->  S  We  B )
1413adantr 463 . . . . . . . . . . 11  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  S  We  B )
15 wemapweOLD.6 . . . . . . . . . . . 12  |-  G  = OrdIso
( S ,  B
)
1615oiiso 7877 . . . . . . . . . . 11  |-  ( ( B  e.  _V  /\  S  We  B )  ->  G  Isom  _E  ,  S  ( dom  G ,  B
) )
1712, 14, 16syl2anc 659 . . . . . . . . . 10  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  G  Isom  _E  ,  S  ( dom  G ,  B
) )
18 isof1o 6122 . . . . . . . . . 10  |-  ( G 
Isom  _E  ,  S  ( dom  G ,  B
)  ->  G : dom  G -1-1-onto-> B )
19 f1ocnv 5736 . . . . . . . . . 10  |-  ( G : dom  G -1-1-onto-> B  ->  `' G : B -1-1-onto-> dom  G
)
2017, 18, 193syl 20 . . . . . . . . 9  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  `' G : B -1-1-onto-> dom  G
)
217oiexg 7875 . . . . . . . . . . 11  |-  ( A  e.  _V  ->  F  e.  _V )
2221ad2antll 726 . . . . . . . . . 10  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  F  e.  _V )
23 dmexg 6630 . . . . . . . . . 10  |-  ( F  e.  _V  ->  dom  F  e.  _V )
2422, 23syl 16 . . . . . . . . 9  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  dom  F  e.  _V )
2515oiexg 7875 . . . . . . . . . . 11  |-  ( B  e.  _V  ->  G  e.  _V )
2625ad2antrl 725 . . . . . . . . . 10  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  G  e.  _V )
27 dmexg 6630 . . . . . . . . . 10  |-  ( G  e.  _V  ->  dom  G  e.  _V )
2826, 27syl 16 . . . . . . . . 9  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  dom  G  e.  _V )
29 wemapweOLD.7 . . . . . . . . . 10  |-  Z  =  ( G `  (/) )
3017, 18syl 16 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  G : dom  G -1-1-onto-> B )
31 f1ofo 5731 . . . . . . . . . . . . . . 15  |-  ( G : dom  G -1-1-onto-> B  ->  G : dom  G -onto-> B
)
32 forn 5706 . . . . . . . . . . . . . . 15  |-  ( G : dom  G -onto-> B  ->  ran  G  =  B )
3330, 31, 323syl 20 . . . . . . . . . . . . . 14  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  ran  G  =  B )
34 wemapweOLD.4 . . . . . . . . . . . . . . 15  |-  ( ph  ->  B  =/=  (/) )
3534adantr 463 . . . . . . . . . . . . . 14  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  B  =/=  (/) )
3633, 35eqnetrd 2675 . . . . . . . . . . . . 13  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  ran  G  =/=  (/) )
37 dm0rn0 5132 . . . . . . . . . . . . . 14  |-  ( dom 
G  =  (/)  <->  ran  G  =  (/) )
3837necon3bii 2650 . . . . . . . . . . . . 13  |-  ( dom 
G  =/=  (/)  <->  ran  G  =/=  (/) )
3936, 38sylibr 212 . . . . . . . . . . . 12  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  dom  G  =/=  (/) )
4015oicl 7869 . . . . . . . . . . . . 13  |-  Ord  dom  G
41 ord0eln0 4846 . . . . . . . . . . . . 13  |-  ( Ord 
dom  G  ->  ( (/)  e.  dom  G  <->  dom  G  =/=  (/) ) )
4240, 41ax-mp 5 . . . . . . . . . . . 12  |-  ( (/)  e.  dom  G  <->  dom  G  =/=  (/) )
4339, 42sylibr 212 . . . . . . . . . . 11  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  (/) 
e.  dom  G )
4415oif 7870 . . . . . . . . . . . 12  |-  G : dom  G --> B
4544ffvelrni 5932 . . . . . . . . . . 11  |-  ( (/)  e.  dom  G  ->  ( G `  (/) )  e.  B )
4643, 45syl 16 . . . . . . . . . 10  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  -> 
( G `  (/) )  e.  B )
4729, 46syl5eqel 2474 . . . . . . . . 9  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  Z  e.  B )
481, 2, 3, 11, 20, 4, 12, 24, 28, 47mapfienOLD 8051 . . . . . . . 8  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  -> 
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) : U -1-1-onto-> { x  e.  ( dom  G  ^m  dom  F )  |  ( `' x " ( _V 
\  { ( `' G `  Z ) } ) )  e. 
Fin } )
49 eqid 2382 . . . . . . . . . . 11  |-  { x  e.  ( dom  G  ^m  dom  F )  |  ( `' x " ( _V 
\  1o ) )  e.  Fin }  =  { x  e.  ( dom  G  ^m  dom  F
)  |  ( `' x " ( _V 
\  1o ) )  e.  Fin }
5015oion 7876 . . . . . . . . . . . 12  |-  ( B  e.  _V  ->  dom  G  e.  On )
5150ad2antrl 725 . . . . . . . . . . 11  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  dom  G  e.  On )
527oion 7876 . . . . . . . . . . . 12  |-  ( A  e.  _V  ->  dom  F  e.  On )
5352ad2antll 726 . . . . . . . . . . 11  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  dom  F  e.  On )
5449, 51, 53cantnfdmOLD 7996 . . . . . . . . . 10  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  dom  ( dom  G CNF  dom  F )  =  { x  e.  ( dom  G  ^m  dom  F )  |  ( `' x " ( _V 
\  1o ) )  e.  Fin } )
5529fveq2i 5777 . . . . . . . . . . . . . . . . 17  |-  ( `' G `  Z )  =  ( `' G `  ( G `  (/) ) )
56 f1ocnvfv1 6083 . . . . . . . . . . . . . . . . . 18  |-  ( ( G : dom  G -1-1-onto-> B  /\  (/)  e.  dom  G
)  ->  ( `' G `  ( G `  (/) ) )  =  (/) )
5730, 43, 56syl2anc 659 . . . . . . . . . . . . . . . . 17  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  -> 
( `' G `  ( G `  (/) ) )  =  (/) )
5855, 57syl5eq 2435 . . . . . . . . . . . . . . . 16  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  -> 
( `' G `  Z )  =  (/) )
5958sneqd 3956 . . . . . . . . . . . . . . 15  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  { ( `' G `  Z ) }  =  { (/) } )
60 df1o2 7060 . . . . . . . . . . . . . . 15  |-  1o  =  { (/) }
6159, 60syl6eqr 2441 . . . . . . . . . . . . . 14  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  { ( `' G `  Z ) }  =  1o )
6261difeq2d 3536 . . . . . . . . . . . . 13  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  -> 
( _V  \  {
( `' G `  Z ) } )  =  ( _V  \  1o ) )
6362imaeq2d 5249 . . . . . . . . . . . 12  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  -> 
( `' x "
( _V  \  {
( `' G `  Z ) } ) )  =  ( `' x " ( _V 
\  1o ) ) )
6463eleq1d 2451 . . . . . . . . . . 11  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  -> 
( ( `' x " ( _V  \  {
( `' G `  Z ) } ) )  e.  Fin  <->  ( `' x " ( _V  \  1o ) )  e.  Fin ) )
6564rabbidv 3026 . . . . . . . . . 10  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  { x  e.  ( dom  G  ^m  dom  F
)  |  ( `' x " ( _V 
\  { ( `' G `  Z ) } ) )  e. 
Fin }  =  {
x  e.  ( dom 
G  ^m  dom  F )  |  ( `' x " ( _V  \  1o ) )  e.  Fin } )
6654, 65eqtr4d 2426 . . . . . . . . 9  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  dom  ( dom  G CNF  dom  F )  =  { x  e.  ( dom  G  ^m  dom  F )  |  ( `' x " ( _V 
\  { ( `' G `  Z ) } ) )  e. 
Fin } )
67 f1oeq3 5717 . . . . . . . . 9  |-  ( dom  ( dom  G CNF  dom  F )  =  { x  e.  ( dom  G  ^m  dom  F )  |  ( `' x " ( _V 
\  { ( `' G `  Z ) } ) )  e. 
Fin }  ->  ( ( f  e.  U  |->  ( `' G  o.  (
f  o.  F ) ) ) : U -1-1-onto-> dom  ( dom  G CNF  dom  F
)  <->  ( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) : U -1-1-onto-> { x  e.  ( dom  G  ^m  dom  F )  |  ( `' x " ( _V 
\  { ( `' G `  Z ) } ) )  e. 
Fin } ) )
6866, 67syl 16 . . . . . . . 8  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  -> 
( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) : U -1-1-onto-> dom  ( dom  G CNF  dom 
F )  <->  ( f  e.  U  |->  ( `' G  o.  ( f  o.  F ) ) ) : U -1-1-onto-> { x  e.  ( dom  G  ^m  dom  F )  |  ( `' x " ( _V 
\  { ( `' G `  Z ) } ) )  e. 
Fin } ) )
6948, 68mpbird 232 . . . . . . 7  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  -> 
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) : U -1-1-onto-> dom  ( dom  G CNF  dom 
F ) )
70 eqid 2382 . . . . . . . . 9  |-  dom  ( dom  G CNF  dom  F )  =  dom  ( dom  G CNF  dom 
F )
71 eqid 2382 . . . . . . . . 9  |-  { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  =  { <. a ,  b
>.  |  E. c  e.  dom  F ( ( a `  c )  e.  ( b `  c )  /\  A. d  e.  dom  F ( c  e.  d  -> 
( a `  d
)  =  ( b `
 d ) ) ) }
7270, 51, 53, 71oemapwe 8026 . . . . . . . 8  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  -> 
( { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  We  dom  ( dom  G CNF  dom  F )  /\  dom OrdIso ( {
<. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c )  e.  ( b `  c )  /\  A. d  e. 
dom  F ( c  e.  d  ->  (
a `  d )  =  ( b `  d ) ) ) } ,  dom  ( dom  G CNF  dom  F )
)  =  ( dom 
G  ^o  dom  F ) ) )
7372simpld 457 . . . . . . 7  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  { <. a ,  b
>.  |  E. c  e.  dom  F ( ( a `  c )  e.  ( b `  c )  /\  A. d  e.  dom  F ( c  e.  d  -> 
( a `  d
)  =  ( b `
 d ) ) ) }  We  dom  ( dom  G CNF  dom  F
) )
74 eqid 2382 . . . . . . . 8  |-  { <. x ,  y >.  |  ( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  x ) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y ) }  =  { <. x ,  y
>.  |  ( (
f  e.  U  |->  ( `' G  o.  (
f  o.  F ) ) ) `  x
) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y ) }
7574f1owe 6150 . . . . . . 7  |-  ( ( f  e.  U  |->  ( `' G  o.  (
f  o.  F ) ) ) : U -1-1-onto-> dom  ( dom  G CNF  dom  F
)  ->  ( { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c )  e.  ( b `  c )  /\  A. d  e. 
dom  F ( c  e.  d  ->  (
a `  d )  =  ( b `  d ) ) ) }  We  dom  ( dom  G CNF  dom  F )  ->  { <. x ,  y
>.  |  ( (
f  e.  U  |->  ( `' G  o.  (
f  o.  F ) ) ) `  x
) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y ) }  We  U ) )
7669, 73, 75sylc 60 . . . . . 6  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  { <. x ,  y
>.  |  ( (
f  e.  U  |->  ( `' G  o.  (
f  o.  F ) ) ) `  x
) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y ) }  We  U )
77 weinxp 4981 . . . . . 6  |-  ( {
<. x ,  y >.  |  ( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F ) ) ) `  x ) { <. a ,  b
>.  |  E. c  e.  dom  F ( ( a `  c )  e.  ( b `  c )  /\  A. d  e.  dom  F ( c  e.  d  -> 
( a `  d
)  =  ( b `
 d ) ) ) }  ( ( f  e.  U  |->  ( `' G  o.  (
f  o.  F ) ) ) `  y
) }  We  U  <->  ( { <. x ,  y
>.  |  ( (
f  e.  U  |->  ( `' G  o.  (
f  o.  F ) ) ) `  x
) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y ) }  i^i  ( U  X.  U
) )  We  U
)
7876, 77sylib 196 . . . . 5  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  -> 
( { <. x ,  y >.  |  ( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  x ) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y ) }  i^i  ( U  X.  U
) )  We  U
)
7911adantr 463 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  F : dom  F -1-1-onto-> A )
80 f1ofn 5725 . . . . . . . . . . . 12  |-  ( F : dom  F -1-1-onto-> A  ->  F  Fn  dom  F )
81 fveq2 5774 . . . . . . . . . . . . . . 15  |-  ( z  =  ( F `  c )  ->  (
x `  z )  =  ( x `  ( F `  c ) ) )
82 fveq2 5774 . . . . . . . . . . . . . . 15  |-  ( z  =  ( F `  c )  ->  (
y `  z )  =  ( y `  ( F `  c ) ) )
8381, 82breq12d 4380 . . . . . . . . . . . . . 14  |-  ( z  =  ( F `  c )  ->  (
( x `  z
) S ( y `
 z )  <->  ( x `  ( F `  c
) ) S ( y `  ( F `
 c ) ) ) )
84 breq1 4370 . . . . . . . . . . . . . . . 16  |-  ( z  =  ( F `  c )  ->  (
z R w  <->  ( F `  c ) R w ) )
8584imbi1d 315 . . . . . . . . . . . . . . 15  |-  ( z  =  ( F `  c )  ->  (
( z R w  ->  ( x `  w )  =  ( y `  w ) )  <->  ( ( F `
 c ) R w  ->  ( x `  w )  =  ( y `  w ) ) ) )
8685ralbidv 2821 . . . . . . . . . . . . . 14  |-  ( z  =  ( F `  c )  ->  ( A. w  e.  A  ( z R w  ->  ( x `  w )  =  ( y `  w ) )  <->  A. w  e.  A  ( ( F `  c ) R w  ->  ( x `  w )  =  ( y `  w ) ) ) )
8783, 86anbi12d 708 . . . . . . . . . . . . 13  |-  ( z  =  ( F `  c )  ->  (
( ( x `  z ) S ( y `  z )  /\  A. w  e.  A  ( z R w  ->  ( x `  w )  =  ( y `  w ) ) )  <->  ( (
x `  ( F `  c ) ) S ( y `  ( F `  c )
)  /\  A. w  e.  A  ( ( F `  c ) R w  ->  ( x `
 w )  =  ( y `  w
) ) ) ) )
8887rexrn 5935 . . . . . . . . . . . 12  |-  ( F  Fn  dom  F  -> 
( E. z  e. 
ran  F ( ( x `  z ) S ( y `  z )  /\  A. w  e.  A  (
z R w  -> 
( x `  w
)  =  ( y `
 w ) ) )  <->  E. c  e.  dom  F ( ( x `  ( F `  c ) ) S ( y `
 ( F `  c ) )  /\  A. w  e.  A  ( ( F `  c
) R w  -> 
( x `  w
)  =  ( y `
 w ) ) ) ) )
8979, 80, 883syl 20 . . . . . . . . . . 11  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  ( E. z  e.  ran  F ( ( x `  z ) S ( y `  z )  /\  A. w  e.  A  ( z R w  ->  ( x `  w )  =  ( y `  w ) ) )  <->  E. c  e.  dom  F ( ( x `  ( F `
 c ) ) S ( y `  ( F `  c ) )  /\  A. w  e.  A  ( ( F `  c ) R w  ->  ( x `
 w )  =  ( y `  w
) ) ) ) )
90 f1ofo 5731 . . . . . . . . . . . . 13  |-  ( F : dom  F -1-1-onto-> A  ->  F : dom  F -onto-> A
)
91 forn 5706 . . . . . . . . . . . . 13  |-  ( F : dom  F -onto-> A  ->  ran  F  =  A )
9279, 90, 913syl 20 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  ran  F  =  A )
9392rexeqdv 2986 . . . . . . . . . . 11  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  ( E. z  e.  ran  F ( ( x `  z ) S ( y `  z )  /\  A. w  e.  A  ( z R w  ->  ( x `  w )  =  ( y `  w ) ) )  <->  E. z  e.  A  ( (
x `  z ) S ( y `  z )  /\  A. w  e.  A  (
z R w  -> 
( x `  w
)  =  ( y `
 w ) ) ) ) )
9426adantr 463 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  G  e.  _V )
95 cnvexg 6645 . . . . . . . . . . . . . . 15  |-  ( G  e.  _V  ->  `' G  e.  _V )
9694, 95syl 16 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  `' G  e.  _V )
97 vex 3037 . . . . . . . . . . . . . . 15  |-  x  e. 
_V
9822adantr 463 . . . . . . . . . . . . . . 15  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  F  e.  _V )
99 coexg 6650 . . . . . . . . . . . . . . 15  |-  ( ( x  e.  _V  /\  F  e.  _V )  ->  ( x  o.  F
)  e.  _V )
10097, 98, 99sylancr 661 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  (
x  o.  F )  e.  _V )
101 coexg 6650 . . . . . . . . . . . . . 14  |-  ( ( `' G  e.  _V  /\  ( x  o.  F
)  e.  _V )  ->  ( `' G  o.  ( x  o.  F
) )  e.  _V )
10296, 100, 101syl2anc 659 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  ( `' G  o.  (
x  o.  F ) )  e.  _V )
103 vex 3037 . . . . . . . . . . . . . . 15  |-  y  e. 
_V
104 coexg 6650 . . . . . . . . . . . . . . 15  |-  ( ( y  e.  _V  /\  F  e.  _V )  ->  ( y  o.  F
)  e.  _V )
105103, 98, 104sylancr 661 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  (
y  o.  F )  e.  _V )
106 coexg 6650 . . . . . . . . . . . . . 14  |-  ( ( `' G  e.  _V  /\  ( y  o.  F
)  e.  _V )  ->  ( `' G  o.  ( y  o.  F
) )  e.  _V )
10796, 105, 106syl2anc 659 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  ( `' G  o.  (
y  o.  F ) )  e.  _V )
108 fveq1 5773 . . . . . . . . . . . . . . . . 17  |-  ( a  =  ( `' G  o.  ( x  o.  F
) )  ->  (
a `  c )  =  ( ( `' G  o.  ( x  o.  F ) ) `
 c ) )
109 fveq1 5773 . . . . . . . . . . . . . . . . 17  |-  ( b  =  ( `' G  o.  ( y  o.  F
) )  ->  (
b `  c )  =  ( ( `' G  o.  ( y  o.  F ) ) `
 c ) )
110 eleq12 2458 . . . . . . . . . . . . . . . . 17  |-  ( ( ( a `  c
)  =  ( ( `' G  o.  (
x  o.  F ) ) `  c )  /\  ( b `  c )  =  ( ( `' G  o.  ( y  o.  F
) ) `  c
) )  ->  (
( a `  c
)  e.  ( b `
 c )  <->  ( ( `' G  o.  (
x  o.  F ) ) `  c )  e.  ( ( `' G  o.  ( y  o.  F ) ) `
 c ) ) )
111108, 109, 110syl2an 475 . . . . . . . . . . . . . . . 16  |-  ( ( a  =  ( `' G  o.  ( x  o.  F ) )  /\  b  =  ( `' G  o.  (
y  o.  F ) ) )  ->  (
( a `  c
)  e.  ( b `
 c )  <->  ( ( `' G  o.  (
x  o.  F ) ) `  c )  e.  ( ( `' G  o.  ( y  o.  F ) ) `
 c ) ) )
112 fveq1 5773 . . . . . . . . . . . . . . . . . . 19  |-  ( a  =  ( `' G  o.  ( x  o.  F
) )  ->  (
a `  d )  =  ( ( `' G  o.  ( x  o.  F ) ) `
 d ) )
113 fveq1 5773 . . . . . . . . . . . . . . . . . . 19  |-  ( b  =  ( `' G  o.  ( y  o.  F
) )  ->  (
b `  d )  =  ( ( `' G  o.  ( y  o.  F ) ) `
 d ) )
114112, 113eqeqan12d 2405 . . . . . . . . . . . . . . . . . 18  |-  ( ( a  =  ( `' G  o.  ( x  o.  F ) )  /\  b  =  ( `' G  o.  (
y  o.  F ) ) )  ->  (
( a `  d
)  =  ( b `
 d )  <->  ( ( `' G  o.  (
x  o.  F ) ) `  d )  =  ( ( `' G  o.  ( y  o.  F ) ) `
 d ) ) )
115114imbi2d 314 . . . . . . . . . . . . . . . . 17  |-  ( ( a  =  ( `' G  o.  ( x  o.  F ) )  /\  b  =  ( `' G  o.  (
y  o.  F ) ) )  ->  (
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) )  <->  ( c  e.  d  ->  ( ( `' G  o.  (
x  o.  F ) ) `  d )  =  ( ( `' G  o.  ( y  o.  F ) ) `
 d ) ) ) )
116115ralbidv 2821 . . . . . . . . . . . . . . . 16  |-  ( ( a  =  ( `' G  o.  ( x  o.  F ) )  /\  b  =  ( `' G  o.  (
y  o.  F ) ) )  ->  ( A. d  e.  dom  F ( c  e.  d  ->  ( a `  d )  =  ( b `  d ) )  <->  A. d  e.  dom  F ( c  e.  d  ->  ( ( `' G  o.  ( x  o.  F ) ) `
 d )  =  ( ( `' G  o.  ( y  o.  F
) ) `  d
) ) ) )
117111, 116anbi12d 708 . . . . . . . . . . . . . . 15  |-  ( ( a  =  ( `' G  o.  ( x  o.  F ) )  /\  b  =  ( `' G  o.  (
y  o.  F ) ) )  ->  (
( ( a `  c )  e.  ( b `  c )  /\  A. d  e. 
dom  F ( c  e.  d  ->  (
a `  d )  =  ( b `  d ) ) )  <-> 
( ( ( `' G  o.  ( x  o.  F ) ) `
 c )  e.  ( ( `' G  o.  ( y  o.  F
) ) `  c
)  /\  A. d  e.  dom  F ( c  e.  d  ->  (
( `' G  o.  ( x  o.  F
) ) `  d
)  =  ( ( `' G  o.  (
y  o.  F ) ) `  d ) ) ) ) )
118117rexbidv 2893 . . . . . . . . . . . . . 14  |-  ( ( a  =  ( `' G  o.  ( x  o.  F ) )  /\  b  =  ( `' G  o.  (
y  o.  F ) ) )  ->  ( E. c  e.  dom  F ( ( a `  c )  e.  ( b `  c )  /\  A. d  e. 
dom  F ( c  e.  d  ->  (
a `  d )  =  ( b `  d ) ) )  <->  E. c  e.  dom  F ( ( ( `' G  o.  ( x  o.  F ) ) `
 c )  e.  ( ( `' G  o.  ( y  o.  F
) ) `  c
)  /\  A. d  e.  dom  F ( c  e.  d  ->  (
( `' G  o.  ( x  o.  F
) ) `  d
)  =  ( ( `' G  o.  (
y  o.  F ) ) `  d ) ) ) ) )
119118, 71brabga 4675 . . . . . . . . . . . . 13  |-  ( ( ( `' G  o.  ( x  o.  F
) )  e.  _V  /\  ( `' G  o.  ( y  o.  F
) )  e.  _V )  ->  ( ( `' G  o.  ( x  o.  F ) ) { <. a ,  b
>.  |  E. c  e.  dom  F ( ( a `  c )  e.  ( b `  c )  /\  A. d  e.  dom  F ( c  e.  d  -> 
( a `  d
)  =  ( b `
 d ) ) ) }  ( `' G  o.  ( y  o.  F ) )  <->  E. c  e.  dom  F ( ( ( `' G  o.  ( x  o.  F ) ) `
 c )  e.  ( ( `' G  o.  ( y  o.  F
) ) `  c
)  /\  A. d  e.  dom  F ( c  e.  d  ->  (
( `' G  o.  ( x  o.  F
) ) `  d
)  =  ( ( `' G  o.  (
y  o.  F ) ) `  d ) ) ) ) )
120102, 107, 119syl2anc 659 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  (
( `' G  o.  ( x  o.  F
) ) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  ( `' G  o.  (
y  o.  F ) )  <->  E. c  e.  dom  F ( ( ( `' G  o.  ( x  o.  F ) ) `
 c )  e.  ( ( `' G  o.  ( y  o.  F
) ) `  c
)  /\  A. d  e.  dom  F ( c  e.  d  ->  (
( `' G  o.  ( x  o.  F
) ) `  d
)  =  ( ( `' G  o.  (
y  o.  F ) ) `  d ) ) ) ) )
121 simprl 754 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  x  e.  U )
122 coeq1 5073 . . . . . . . . . . . . . . . 16  |-  ( f  =  x  ->  (
f  o.  F )  =  ( x  o.  F ) )
123122coeq2d 5078 . . . . . . . . . . . . . . 15  |-  ( f  =  x  ->  ( `' G  o.  (
f  o.  F ) )  =  ( `' G  o.  ( x  o.  F ) ) )
124 eqid 2382 . . . . . . . . . . . . . . 15  |-  ( f  e.  U  |->  ( `' G  o.  ( f  o.  F ) ) )  =  ( f  e.  U  |->  ( `' G  o.  ( f  o.  F ) ) )
125123, 124fvmptg 5855 . . . . . . . . . . . . . 14  |-  ( ( x  e.  U  /\  ( `' G  o.  (
x  o.  F ) )  e.  _V )  ->  ( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  x )  =  ( `' G  o.  (
x  o.  F ) ) )
126121, 102, 125syl2anc 659 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  x )  =  ( `' G  o.  (
x  o.  F ) ) )
127 simprr 755 . . . . . . . . . . . . . 14  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  y  e.  U )
128 coeq1 5073 . . . . . . . . . . . . . . . 16  |-  ( f  =  y  ->  (
f  o.  F )  =  ( y  o.  F ) )
129128coeq2d 5078 . . . . . . . . . . . . . . 15  |-  ( f  =  y  ->  ( `' G  o.  (
f  o.  F ) )  =  ( `' G  o.  ( y  o.  F ) ) )
130129, 124fvmptg 5855 . . . . . . . . . . . . . 14  |-  ( ( y  e.  U  /\  ( `' G  o.  (
y  o.  F ) )  e.  _V )  ->  ( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y )  =  ( `' G  o.  (
y  o.  F ) ) )
131127, 107, 130syl2anc 659 . . . . . . . . . . . . 13  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y )  =  ( `' G  o.  (
y  o.  F ) ) )
132126, 131breq12d 4380 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  (
( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  x ) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y )  <->  ( `' G  o.  ( x  o.  F ) ) {
<. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c )  e.  ( b `  c )  /\  A. d  e. 
dom  F ( c  e.  d  ->  (
a `  d )  =  ( b `  d ) ) ) }  ( `' G  o.  ( y  o.  F
) ) ) )
13317ad2antrr 723 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  G  Isom  _E  ,  S  ( dom  G ,  B ) )
134 isocnv 6127 . . . . . . . . . . . . . . . . . 18  |-  ( G 
Isom  _E  ,  S  ( dom  G ,  B
)  ->  `' G  Isom  S ,  _E  ( B ,  dom  G ) )
135133, 134syl 16 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  `' G  Isom  S ,  _E  ( B ,  dom  G ) )
136 ssrab2 3499 . . . . . . . . . . . . . . . . . . . . 21  |-  { x  e.  ( B  ^m  A
)  |  ( `' x " ( _V 
\  { Z }
) )  e.  Fin } 
C_  ( B  ^m  A )
1371, 136eqsstri 3447 . . . . . . . . . . . . . . . . . . . 20  |-  U  C_  ( B  ^m  A )
138137, 121sseldi 3415 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  x  e.  ( B  ^m  A
) )
139 elmapi 7359 . . . . . . . . . . . . . . . . . . 19  |-  ( x  e.  ( B  ^m  A )  ->  x : A --> B )
140138, 139syl 16 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  x : A --> B )
1417oif 7870 . . . . . . . . . . . . . . . . . . 19  |-  F : dom  F --> A
142141ffvelrni 5932 . . . . . . . . . . . . . . . . . 18  |-  ( c  e.  dom  F  -> 
( F `  c
)  e.  A )
143 ffvelrn 5931 . . . . . . . . . . . . . . . . . 18  |-  ( ( x : A --> B  /\  ( F `  c )  e.  A )  -> 
( x `  ( F `  c )
)  e.  B )
144140, 142, 143syl2an 475 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( x `  ( F `  c ) )  e.  B )
145137, 127sseldi 3415 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  y  e.  ( B  ^m  A
) )
146 elmapi 7359 . . . . . . . . . . . . . . . . . . 19  |-  ( y  e.  ( B  ^m  A )  ->  y : A --> B )
147145, 146syl 16 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  y : A --> B )
148 ffvelrn 5931 . . . . . . . . . . . . . . . . . 18  |-  ( ( y : A --> B  /\  ( F `  c )  e.  A )  -> 
( y `  ( F `  c )
)  e.  B )
149147, 142, 148syl2an 475 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( y `  ( F `  c ) )  e.  B )
150 isorel 6123 . . . . . . . . . . . . . . . . 17  |-  ( ( `' G  Isom  S ,  _E  ( B ,  dom  G )  /\  ( ( x `  ( F `
 c ) )  e.  B  /\  (
y `  ( F `  c ) )  e.  B ) )  -> 
( ( x `  ( F `  c ) ) S ( y `
 ( F `  c ) )  <->  ( `' G `  ( x `  ( F `  c
) ) )  _E  ( `' G `  ( y `  ( F `  c )
) ) ) )
151135, 144, 149, 150syl12anc 1224 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( ( x `
 ( F `  c ) ) S ( y `  ( F `  c )
)  <->  ( `' G `  ( x `  ( F `  c )
) )  _E  ( `' G `  ( y `
 ( F `  c ) ) ) ) )
152 fvex 5784 . . . . . . . . . . . . . . . . 17  |-  ( `' G `  ( y `
 ( F `  c ) ) )  e.  _V
153152epelc 4707 . . . . . . . . . . . . . . . 16  |-  ( ( `' G `  ( x `
 ( F `  c ) ) )  _E  ( `' G `  ( y `  ( F `  c )
) )  <->  ( `' G `  ( x `  ( F `  c
) ) )  e.  ( `' G `  ( y `  ( F `  c )
) ) )
154151, 153syl6bb 261 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( ( x `
 ( F `  c ) ) S ( y `  ( F `  c )
)  <->  ( `' G `  ( x `  ( F `  c )
) )  e.  ( `' G `  ( y `
 ( F `  c ) ) ) ) )
155140adantr 463 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  x : A --> B )
156 fco 5649 . . . . . . . . . . . . . . . . . . 19  |-  ( ( x : A --> B  /\  F : dom  F --> A )  ->  ( x  o.  F ) : dom  F --> B )
157155, 141, 156sylancl 660 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( x  o.  F ) : dom  F --> B )
158 fvco3 5851 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( x  o.  F
) : dom  F --> B  /\  c  e.  dom  F )  ->  ( ( `' G  o.  (
x  o.  F ) ) `  c )  =  ( `' G `  ( ( x  o.  F ) `  c
) ) )
159157, 158sylancom 665 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( ( `' G  o.  ( x  o.  F ) ) `
 c )  =  ( `' G `  ( ( x  o.  F ) `  c
) ) )
160 simpr 459 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  c  e.  dom  F )
161 fvco3 5851 . . . . . . . . . . . . . . . . . . 19  |-  ( ( F : dom  F --> A  /\  c  e.  dom  F )  ->  ( (
x  o.  F ) `
 c )  =  ( x `  ( F `  c )
) )
162141, 160, 161sylancr 661 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( ( x  o.  F ) `  c )  =  ( x `  ( F `
 c ) ) )
163162fveq2d 5778 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( `' G `  ( ( x  o.  F ) `  c
) )  =  ( `' G `  ( x `
 ( F `  c ) ) ) )
164159, 163eqtrd 2423 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( ( `' G  o.  ( x  o.  F ) ) `
 c )  =  ( `' G `  ( x `  ( F `  c )
) ) )
165147adantr 463 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  y : A --> B )
166 fco 5649 . . . . . . . . . . . . . . . . . . 19  |-  ( ( y : A --> B  /\  F : dom  F --> A )  ->  ( y  o.  F ) : dom  F --> B )
167165, 141, 166sylancl 660 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( y  o.  F ) : dom  F --> B )
168 fvco3 5851 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( y  o.  F
) : dom  F --> B  /\  c  e.  dom  F )  ->  ( ( `' G  o.  (
y  o.  F ) ) `  c )  =  ( `' G `  ( ( y  o.  F ) `  c
) ) )
169167, 168sylancom 665 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( ( `' G  o.  ( y  o.  F ) ) `
 c )  =  ( `' G `  ( ( y  o.  F ) `  c
) ) )
170 fvco3 5851 . . . . . . . . . . . . . . . . . . 19  |-  ( ( F : dom  F --> A  /\  c  e.  dom  F )  ->  ( (
y  o.  F ) `
 c )  =  ( y `  ( F `  c )
) )
171141, 160, 170sylancr 661 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( ( y  o.  F ) `  c )  =  ( y `  ( F `
 c ) ) )
172171fveq2d 5778 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( `' G `  ( ( y  o.  F ) `  c
) )  =  ( `' G `  ( y `
 ( F `  c ) ) ) )
173169, 172eqtrd 2423 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( ( `' G  o.  ( y  o.  F ) ) `
 c )  =  ( `' G `  ( y `  ( F `  c )
) ) )
174164, 173eleq12d 2464 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( ( ( `' G  o.  (
x  o.  F ) ) `  c )  e.  ( ( `' G  o.  ( y  o.  F ) ) `
 c )  <->  ( `' G `  ( x `  ( F `  c
) ) )  e.  ( `' G `  ( y `  ( F `  c )
) ) ) )
175154, 174bitr4d 256 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( ( x `
 ( F `  c ) ) S ( y `  ( F `  c )
)  <->  ( ( `' G  o.  ( x  o.  F ) ) `
 c )  e.  ( ( `' G  o.  ( y  o.  F
) ) `  c
) ) )
17692raleqdv 2985 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  ( A. w  e.  ran  F ( ( F `  c ) R w  ->  ( x `  w )  =  ( y `  w ) )  <->  A. w  e.  A  ( ( F `  c ) R w  ->  ( x `  w )  =  ( y `  w ) ) ) )
177 breq2 4371 . . . . . . . . . . . . . . . . . . . 20  |-  ( w  =  ( F `  d )  ->  (
( F `  c
) R w  <->  ( F `  c ) R ( F `  d ) ) )
178 fveq2 5774 . . . . . . . . . . . . . . . . . . . . 21  |-  ( w  =  ( F `  d )  ->  (
x `  w )  =  ( x `  ( F `  d ) ) )
179 fveq2 5774 . . . . . . . . . . . . . . . . . . . . 21  |-  ( w  =  ( F `  d )  ->  (
y `  w )  =  ( y `  ( F `  d ) ) )
180178, 179eqeq12d 2404 . . . . . . . . . . . . . . . . . . . 20  |-  ( w  =  ( F `  d )  ->  (
( x `  w
)  =  ( y `
 w )  <->  ( x `  ( F `  d
) )  =  ( y `  ( F `
 d ) ) ) )
181177, 180imbi12d 318 . . . . . . . . . . . . . . . . . . 19  |-  ( w  =  ( F `  d )  ->  (
( ( F `  c ) R w  ->  ( x `  w )  =  ( y `  w ) )  <->  ( ( F `
 c ) R ( F `  d
)  ->  ( x `  ( F `  d
) )  =  ( y `  ( F `
 d ) ) ) ) )
182181ralrn 5936 . . . . . . . . . . . . . . . . . 18  |-  ( F  Fn  dom  F  -> 
( A. w  e. 
ran  F ( ( F `  c ) R w  ->  (
x `  w )  =  ( y `  w ) )  <->  A. d  e.  dom  F ( ( F `  c ) R ( F `  d )  ->  (
x `  ( F `  d ) )  =  ( y `  ( F `  d )
) ) ) )
18379, 80, 1823syl 20 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  ( A. w  e.  ran  F ( ( F `  c ) R w  ->  ( x `  w )  =  ( y `  w ) )  <->  A. d  e.  dom  F ( ( F `  c ) R ( F `  d )  ->  ( x `  ( F `  d ) )  =  ( y `
 ( F `  d ) ) ) ) )
184176, 183bitr3d 255 . . . . . . . . . . . . . . . 16  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  ( A. w  e.  A  ( ( F `  c ) R w  ->  ( x `  w )  =  ( y `  w ) )  <->  A. d  e.  dom  F ( ( F `  c ) R ( F `  d )  ->  ( x `  ( F `  d ) )  =  ( y `
 ( F `  d ) ) ) ) )
185184adantr 463 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( A. w  e.  A  ( ( F `  c ) R w  ->  ( x `
 w )  =  ( y `  w
) )  <->  A. d  e.  dom  F ( ( F `  c ) R ( F `  d )  ->  (
x `  ( F `  d ) )  =  ( y `  ( F `  d )
) ) ) )
186 epel 4708 . . . . . . . . . . . . . . . . . . 19  |-  ( c  _E  d  <->  c  e.  d )
1879ad2antrr 723 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  F  Isom  _E  ,  R  ( dom  F ,  A
) )
188 isorel 6123 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( F  Isom  _E  ,  R  ( dom  F ,  A
)  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  ( c  _E  d  <->  ( F `  c ) R ( F `  d ) ) )
189187, 188sylancom 665 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  (
c  _E  d  <->  ( F `  c ) R ( F `  d ) ) )
190186, 189syl5bbr 259 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  (
c  e.  d  <->  ( F `  c ) R ( F `  d ) ) )
191157adantrr 714 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  (
x  o.  F ) : dom  F --> B )
192 simprr 755 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  d  e.  dom  F )
193 fvco3 5851 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( x  o.  F
) : dom  F --> B  /\  d  e.  dom  F )  ->  ( ( `' G  o.  (
x  o.  F ) ) `  d )  =  ( `' G `  ( ( x  o.  F ) `  d
) ) )
194191, 192, 193syl2anc 659 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  (
( `' G  o.  ( x  o.  F
) ) `  d
)  =  ( `' G `  ( ( x  o.  F ) `
 d ) ) )
195167adantrr 714 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  (
y  o.  F ) : dom  F --> B )
196 fvco3 5851 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( y  o.  F
) : dom  F --> B  /\  d  e.  dom  F )  ->  ( ( `' G  o.  (
y  o.  F ) ) `  d )  =  ( `' G `  ( ( y  o.  F ) `  d
) ) )
197195, 192, 196syl2anc 659 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  (
( `' G  o.  ( y  o.  F
) ) `  d
)  =  ( `' G `  ( ( y  o.  F ) `
 d ) ) )
198194, 197eqeq12d 2404 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  (
( ( `' G  o.  ( x  o.  F
) ) `  d
)  =  ( ( `' G  o.  (
y  o.  F ) ) `  d )  <-> 
( `' G `  ( ( x  o.  F ) `  d
) )  =  ( `' G `  ( ( y  o.  F ) `
 d ) ) ) )
19930ad2antrr 723 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  G : dom  G -1-1-onto-> B )
200 f1of1 5723 . . . . . . . . . . . . . . . . . . . . 21  |-  ( `' G : B -1-1-onto-> dom  G  ->  `' G : B -1-1-> dom  G )
201199, 19, 2003syl 20 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  `' G : B -1-1-> dom  G
)
202191, 192ffvelrnd 5934 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  (
( x  o.  F
) `  d )  e.  B )
203195, 192ffvelrnd 5934 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  (
( y  o.  F
) `  d )  e.  B )
204 f1fveq 6071 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( `' G : B -1-1-> dom  G  /\  ( ( ( x  o.  F ) `
 d )  e.  B  /\  ( ( y  o.  F ) `
 d )  e.  B ) )  -> 
( ( `' G `  ( ( x  o.  F ) `  d
) )  =  ( `' G `  ( ( y  o.  F ) `
 d ) )  <-> 
( ( x  o.  F ) `  d
)  =  ( ( y  o.  F ) `
 d ) ) )
205201, 202, 203, 204syl12anc 1224 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  (
( `' G `  ( ( x  o.  F ) `  d
) )  =  ( `' G `  ( ( y  o.  F ) `
 d ) )  <-> 
( ( x  o.  F ) `  d
)  =  ( ( y  o.  F ) `
 d ) ) )
206 fvco3 5851 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( F : dom  F --> A  /\  d  e.  dom  F )  ->  ( (
x  o.  F ) `
 d )  =  ( x `  ( F `  d )
) )
207141, 192, 206sylancr 661 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  (
( x  o.  F
) `  d )  =  ( x `  ( F `  d ) ) )
208 fvco3 5851 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( F : dom  F --> A  /\  d  e.  dom  F )  ->  ( (
y  o.  F ) `
 d )  =  ( y `  ( F `  d )
) )
209141, 192, 208sylancr 661 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  (
( y  o.  F
) `  d )  =  ( y `  ( F `  d ) ) )
210207, 209eqeq12d 2404 . . . . . . . . . . . . . . . . . . 19  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  (
( ( x  o.  F ) `  d
)  =  ( ( y  o.  F ) `
 d )  <->  ( x `  ( F `  d
) )  =  ( y `  ( F `
 d ) ) ) )
211198, 205, 2103bitrd 279 . . . . . . . . . . . . . . . . . 18  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  (
( ( `' G  o.  ( x  o.  F
) ) `  d
)  =  ( ( `' G  o.  (
y  o.  F ) ) `  d )  <-> 
( x `  ( F `  d )
)  =  ( y `
 ( F `  d ) ) ) )
212190, 211imbi12d 318 . . . . . . . . . . . . . . . . 17  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  ( c  e.  dom  F  /\  d  e.  dom  F ) )  ->  (
( c  e.  d  ->  ( ( `' G  o.  ( x  o.  F ) ) `
 d )  =  ( ( `' G  o.  ( y  o.  F
) ) `  d
) )  <->  ( ( F `  c ) R ( F `  d )  ->  (
x `  ( F `  d ) )  =  ( y `  ( F `  d )
) ) ) )
213212anassrs 646 . . . . . . . . . . . . . . . 16  |-  ( ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  /\  d  e.  dom  F )  ->  ( (
c  e.  d  -> 
( ( `' G  o.  ( x  o.  F
) ) `  d
)  =  ( ( `' G  o.  (
y  o.  F ) ) `  d ) )  <->  ( ( F `
 c ) R ( F `  d
)  ->  ( x `  ( F `  d
) )  =  ( y `  ( F `
 d ) ) ) ) )
214213ralbidva 2818 . . . . . . . . . . . . . . 15  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( A. d  e.  dom  F ( c  e.  d  ->  (
( `' G  o.  ( x  o.  F
) ) `  d
)  =  ( ( `' G  o.  (
y  o.  F ) ) `  d ) )  <->  A. d  e.  dom  F ( ( F `  c ) R ( F `  d )  ->  ( x `  ( F `  d ) )  =  ( y `
 ( F `  d ) ) ) ) )
215185, 214bitr4d 256 . . . . . . . . . . . . . 14  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( A. w  e.  A  ( ( F `  c ) R w  ->  ( x `
 w )  =  ( y `  w
) )  <->  A. d  e.  dom  F ( c  e.  d  ->  (
( `' G  o.  ( x  o.  F
) ) `  d
)  =  ( ( `' G  o.  (
y  o.  F ) ) `  d ) ) ) )
216175, 215anbi12d 708 . . . . . . . . . . . . 13  |-  ( ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V )
)  /\  ( x  e.  U  /\  y  e.  U ) )  /\  c  e.  dom  F )  ->  ( ( ( x `  ( F `
 c ) ) S ( y `  ( F `  c ) )  /\  A. w  e.  A  ( ( F `  c ) R w  ->  ( x `
 w )  =  ( y `  w
) ) )  <->  ( (
( `' G  o.  ( x  o.  F
) ) `  c
)  e.  ( ( `' G  o.  (
y  o.  F ) ) `  c )  /\  A. d  e. 
dom  F ( c  e.  d  ->  (
( `' G  o.  ( x  o.  F
) ) `  d
)  =  ( ( `' G  o.  (
y  o.  F ) ) `  d ) ) ) ) )
217216rexbidva 2890 . . . . . . . . . . . 12  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  ( E. c  e.  dom  F ( ( x `  ( F `  c ) ) S ( y `
 ( F `  c ) )  /\  A. w  e.  A  ( ( F `  c
) R w  -> 
( x `  w
)  =  ( y `
 w ) ) )  <->  E. c  e.  dom  F ( ( ( `' G  o.  ( x  o.  F ) ) `
 c )  e.  ( ( `' G  o.  ( y  o.  F
) ) `  c
)  /\  A. d  e.  dom  F ( c  e.  d  ->  (
( `' G  o.  ( x  o.  F
) ) `  d
)  =  ( ( `' G  o.  (
y  o.  F ) ) `  d ) ) ) ) )
218120, 132, 2173bitr4rd 286 . . . . . . . . . . 11  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  ( E. c  e.  dom  F ( ( x `  ( F `  c ) ) S ( y `
 ( F `  c ) )  /\  A. w  e.  A  ( ( F `  c
) R w  -> 
( x `  w
)  =  ( y `
 w ) ) )  <->  ( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F ) ) ) `  x ) { <. a ,  b
>.  |  E. c  e.  dom  F ( ( a `  c )  e.  ( b `  c )  /\  A. d  e.  dom  F ( c  e.  d  -> 
( a `  d
)  =  ( b `
 d ) ) ) }  ( ( f  e.  U  |->  ( `' G  o.  (
f  o.  F ) ) ) `  y
) ) )
21989, 93, 2183bitr3d 283 . . . . . . . . . 10  |-  ( ( ( ph  /\  ( B  e.  _V  /\  A  e.  _V ) )  /\  ( x  e.  U  /\  y  e.  U
) )  ->  ( E. z  e.  A  ( ( x `  z ) S ( y `  z )  /\  A. w  e.  A  ( z R w  ->  ( x `  w )  =  ( y `  w ) ) )  <->  ( (
f  e.  U  |->  ( `' G  o.  (
f  o.  F ) ) ) `  x
) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y ) ) )
220219ex 432 . . . . . . . . 9  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  -> 
( ( x  e.  U  /\  y  e.  U )  ->  ( E. z  e.  A  ( ( x `  z ) S ( y `  z )  /\  A. w  e.  A  ( z R w  ->  ( x `  w )  =  ( y `  w ) ) )  <->  ( (
f  e.  U  |->  ( `' G  o.  (
f  o.  F ) ) ) `  x
) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y ) ) ) )
221220pm5.32rd 638 . . . . . . . 8  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  -> 
( ( E. z  e.  A  ( (
x `  z ) S ( y `  z )  /\  A. w  e.  A  (
z R w  -> 
( x `  w
)  =  ( y `
 w ) ) )  /\  ( x  e.  U  /\  y  e.  U ) )  <->  ( (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  x ) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y )  /\  (
x  e.  U  /\  y  e.  U )
) ) )
222221opabbidv 4430 . . . . . . 7  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  { <. x ,  y
>.  |  ( E. z  e.  A  (
( x `  z
) S ( y `
 z )  /\  A. w  e.  A  ( z R w  -> 
( x `  w
)  =  ( y `
 w ) ) )  /\  ( x  e.  U  /\  y  e.  U ) ) }  =  { <. x ,  y >.  |  ( ( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  x ) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y )  /\  (
x  e.  U  /\  y  e.  U )
) } )
223 wemapweOLD.t . . . . . . . . 9  |-  T  =  { <. x ,  y
>.  |  E. z  e.  A  ( (
x `  z ) S ( y `  z )  /\  A. w  e.  A  (
z R w  -> 
( x `  w
)  =  ( y `
 w ) ) ) }
224 df-xp 4919 . . . . . . . . 9  |-  ( U  X.  U )  =  { <. x ,  y
>.  |  ( x  e.  U  /\  y  e.  U ) }
225223, 224ineq12i 3612 . . . . . . . 8  |-  ( T  i^i  ( U  X.  U ) )  =  ( { <. x ,  y >.  |  E. z  e.  A  (
( x `  z
) S ( y `
 z )  /\  A. w  e.  A  ( z R w  -> 
( x `  w
)  =  ( y `
 w ) ) ) }  i^i  { <. x ,  y >.  |  ( x  e.  U  /\  y  e.  U ) } )
226 inopab 5046 . . . . . . . 8  |-  ( {
<. x ,  y >.  |  E. z  e.  A  ( ( x `  z ) S ( y `  z )  /\  A. w  e.  A  ( z R w  ->  ( x `  w )  =  ( y `  w ) ) ) }  i^i  {
<. x ,  y >.  |  ( x  e.  U  /\  y  e.  U ) } )  =  { <. x ,  y >.  |  ( E. z  e.  A  ( ( x `  z ) S ( y `  z )  /\  A. w  e.  A  ( z R w  ->  ( x `  w )  =  ( y `  w ) ) )  /\  (
x  e.  U  /\  y  e.  U )
) }
227225, 226eqtri 2411 . . . . . . 7  |-  ( T  i^i  ( U  X.  U ) )  =  { <. x ,  y
>.  |  ( E. z  e.  A  (
( x `  z
) S ( y `
 z )  /\  A. w  e.  A  ( z R w  -> 
( x `  w
)  =  ( y `
 w ) ) )  /\  ( x  e.  U  /\  y  e.  U ) ) }
228224ineq2i 3611 . . . . . . . 8  |-  ( {
<. x ,  y >.  |  ( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F ) ) ) `  x ) { <. a ,  b
>.  |  E. c  e.  dom  F ( ( a `  c )  e.  ( b `  c )  /\  A. d  e.  dom  F ( c  e.  d  -> 
( a `  d
)  =  ( b `
 d ) ) ) }  ( ( f  e.  U  |->  ( `' G  o.  (
f  o.  F ) ) ) `  y
) }  i^i  ( U  X.  U ) )  =  ( { <. x ,  y >.  |  ( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  x ) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y ) }  i^i  {
<. x ,  y >.  |  ( x  e.  U  /\  y  e.  U ) } )
229 inopab 5046 . . . . . . . 8  |-  ( {
<. x ,  y >.  |  ( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F ) ) ) `  x ) { <. a ,  b
>.  |  E. c  e.  dom  F ( ( a `  c )  e.  ( b `  c )  /\  A. d  e.  dom  F ( c  e.  d  -> 
( a `  d
)  =  ( b `
 d ) ) ) }  ( ( f  e.  U  |->  ( `' G  o.  (
f  o.  F ) ) ) `  y
) }  i^i  { <. x ,  y >.  |  ( x  e.  U  /\  y  e.  U ) } )  =  { <. x ,  y >.  |  ( ( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  x ) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y )  /\  (
x  e.  U  /\  y  e.  U )
) }
230228, 229eqtri 2411 . . . . . . 7  |-  ( {
<. x ,  y >.  |  ( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F ) ) ) `  x ) { <. a ,  b
>.  |  E. c  e.  dom  F ( ( a `  c )  e.  ( b `  c )  /\  A. d  e.  dom  F ( c  e.  d  -> 
( a `  d
)  =  ( b `
 d ) ) ) }  ( ( f  e.  U  |->  ( `' G  o.  (
f  o.  F ) ) ) `  y
) }  i^i  ( U  X.  U ) )  =  { <. x ,  y >.  |  ( ( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  x ) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y )  /\  (
x  e.  U  /\  y  e.  U )
) }
231222, 227, 2303eqtr4g 2448 . . . . . 6  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  -> 
( T  i^i  ( U  X.  U ) )  =  ( { <. x ,  y >.  |  ( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  x ) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y ) }  i^i  ( U  X.  U
) ) )
232 weeq1 4781 . . . . . 6  |-  ( ( T  i^i  ( U  X.  U ) )  =  ( { <. x ,  y >.  |  ( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  x ) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y ) }  i^i  ( U  X.  U
) )  ->  (
( T  i^i  ( U  X.  U ) )  We  U  <->  ( { <. x ,  y >.  |  ( ( f  e.  U  |->  ( `' G  o.  ( f  o.  F ) ) ) `  x ) { <. a ,  b
>.  |  E. c  e.  dom  F ( ( a `  c )  e.  ( b `  c )  /\  A. d  e.  dom  F ( c  e.  d  -> 
( a `  d
)  =  ( b `
 d ) ) ) }  ( ( f  e.  U  |->  ( `' G  o.  (
f  o.  F ) ) ) `  y
) }  i^i  ( U  X.  U ) )  We  U ) )
233231, 232syl 16 . . . . 5  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  -> 
( ( T  i^i  ( U  X.  U
) )  We  U  <->  ( { <. x ,  y
>.  |  ( (
f  e.  U  |->  ( `' G  o.  (
f  o.  F ) ) ) `  x
) { <. a ,  b >.  |  E. c  e.  dom  F ( ( a `  c
)  e.  ( b `
 c )  /\  A. d  e.  dom  F
( c  e.  d  ->  ( a `  d )  =  ( b `  d ) ) ) }  (
( f  e.  U  |->  ( `' G  o.  ( f  o.  F
) ) ) `  y ) }  i^i  ( U  X.  U
) )  We  U
) )
23478, 233mpbird 232 . . . 4  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  -> 
( T  i^i  ( U  X.  U ) )  We  U )
235 weinxp 4981 . . . 4  |-  ( T  We  U  <->  ( T  i^i  ( U  X.  U
) )  We  U
)
236234, 235sylibr 212 . . 3  |-  ( (
ph  /\  ( B  e.  _V  /\  A  e. 
_V ) )  ->  T  We  U )
237236ex 432 . 2  |-  ( ph  ->  ( ( B  e. 
_V  /\  A  e.  _V )  ->  T  We  U ) )
238 we0 4788 . . 3  |-  T  We  (/)
239 elmapex 7358 . . . . . . . . 9  |-  ( x  e.  ( B  ^m  A )  ->  ( B  e.  _V  /\  A  e.  _V ) )
240239con3i 135 . . . . . . . 8  |-  ( -.  ( B  e.  _V  /\  A  e.  _V )  ->  -.  x  e.  ( B  ^m  A ) )
241240pm2.21d 106 . . . . . . 7  |-  ( -.  ( B  e.  _V  /\  A  e.  _V )  ->  ( x  e.  ( B  ^m  A )  ->  -.  ( `' x " ( _V  \  { Z } ) )  e.  Fin ) )
242241ralrimiv 2794 . . . . . 6  |-  ( -.  ( B  e.  _V  /\  A  e.  _V )  ->  A. x  e.  ( B  ^m  A )  -.  ( `' x " ( _V  \  { Z } ) )  e. 
Fin )
243 rabeq0 3734 . . . . . 6  |-  ( { x  e.  ( B  ^m  A )  |  ( `' x "
( _V  \  { Z } ) )  e. 
Fin }  =  (/)  <->  A. x  e.  ( B  ^m  A
)  -.  ( `' x " ( _V 
\  { Z }
) )  e.  Fin )
244242, 243sylibr 212 . . . . 5  |-  ( -.  ( B  e.  _V  /\  A  e.  _V )  ->  { x  e.  ( B  ^m  A )  |  ( `' x " ( _V  \  { Z } ) )  e. 
Fin }  =  (/) )
2451, 244syl5eq 2435 . . . 4  |-  ( -.  ( B  e.  _V  /\  A  e.  _V )  ->  U  =  (/) )
246 weeq2 4782 . . . 4  |-  ( U  =  (/)  ->  ( T  We  U  <->  T  We  (/) ) )
247245, 246syl 16 . . 3  |-  ( -.  ( B  e.  _V  /\  A  e.  _V )  ->  ( T  We  U  <->  T  We  (/) ) )
248238, 247mpbiri 233 . 2  |-  ( -.  ( B  e.  _V  /\  A  e.  _V )  ->  T  We  U )
249237, 248pm2.61d1 159 1  |-  ( ph  ->  T  We  U )
Colors of variables: wff setvar class
Syntax hints:   -. wn 3    -> wi 4    <-> wb 184    /\ wa 367    = wceq 1399    e. wcel 1826    =/= wne 2577   A.wral 2732   E.wrex 2733   {crab 2736   _Vcvv 3034    \ cdif 3386    i^i cin 3388   (/)c0 3711   {csn 3944   class class class wbr 4367   {copab 4424    |-> cmpt 4425    _E cep 4703    We wwe 4751   Ord word 4791   Oncon0 4792    X. cxp 4911   `'ccnv 4912   dom cdm 4913   ran crn 4914   "cima 4916    o. ccom 4917    Fn wfn 5491   -->wf 5492   -1-1->wf1 5493   -onto->wfo 5494   -1-1-onto->wf1o 5495   ` cfv 5496    Isom wiso 5497  (class class class)co 6196   1oc1o 7041    ^o coe 7047    ^m cmap 7338   Fincfn 7435  OrdIsocoi 7849   CNF ccnf 7991
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1626  ax-4 1639  ax-5 1712  ax-6 1755  ax-7 1798  ax-8 1828  ax-9 1830  ax-10 1845  ax-11 1850  ax-12 1862  ax-13 2006  ax-ext 2360  ax-rep 4478  ax-sep 4488  ax-nul 4496  ax-pow 4543  ax-pr 4601  ax-un 6491
This theorem depends on definitions:  df-bi 185  df-or 368  df-an 369  df-3or 972  df-3an 973  df-tru 1402  df-fal 1405  df-ex 1621  df-nf 1625  df-sb 1748  df-eu 2222  df-mo 2223  df-clab 2368  df-cleq 2374  df-clel 2377  df-nfc 2532  df-ne 2579  df-ral 2737  df-rex 2738  df-reu 2739  df-rmo 2740  df-rab 2741  df-v 3036  df-sbc 3253  df-csb 3349  df-dif 3392  df-un 3394  df-in 3396  df-ss 3403  df-pss 3405  df-nul 3712  df-if 3858  df-pw 3929  df-sn 3945  df-pr 3947  df-tp 3949  df-op 3951  df-uni 4164  df-int 4200  df-iun 4245  df-br 4368  df-opab 4426  df-mpt 4427  df-tr 4461  df-eprel 4705  df-id 4709  df-po 4714  df-so 4715  df-fr 4752  df-se 4753  df-we 4754  df-ord 4795  df-on 4796  df-lim 4797  df-suc 4798  df-xp 4919  df-rel 4920  df-cnv 4921  df-co 4922  df-dm 4923  df-rn 4924  df-res 4925  df-ima 4926  df-iota 5460  df-fun 5498  df-fn 5499  df-f 5500  df-f1 5501  df-fo 5502  df-f1o 5503  df-fv 5504  df-isom 5505  df-riota 6158  df-ov 6199  df-oprab 6200  df-mpt2 6201  df-om 6600  df-1st 6699  df-2nd 6700  df-supp 6818  df-recs 6960  df-rdg 6994  df-seqom 7031  df-1o 7048  df-2o 7049  df-oadd 7052  df-omul 7053  df-oexp 7054  df-er 7229  df-map 7340  df-en 7436  df-dom 7437  df-sdom 7438  df-fin 7439  df-fsupp 7745  df-oi 7850  df-cnf 7992
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator