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

Theorem uptx 15027
Description: Universal property of the binary topological product. (Contributed by Jeff Madsen, 2-Sep-2009.) (Proof shortened by Mario Carneiro, 22-Aug-2015.)
Hypotheses
Ref Expression
uptx.1  |-  T  =  ( R  tX  S
)
uptx.2  |-  X  = 
U. R
uptx.3  |-  Y  = 
U. S
uptx.4  |-  Z  =  ( X  X.  Y
)
uptx.5  |-  P  =  ( 1st  |`  Z )
uptx.6  |-  Q  =  ( 2nd  |`  Z )
Assertion
Ref Expression
uptx  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  ->  E! h  e.  ( U  Cn  T ) ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) )
Distinct variable groups:    h, F    h, G    P, h    Q, h    R, h    T, h    S, h    U, h    h, X   
h, Y
Allowed substitution hint:    Z( h)

Proof of Theorem uptx
Dummy variables  x  z are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 eqid 2230 . . . . 5  |-  U. U  =  U. U
2 eqid 2230 . . . . 5  |-  ( x  e.  U. U  |->  <.
( F `  x
) ,  ( G `
 x ) >.
)  =  ( x  e.  U. U  |->  <.
( F `  x
) ,  ( G `
 x ) >.
)
31, 2txcnmpt 15026 . . . 4  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  -> 
( x  e.  U. U  |->  <. ( F `  x ) ,  ( G `  x )
>. )  e.  ( U  Cn  ( R  tX  S ) ) )
4 uptx.1 . . . . 5  |-  T  =  ( R  tX  S
)
54oveq2i 6034 . . . 4  |-  ( U  Cn  T )  =  ( U  Cn  ( R  tX  S ) )
63, 5eleqtrrdi 2324 . . 3  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  -> 
( x  e.  U. U  |->  <. ( F `  x ) ,  ( G `  x )
>. )  e.  ( U  Cn  T ) )
7 uptx.2 . . . . . 6  |-  X  = 
U. R
81, 7cnf 14957 . . . . 5  |-  ( F  e.  ( U  Cn  R )  ->  F : U. U --> X )
9 uptx.3 . . . . . 6  |-  Y  = 
U. S
101, 9cnf 14957 . . . . 5  |-  ( G  e.  ( U  Cn  S )  ->  G : U. U --> Y )
11 ffn 5484 . . . . . . . 8  |-  ( F : U. U --> X  ->  F  Fn  U. U )
1211adantr 276 . . . . . . 7  |-  ( ( F : U. U --> X  /\  G : U. U
--> Y )  ->  F  Fn  U. U )
13 fo1st 6325 . . . . . . . . . 10  |-  1st : _V -onto-> _V
14 fofn 5564 . . . . . . . . . 10  |-  ( 1st
: _V -onto-> _V  ->  1st 
Fn  _V )
1513, 14ax-mp 5 . . . . . . . . 9  |-  1st  Fn  _V
16 ssv 3248 . . . . . . . . 9  |-  ( X  X.  Y )  C_  _V
17 fnssres 5447 . . . . . . . . 9  |-  ( ( 1st  Fn  _V  /\  ( X  X.  Y
)  C_  _V )  ->  ( 1st  |`  ( X  X.  Y ) )  Fn  ( X  X.  Y ) )
1815, 16, 17mp2an 426 . . . . . . . 8  |-  ( 1st  |`  ( X  X.  Y
) )  Fn  ( X  X.  Y )
19 ffvelcdm 5783 . . . . . . . . . . . 12  |-  ( ( F : U. U --> X  /\  x  e.  U. U )  ->  ( F `  x )  e.  X )
20 ffvelcdm 5783 . . . . . . . . . . . 12  |-  ( ( G : U. U --> Y  /\  x  e.  U. U )  ->  ( G `  x )  e.  Y )
21 opelxpi 4759 . . . . . . . . . . . 12  |-  ( ( ( F `  x
)  e.  X  /\  ( G `  x )  e.  Y )  ->  <. ( F `  x
) ,  ( G `
 x ) >.  e.  ( X  X.  Y
) )
2219, 20, 21syl2an 289 . . . . . . . . . . 11  |-  ( ( ( F : U. U
--> X  /\  x  e. 
U. U )  /\  ( G : U. U --> Y  /\  x  e.  U. U ) )  ->  <. ( F `  x
) ,  ( G `
 x ) >.  e.  ( X  X.  Y
) )
2322anandirs 597 . . . . . . . . . 10  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  x  e.  U. U )  ->  <. ( F `  x ) ,  ( G `  x )
>.  e.  ( X  X.  Y ) )
2423fmpttd 5805 . . . . . . . . 9  |-  ( ( F : U. U --> X  /\  G : U. U
--> Y )  ->  (
x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
) : U. U --> ( X  X.  Y
) )
2524ffnd 5485 . . . . . . . 8  |-  ( ( F : U. U --> X  /\  G : U. U
--> Y )  ->  (
x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
)  Fn  U. U
)
2624frnd 5494 . . . . . . . 8  |-  ( ( F : U. U --> X  /\  G : U. U
--> Y )  ->  ran  ( x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
)  C_  ( X  X.  Y ) )
27 fnco 5442 . . . . . . . 8  |-  ( ( ( 1st  |`  ( X  X.  Y ) )  Fn  ( X  X.  Y )  /\  (
x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
)  Fn  U. U  /\  ran  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )  C_  ( X  X.  Y
) )  ->  (
( 1st  |`  ( X  X.  Y ) )  o.  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )
)  Fn  U. U
)
2818, 25, 26, 27mp3an2i 1378 . . . . . . 7  |-  ( ( F : U. U --> X  /\  G : U. U
--> Y )  ->  (
( 1st  |`  ( X  X.  Y ) )  o.  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )
)  Fn  U. U
)
29 fvco3 5720 . . . . . . . . 9  |-  ( ( ( x  e.  U. U  |->  <. ( F `  x ) ,  ( G `  x )
>. ) : U. U --> ( X  X.  Y
)  /\  z  e.  U. U )  ->  (
( ( 1st  |`  ( X  X.  Y ) )  o.  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )
) `  z )  =  ( ( 1st  |`  ( X  X.  Y
) ) `  (
( x  e.  U. U  |->  <. ( F `  x ) ,  ( G `  x )
>. ) `  z ) ) )
3024, 29sylan 283 . . . . . . . 8  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  ( ( ( 1st  |`  ( X  X.  Y ) )  o.  ( x  e.  U. U  |->  <. ( F `  x ) ,  ( G `  x )
>. ) ) `  z
)  =  ( ( 1st  |`  ( X  X.  Y ) ) `  ( ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. ) `  z ) ) )
31 fveq2 5642 . . . . . . . . . . 11  |-  ( x  =  z  ->  ( F `  x )  =  ( F `  z ) )
32 fveq2 5642 . . . . . . . . . . 11  |-  ( x  =  z  ->  ( G `  x )  =  ( G `  z ) )
3331, 32opeq12d 3871 . . . . . . . . . 10  |-  ( x  =  z  ->  <. ( F `  x ) ,  ( G `  x ) >.  =  <. ( F `  z ) ,  ( G `  z ) >. )
34 simpr 110 . . . . . . . . . 10  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  z  e.  U. U )
35 simpll 527 . . . . . . . . . . . 12  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  F : U. U
--> X )
3635, 34ffvelcdmd 5786 . . . . . . . . . . 11  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  ( F `  z )  e.  X
)
37 simplr 529 . . . . . . . . . . . 12  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  G : U. U
--> Y )
3837, 34ffvelcdmd 5786 . . . . . . . . . . 11  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  ( G `  z )  e.  Y
)
3936, 38opelxpd 4760 . . . . . . . . . 10  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  <. ( F `  z ) ,  ( G `  z )
>.  e.  ( X  X.  Y ) )
402, 33, 34, 39fvmptd3 5743 . . . . . . . . 9  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  ( ( x  e.  U. U  |->  <.
( F `  x
) ,  ( G `
 x ) >.
) `  z )  =  <. ( F `  z ) ,  ( G `  z )
>. )
4140fveq2d 5646 . . . . . . . 8  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  ( ( 1st  |`  ( X  X.  Y
) ) `  (
( x  e.  U. U  |->  <. ( F `  x ) ,  ( G `  x )
>. ) `  z ) )  =  ( ( 1st  |`  ( X  X.  Y ) ) `  <. ( F `  z
) ,  ( G `
 z ) >.
) )
42 ffvelcdm 5783 . . . . . . . . . . . 12  |-  ( ( F : U. U --> X  /\  z  e.  U. U )  ->  ( F `  z )  e.  X )
43 ffvelcdm 5783 . . . . . . . . . . . 12  |-  ( ( G : U. U --> Y  /\  z  e.  U. U )  ->  ( G `  z )  e.  Y )
44 opelxpi 4759 . . . . . . . . . . . 12  |-  ( ( ( F `  z
)  e.  X  /\  ( G `  z )  e.  Y )  ->  <. ( F `  z
) ,  ( G `
 z ) >.  e.  ( X  X.  Y
) )
4542, 43, 44syl2an 289 . . . . . . . . . . 11  |-  ( ( ( F : U. U
--> X  /\  z  e. 
U. U )  /\  ( G : U. U --> Y  /\  z  e.  U. U ) )  ->  <. ( F `  z
) ,  ( G `
 z ) >.  e.  ( X  X.  Y
) )
4645anandirs 597 . . . . . . . . . 10  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  <. ( F `  z ) ,  ( G `  z )
>.  e.  ( X  X.  Y ) )
4746fvresd 5667 . . . . . . . . 9  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  ( ( 1st  |`  ( X  X.  Y
) ) `  <. ( F `  z ) ,  ( G `  z ) >. )  =  ( 1st `  <. ( F `  z ) ,  ( G `  z ) >. )
)
48 op1stg 6318 . . . . . . . . . 10  |-  ( ( ( F `  z
)  e.  X  /\  ( G `  z )  e.  Y )  -> 
( 1st `  <. ( F `  z ) ,  ( G `  z ) >. )  =  ( F `  z ) )
4936, 38, 48syl2anc 411 . . . . . . . . 9  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  ( 1st `  <. ( F `  z ) ,  ( G `  z ) >. )  =  ( F `  z ) )
5047, 49eqtrd 2263 . . . . . . . 8  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  ( ( 1st  |`  ( X  X.  Y
) ) `  <. ( F `  z ) ,  ( G `  z ) >. )  =  ( F `  z ) )
5130, 41, 503eqtrrd 2268 . . . . . . 7  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  ( F `  z )  =  ( ( ( 1st  |`  ( X  X.  Y ) )  o.  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )
) `  z )
)
5212, 28, 51eqfnfvd 5750 . . . . . 6  |-  ( ( F : U. U --> X  /\  G : U. U
--> Y )  ->  F  =  ( ( 1st  |`  ( X  X.  Y
) )  o.  (
x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
) ) )
53 uptx.5 . . . . . . . 8  |-  P  =  ( 1st  |`  Z )
54 uptx.4 . . . . . . . . 9  |-  Z  =  ( X  X.  Y
)
5554reseq2i 5012 . . . . . . . 8  |-  ( 1st  |`  Z )  =  ( 1st  |`  ( X  X.  Y ) )
5653, 55eqtri 2251 . . . . . . 7  |-  P  =  ( 1st  |`  ( X  X.  Y ) )
5756coeq1i 4891 . . . . . 6  |-  ( P  o.  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )
)  =  ( ( 1st  |`  ( X  X.  Y ) )  o.  ( x  e.  U. U  |->  <. ( F `  x ) ,  ( G `  x )
>. ) )
5852, 57eqtr4di 2281 . . . . 5  |-  ( ( F : U. U --> X  /\  G : U. U
--> Y )  ->  F  =  ( P  o.  ( x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
) ) )
598, 10, 58syl2an 289 . . . 4  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  ->  F  =  ( P  o.  ( x  e.  U. U  |->  <. ( F `  x ) ,  ( G `  x )
>. ) ) )
60 ffn 5484 . . . . . . . 8  |-  ( G : U. U --> Y  ->  G  Fn  U. U )
6160adantl 277 . . . . . . 7  |-  ( ( F : U. U --> X  /\  G : U. U
--> Y )  ->  G  Fn  U. U )
62 fo2nd 6326 . . . . . . . . . 10  |-  2nd : _V -onto-> _V
63 fofn 5564 . . . . . . . . . 10  |-  ( 2nd
: _V -onto-> _V  ->  2nd 
Fn  _V )
6462, 63ax-mp 5 . . . . . . . . 9  |-  2nd  Fn  _V
65 fnssres 5447 . . . . . . . . 9  |-  ( ( 2nd  Fn  _V  /\  ( X  X.  Y
)  C_  _V )  ->  ( 2nd  |`  ( X  X.  Y ) )  Fn  ( X  X.  Y ) )
6664, 16, 65mp2an 426 . . . . . . . 8  |-  ( 2nd  |`  ( X  X.  Y
) )  Fn  ( X  X.  Y )
67 fnco 5442 . . . . . . . 8  |-  ( ( ( 2nd  |`  ( X  X.  Y ) )  Fn  ( X  X.  Y )  /\  (
x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
)  Fn  U. U  /\  ran  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )  C_  ( X  X.  Y
) )  ->  (
( 2nd  |`  ( X  X.  Y ) )  o.  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )
)  Fn  U. U
)
6866, 25, 26, 67mp3an2i 1378 . . . . . . 7  |-  ( ( F : U. U --> X  /\  G : U. U
--> Y )  ->  (
( 2nd  |`  ( X  X.  Y ) )  o.  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )
)  Fn  U. U
)
69 fvco3 5720 . . . . . . . . 9  |-  ( ( ( x  e.  U. U  |->  <. ( F `  x ) ,  ( G `  x )
>. ) : U. U --> ( X  X.  Y
)  /\  z  e.  U. U )  ->  (
( ( 2nd  |`  ( X  X.  Y ) )  o.  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )
) `  z )  =  ( ( 2nd  |`  ( X  X.  Y
) ) `  (
( x  e.  U. U  |->  <. ( F `  x ) ,  ( G `  x )
>. ) `  z ) ) )
7024, 69sylan 283 . . . . . . . 8  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  ( ( ( 2nd  |`  ( X  X.  Y ) )  o.  ( x  e.  U. U  |->  <. ( F `  x ) ,  ( G `  x )
>. ) ) `  z
)  =  ( ( 2nd  |`  ( X  X.  Y ) ) `  ( ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. ) `  z ) ) )
7140fveq2d 5646 . . . . . . . 8  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  ( ( 2nd  |`  ( X  X.  Y
) ) `  (
( x  e.  U. U  |->  <. ( F `  x ) ,  ( G `  x )
>. ) `  z ) )  =  ( ( 2nd  |`  ( X  X.  Y ) ) `  <. ( F `  z
) ,  ( G `
 z ) >.
) )
7246fvresd 5667 . . . . . . . . 9  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  ( ( 2nd  |`  ( X  X.  Y
) ) `  <. ( F `  z ) ,  ( G `  z ) >. )  =  ( 2nd `  <. ( F `  z ) ,  ( G `  z ) >. )
)
73 op2ndg 6319 . . . . . . . . . 10  |-  ( ( ( F `  z
)  e.  X  /\  ( G `  z )  e.  Y )  -> 
( 2nd `  <. ( F `  z ) ,  ( G `  z ) >. )  =  ( G `  z ) )
7436, 38, 73syl2anc 411 . . . . . . . . 9  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  ( 2nd `  <. ( F `  z ) ,  ( G `  z ) >. )  =  ( G `  z ) )
7572, 74eqtrd 2263 . . . . . . . 8  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  ( ( 2nd  |`  ( X  X.  Y
) ) `  <. ( F `  z ) ,  ( G `  z ) >. )  =  ( G `  z ) )
7670, 71, 753eqtrrd 2268 . . . . . . 7  |-  ( ( ( F : U. U
--> X  /\  G : U. U --> Y )  /\  z  e.  U. U )  ->  ( G `  z )  =  ( ( ( 2nd  |`  ( X  X.  Y ) )  o.  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )
) `  z )
)
7761, 68, 76eqfnfvd 5750 . . . . . 6  |-  ( ( F : U. U --> X  /\  G : U. U
--> Y )  ->  G  =  ( ( 2nd  |`  ( X  X.  Y
) )  o.  (
x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
) ) )
78 uptx.6 . . . . . . . 8  |-  Q  =  ( 2nd  |`  Z )
7954reseq2i 5012 . . . . . . . 8  |-  ( 2nd  |`  Z )  =  ( 2nd  |`  ( X  X.  Y ) )
8078, 79eqtri 2251 . . . . . . 7  |-  Q  =  ( 2nd  |`  ( X  X.  Y ) )
8180coeq1i 4891 . . . . . 6  |-  ( Q  o.  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )
)  =  ( ( 2nd  |`  ( X  X.  Y ) )  o.  ( x  e.  U. U  |->  <. ( F `  x ) ,  ( G `  x )
>. ) )
8277, 81eqtr4di 2281 . . . . 5  |-  ( ( F : U. U --> X  /\  G : U. U
--> Y )  ->  G  =  ( Q  o.  ( x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
) ) )
838, 10, 82syl2an 289 . . . 4  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  ->  G  =  ( Q  o.  ( x  e.  U. U  |->  <. ( F `  x ) ,  ( G `  x )
>. ) ) )
846, 59, 83jca32 310 . . 3  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  -> 
( ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )  e.  ( U  Cn  T
)  /\  ( F  =  ( P  o.  ( x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
) )  /\  G  =  ( Q  o.  ( x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
) ) ) ) )
85 eleq1 2293 . . . . 5  |-  ( h  =  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )  ->  ( h  e.  ( U  Cn  T )  <-> 
( x  e.  U. U  |->  <. ( F `  x ) ,  ( G `  x )
>. )  e.  ( U  Cn  T ) ) )
86 coeq2 4890 . . . . . . 7  |-  ( h  =  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )  ->  ( P  o.  h
)  =  ( P  o.  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )
) )
8786eqeq2d 2242 . . . . . 6  |-  ( h  =  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )  ->  ( F  =  ( P  o.  h )  <-> 
F  =  ( P  o.  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )
) ) )
88 coeq2 4890 . . . . . . 7  |-  ( h  =  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )  ->  ( Q  o.  h
)  =  ( Q  o.  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )
) )
8988eqeq2d 2242 . . . . . 6  |-  ( h  =  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )  ->  ( G  =  ( Q  o.  h )  <-> 
G  =  ( Q  o.  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )
) ) )
9087, 89anbi12d 473 . . . . 5  |-  ( h  =  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )  ->  ( ( F  =  ( P  o.  h
)  /\  G  =  ( Q  o.  h
) )  <->  ( F  =  ( P  o.  ( x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
) )  /\  G  =  ( Q  o.  ( x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
) ) ) ) )
9185, 90anbi12d 473 . . . 4  |-  ( h  =  ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )  ->  ( ( h  e.  ( U  Cn  T
)  /\  ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) )  <-> 
( ( x  e. 
U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )  e.  ( U  Cn  T
)  /\  ( F  =  ( P  o.  ( x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
) )  /\  G  =  ( Q  o.  ( x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
) ) ) ) ) )
9291spcegv 2893 . . 3  |-  ( ( x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
)  e.  ( U  Cn  T )  -> 
( ( ( x  e.  U. U  |->  <.
( F `  x
) ,  ( G `
 x ) >.
)  e.  ( U  Cn  T )  /\  ( F  =  ( P  o.  ( x  e.  U. U  |->  <. ( F `  x ) ,  ( G `  x ) >. )
)  /\  G  =  ( Q  o.  (
x  e.  U. U  |-> 
<. ( F `  x
) ,  ( G `
 x ) >.
) ) ) )  ->  E. h ( h  e.  ( U  Cn  T )  /\  ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) ) ) )
936, 84, 92sylc 62 . 2  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  ->  E. h ( h  e.  ( U  Cn  T
)  /\  ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) ) )
94 eqid 2230 . . . . . . . 8  |-  U. T  =  U. T
951, 94cnf 14957 . . . . . . 7  |-  ( h  e.  ( U  Cn  T )  ->  h : U. U --> U. T
)
96 cntop2 14955 . . . . . . . . 9  |-  ( F  e.  ( U  Cn  R )  ->  R  e.  Top )
97 cntop2 14955 . . . . . . . . 9  |-  ( G  e.  ( U  Cn  S )  ->  S  e.  Top )
984unieqi 3904 . . . . . . . . . 10  |-  U. T  =  U. ( R  tX  S )
997, 9txuni 15016 . . . . . . . . . 10  |-  ( ( R  e.  Top  /\  S  e.  Top )  ->  ( X  X.  Y
)  =  U. ( R  tX  S ) )
10098, 99eqtr4id 2282 . . . . . . . . 9  |-  ( ( R  e.  Top  /\  S  e.  Top )  ->  U. T  =  ( X  X.  Y ) )
10196, 97, 100syl2an 289 . . . . . . . 8  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  ->  U. T  =  ( X  X.  Y ) )
102101feq3d 5473 . . . . . . 7  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  -> 
( h : U. U
--> U. T  <->  h : U. U --> ( X  X.  Y ) ) )
10395, 102imbitrid 154 . . . . . 6  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  -> 
( h  e.  ( U  Cn  T )  ->  h : U. U
--> ( X  X.  Y
) ) )
104103anim1d 336 . . . . 5  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  -> 
( ( h  e.  ( U  Cn  T
)  /\  ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) )  ->  ( h : U. U --> ( X  X.  Y )  /\  ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h )
) ) ) )
105 3anass 1008 . . . . 5  |-  ( ( h : U. U --> ( X  X.  Y
)  /\  F  =  ( P  o.  h
)  /\  G  =  ( Q  o.  h
) )  <->  ( h : U. U --> ( X  X.  Y )  /\  ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h )
) ) )
106104, 105imbitrrdi 162 . . . 4  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  -> 
( ( h  e.  ( U  Cn  T
)  /\  ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) )  ->  ( h : U. U --> ( X  X.  Y )  /\  F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) ) )
107106alrimiv 1921 . . 3  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  ->  A. h ( ( h  e.  ( U  Cn  T )  /\  ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) )  ->  ( h : U. U --> ( X  X.  Y )  /\  F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) ) )
108 cntop1 14954 . . . . . 6  |-  ( F  e.  ( U  Cn  R )  ->  U  e.  Top )
109 uniexg 4538 . . . . . 6  |-  ( U  e.  Top  ->  U. U  e.  _V )
110108, 109syl 14 . . . . 5  |-  ( F  e.  ( U  Cn  R )  ->  U. U  e.  _V )
11156, 80upxp 15025 . . . . 5  |-  ( ( U. U  e.  _V  /\  F : U. U --> X  /\  G : U. U
--> Y )  ->  E! h ( h : U. U --> ( X  X.  Y )  /\  F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) )
112110, 8, 10, 111syl2an3an 1334 . . . 4  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  ->  E! h ( h : U. U --> ( X  X.  Y )  /\  F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) )
113 eumo 2110 . . . 4  |-  ( E! h ( h : U. U --> ( X  X.  Y )  /\  F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) )  ->  E* h ( h : U. U --> ( X  X.  Y )  /\  F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) )
114112, 113syl 14 . . 3  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  ->  E* h ( h : U. U --> ( X  X.  Y )  /\  F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) )
115 moim 2143 . . 3  |-  ( A. h ( ( h  e.  ( U  Cn  T )  /\  ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) )  ->  ( h : U. U --> ( X  X.  Y )  /\  F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) )  ->  ( E* h
( h : U. U
--> ( X  X.  Y
)  /\  F  =  ( P  o.  h
)  /\  G  =  ( Q  o.  h
) )  ->  E* h ( h  e.  ( U  Cn  T
)  /\  ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) ) ) )
116107, 114, 115sylc 62 . 2  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  ->  E* h ( h  e.  ( U  Cn  T
)  /\  ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) ) )
117 df-reu 2516 . . 3  |-  ( E! h  e.  ( U  Cn  T ) ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) )  <->  E! h
( h  e.  ( U  Cn  T )  /\  ( F  =  ( P  o.  h
)  /\  G  =  ( Q  o.  h
) ) ) )
118 eu5 2126 . . 3  |-  ( E! h ( h  e.  ( U  Cn  T
)  /\  ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) )  <-> 
( E. h ( h  e.  ( U  Cn  T )  /\  ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h )
) )  /\  E* h ( h  e.  ( U  Cn  T
)  /\  ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) ) ) )
119117, 118bitri 184 . 2  |-  ( E! h  e.  ( U  Cn  T ) ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) )  <->  ( E. h ( h  e.  ( U  Cn  T
)  /\  ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) )  /\  E* h ( h  e.  ( U  Cn  T )  /\  ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h )
) ) ) )
12093, 116, 119sylanbrc 417 1  |-  ( ( F  e.  ( U  Cn  R )  /\  G  e.  ( U  Cn  S ) )  ->  E! h  e.  ( U  Cn  T ) ( F  =  ( P  o.  h )  /\  G  =  ( Q  o.  h ) ) )
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 104    /\ w3a 1004   A.wal 1395    = wceq 1397   E.wex 1540   E!weu 2078   E*wmo 2079    e. wcel 2201   E!wreu 2511   _Vcvv 2801    C_ wss 3199   <.cop 3673   U.cuni 3894    |-> cmpt 4151    X. cxp 4725   ran crn 4728    |` cres 4729    o. ccom 4731    Fn wfn 5323   -->wf 5324   -onto->wfo 5326   ` cfv 5328  (class class class)co 6023   1stc1st 6306   2ndc2nd 6307   Topctop 14750    Cn ccn 14938    tX ctx 15005
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 106  ax-ia2 107  ax-ia3 108  ax-in1 619  ax-in2 620  ax-io 716  ax-5 1495  ax-7 1496  ax-gen 1497  ax-ie1 1541  ax-ie2 1542  ax-8 1552  ax-10 1553  ax-11 1554  ax-i12 1555  ax-bndl 1557  ax-4 1558  ax-17 1574  ax-i9 1578  ax-ial 1582  ax-i5r 1583  ax-13 2203  ax-14 2204  ax-ext 2212  ax-coll 4205  ax-sep 4208  ax-pow 4266  ax-pr 4301  ax-un 4532  ax-setind 4637
This theorem depends on definitions:  df-bi 117  df-3an 1006  df-tru 1400  df-fal 1403  df-nf 1509  df-sb 1810  df-eu 2081  df-mo 2082  df-clab 2217  df-cleq 2223  df-clel 2226  df-nfc 2362  df-ne 2402  df-ral 2514  df-rex 2515  df-reu 2516  df-rab 2518  df-v 2803  df-sbc 3031  df-csb 3127  df-dif 3201  df-un 3203  df-in 3205  df-ss 3212  df-nul 3494  df-pw 3655  df-sn 3676  df-pr 3677  df-op 3679  df-uni 3895  df-iun 3973  df-br 4090  df-opab 4152  df-mpt 4153  df-id 4392  df-xp 4733  df-rel 4734  df-cnv 4735  df-co 4736  df-dm 4737  df-rn 4738  df-res 4739  df-ima 4740  df-iota 5288  df-fun 5330  df-fn 5331  df-f 5332  df-f1 5333  df-fo 5334  df-f1o 5335  df-fv 5336  df-ov 6026  df-oprab 6027  df-mpo 6028  df-1st 6308  df-2nd 6309  df-map 6824  df-topgen 13366  df-top 14751  df-topon 14764  df-bases 14796  df-cn 14941  df-tx 15006
This theorem is referenced by:  txcn  15028
  Copyright terms: Public domain W3C validator