Users' Mathboxes Mathbox for Jim Kingdon < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  ILE Home  >  Th. List  >   Mathboxes  >  isomninnlem Unicode version

Theorem isomninnlem 13225
Description: Lemma for isomninn 13226. The result, with a hypothesis to provide a convenient notation. (Contributed by Jim Kingdon, 30-Aug-2023.)
Hypothesis
Ref Expression
isomninnlem.g  |-  G  = frec ( ( x  e.  ZZ  |->  ( x  + 
1 ) ) ,  0 )
Assertion
Ref Expression
isomninnlem  |-  ( A  e.  V  ->  ( A  e. Omni  <->  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) ) )
Distinct variable groups:    A, f, x   
f, G, x    f, V, x

Proof of Theorem isomninnlem
Dummy variables  g  j are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 isomnimap 7009 . 2  |-  ( A  e.  V  ->  ( A  e. Omni  <->  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) ) )
2 fveq1 5420 . . . . . . . . 9  |-  ( g  =  ( `' G  o.  f )  ->  (
g `  x )  =  ( ( `' G  o.  f ) `
 x ) )
32eqeq1d 2148 . . . . . . . 8  |-  ( g  =  ( `' G  o.  f )  ->  (
( g `  x
)  =  (/)  <->  ( ( `' G  o.  f
) `  x )  =  (/) ) )
43rexbidv 2438 . . . . . . 7  |-  ( g  =  ( `' G  o.  f )  ->  ( E. x  e.  A  ( g `  x
)  =  (/)  <->  E. x  e.  A  ( ( `' G  o.  f
) `  x )  =  (/) ) )
52eqeq1d 2148 . . . . . . . 8  |-  ( g  =  ( `' G  o.  f )  ->  (
( g `  x
)  =  1o  <->  ( ( `' G  o.  f
) `  x )  =  1o ) )
65ralbidv 2437 . . . . . . 7  |-  ( g  =  ( `' G  o.  f )  ->  ( A. x  e.  A  ( g `  x
)  =  1o  <->  A. x  e.  A  ( ( `' G  o.  f
) `  x )  =  1o ) )
74, 6orbi12d 782 . . . . . 6  |-  ( g  =  ( `' G  o.  f )  ->  (
( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o )  <-> 
( E. x  e.  A  ( ( `' G  o.  f ) `
 x )  =  (/)  \/  A. x  e.  A  ( ( `' G  o.  f ) `
 x )  =  1o ) ) )
8 simplr 519 . . . . . 6  |-  ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  ->  A. g  e.  ( 2o  ^m  A
) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )
9 isomninnlem.g . . . . . . . . . . . . 13  |-  G  = frec ( ( x  e.  ZZ  |->  ( x  + 
1 ) ) ,  0 )
109frechashgf1o 10201 . . . . . . . . . . . 12  |-  G : om
-1-1-onto-> NN0
11 f1ocnv 5380 . . . . . . . . . . . 12  |-  ( G : om -1-1-onto-> NN0  ->  `' G : NN0
-1-1-onto-> om )
12 f1of 5367 . . . . . . . . . . . 12  |-  ( `' G : NN0 -1-1-onto-> om  ->  `' G : NN0 --> om )
1310, 11, 12mp2b 8 . . . . . . . . . . 11  |-  `' G : NN0 --> om
14 0nn0 8992 . . . . . . . . . . . 12  |-  0  e.  NN0
15 1nn0 8993 . . . . . . . . . . . 12  |-  1  e.  NN0
16 prssi 3678 . . . . . . . . . . . 12  |-  ( ( 0  e.  NN0  /\  1  e.  NN0 )  ->  { 0 ,  1 }  C_  NN0 )
1714, 15, 16mp2an 422 . . . . . . . . . . 11  |-  { 0 ,  1 }  C_  NN0
18 fssres 5298 . . . . . . . . . . 11  |-  ( ( `' G : NN0 --> om  /\  { 0 ,  1 } 
C_  NN0 )  ->  ( `' G  |`  { 0 ,  1 } ) : { 0 ,  1 } --> om )
1913, 17, 18mp2an 422 . . . . . . . . . 10  |-  ( `' G  |`  { 0 ,  1 } ) : { 0 ,  1 } --> om
20 ffn 5272 . . . . . . . . . 10  |-  ( ( `' G  |`  { 0 ,  1 } ) : { 0 ,  1 } --> om  ->  ( `' G  |`  { 0 ,  1 } )  Fn  { 0 ,  1 } )
2119, 20ax-mp 5 . . . . . . . . 9  |-  ( `' G  |`  { 0 ,  1 } )  Fn  { 0 ,  1 }
22 fvres 5445 . . . . . . . . . . 11  |-  ( j  e.  { 0 ,  1 }  ->  (
( `' G  |`  { 0 ,  1 } ) `  j
)  =  ( `' G `  j ) )
23 elpri 3550 . . . . . . . . . . . 12  |-  ( j  e.  { 0 ,  1 }  ->  (
j  =  0  \/  j  =  1 ) )
24 fveq2 5421 . . . . . . . . . . . . . 14  |-  ( j  =  0  ->  ( `' G `  j )  =  ( `' G `  0 ) )
25 0zd 9066 . . . . . . . . . . . . . . . . . 18  |-  ( T. 
->  0  e.  ZZ )
2625, 9frec2uz0d 10172 . . . . . . . . . . . . . . . . 17  |-  ( T. 
->  ( G `  (/) )  =  0 )
2726mptru 1340 . . . . . . . . . . . . . . . 16  |-  ( G `
 (/) )  =  0
28 peano1 4508 . . . . . . . . . . . . . . . . 17  |-  (/)  e.  om
29 f1ocnvfv 5680 . . . . . . . . . . . . . . . . 17  |-  ( ( G : om -1-1-onto-> NN0  /\  (/)  e.  om )  ->  ( ( G `
 (/) )  =  0  ->  ( `' G `  0 )  =  (/) ) )
3010, 28, 29mp2an 422 . . . . . . . . . . . . . . . 16  |-  ( ( G `  (/) )  =  0  ->  ( `' G `  0 )  =  (/) )
3127, 30ax-mp 5 . . . . . . . . . . . . . . 15  |-  ( `' G `  0 )  =  (/)
32 0lt2o 6338 . . . . . . . . . . . . . . 15  |-  (/)  e.  2o
3331, 32eqeltri 2212 . . . . . . . . . . . . . 14  |-  ( `' G `  0 )  e.  2o
3424, 33eqeltrdi 2230 . . . . . . . . . . . . 13  |-  ( j  =  0  ->  ( `' G `  j )  e.  2o )
35 fveq2 5421 . . . . . . . . . . . . . 14  |-  ( j  =  1  ->  ( `' G `  j )  =  ( `' G `  1 ) )
36 df-1o 6313 . . . . . . . . . . . . . . . . . 18  |-  1o  =  suc  (/)
3736fveq2i 5424 . . . . . . . . . . . . . . . . 17  |-  ( G `
 1o )  =  ( G `  suc  (/) )
3828a1i 9 . . . . . . . . . . . . . . . . . . 19  |-  ( T. 
->  (/)  e.  om )
3925, 9, 38frec2uzsucd 10174 . . . . . . . . . . . . . . . . . 18  |-  ( T. 
->  ( G `  suc  (/) )  =  ( ( G `  (/) )  +  1 ) )
4039mptru 1340 . . . . . . . . . . . . . . . . 17  |-  ( G `
 suc  (/) )  =  ( ( G `  (/) )  +  1 )
4127oveq1i 5784 . . . . . . . . . . . . . . . . . 18  |-  ( ( G `  (/) )  +  1 )  =  ( 0  +  1 )
42 0p1e1 8834 . . . . . . . . . . . . . . . . . 18  |-  ( 0  +  1 )  =  1
4341, 42eqtri 2160 . . . . . . . . . . . . . . . . 17  |-  ( ( G `  (/) )  +  1 )  =  1
4437, 40, 433eqtri 2164 . . . . . . . . . . . . . . . 16  |-  ( G `
 1o )  =  1
45 1onn 6416 . . . . . . . . . . . . . . . . 17  |-  1o  e.  om
46 f1ocnvfv 5680 . . . . . . . . . . . . . . . . 17  |-  ( ( G : om -1-1-onto-> NN0  /\  1o  e.  om )  ->  ( ( G `  1o )  =  1  ->  ( `' G `  1 )  =  1o ) )
4710, 45, 46mp2an 422 . . . . . . . . . . . . . . . 16  |-  ( ( G `  1o )  =  1  ->  ( `' G `  1 )  =  1o )
4844, 47ax-mp 5 . . . . . . . . . . . . . . 15  |-  ( `' G `  1 )  =  1o
49 1lt2o 6339 . . . . . . . . . . . . . . 15  |-  1o  e.  2o
5048, 49eqeltri 2212 . . . . . . . . . . . . . 14  |-  ( `' G `  1 )  e.  2o
5135, 50eqeltrdi 2230 . . . . . . . . . . . . 13  |-  ( j  =  1  ->  ( `' G `  j )  e.  2o )
5234, 51jaoi 705 . . . . . . . . . . . 12  |-  ( ( j  =  0  \/  j  =  1 )  ->  ( `' G `  j )  e.  2o )
5323, 52syl 14 . . . . . . . . . . 11  |-  ( j  e.  { 0 ,  1 }  ->  ( `' G `  j )  e.  2o )
5422, 53eqeltrd 2216 . . . . . . . . . 10  |-  ( j  e.  { 0 ,  1 }  ->  (
( `' G  |`  { 0 ,  1 } ) `  j
)  e.  2o )
5554rgen 2485 . . . . . . . . 9  |-  A. j  e.  { 0 ,  1 }  ( ( `' G  |`  { 0 ,  1 } ) `
 j )  e.  2o
56 ffnfv 5578 . . . . . . . . 9  |-  ( ( `' G  |`  { 0 ,  1 } ) : { 0 ,  1 } --> 2o  <->  ( ( `' G  |`  { 0 ,  1 } )  Fn  { 0 ,  1 }  /\  A. j  e.  { 0 ,  1 }  (
( `' G  |`  { 0 ,  1 } ) `  j
)  e.  2o ) )
5721, 55, 56mpbir2an 926 . . . . . . . 8  |-  ( `' G  |`  { 0 ,  1 } ) : { 0 ,  1 } --> 2o
58 elmapi 6564 . . . . . . . . 9  |-  ( f  e.  ( { 0 ,  1 }  ^m  A )  ->  f : A --> { 0 ,  1 } )
5958adantl 275 . . . . . . . 8  |-  ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  ->  f : A --> { 0 ,  1 } )
60 fco2 5289 . . . . . . . 8  |-  ( ( ( `' G  |`  { 0 ,  1 } ) : {
0 ,  1 } --> 2o  /\  f : A --> { 0 ,  1 } )  -> 
( `' G  o.  f ) : A --> 2o )
6157, 59, 60sylancr 410 . . . . . . 7  |-  ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  ->  ( `' G  o.  f
) : A --> 2o )
62 2onn 6417 . . . . . . . . 9  |-  2o  e.  om
6362a1i 9 . . . . . . . 8  |-  ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  ->  2o  e.  om )
64 simpll 518 . . . . . . . 8  |-  ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  ->  A  e.  V )
6563, 64elmapd 6556 . . . . . . 7  |-  ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  ->  (
( `' G  o.  f )  e.  ( 2o  ^m  A )  <-> 
( `' G  o.  f ) : A --> 2o ) )
6661, 65mpbird 166 . . . . . 6  |-  ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  ->  ( `' G  o.  f
)  e.  ( 2o 
^m  A ) )
677, 8, 66rspcdva 2794 . . . . 5  |-  ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  ->  ( E. x  e.  A  ( ( `' G  o.  f ) `  x
)  =  (/)  \/  A. x  e.  A  (
( `' G  o.  f ) `  x
)  =  1o ) )
68 nfv 1508 . . . . . . . . 9  |-  F/ x  A  e.  V
69 nfcv 2281 . . . . . . . . . 10  |-  F/_ x
( 2o  ^m  A
)
70 nfre1 2476 . . . . . . . . . . 11  |-  F/ x E. x  e.  A  ( g `  x
)  =  (/)
71 nfra1 2466 . . . . . . . . . . 11  |-  F/ x A. x  e.  A  ( g `  x
)  =  1o
7270, 71nfor 1553 . . . . . . . . . 10  |-  F/ x
( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o )
7369, 72nfralxy 2471 . . . . . . . . 9  |-  F/ x A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x
)  =  (/)  \/  A. x  e.  A  (
g `  x )  =  1o )
7468, 73nfan 1544 . . . . . . . 8  |-  F/ x
( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )
75 nfv 1508 . . . . . . . 8  |-  F/ x  f  e.  ( {
0 ,  1 }  ^m  A )
7674, 75nfan 1544 . . . . . . 7  |-  F/ x
( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A
) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )
77 simplr 519 . . . . . . . . . . . . . 14  |-  ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A
) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  ->  f  e.  ( { 0 ,  1 }  ^m  A
) )
7877, 58syl 14 . . . . . . . . . . . . 13  |-  ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A
) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  ->  f : A --> { 0 ,  1 } )
79 simpr 109 . . . . . . . . . . . . 13  |-  ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A
) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  ->  x  e.  A )
8078, 79ffvelrnd 5556 . . . . . . . . . . . 12  |-  ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A
) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  ->  (
f `  x )  e.  { 0 ,  1 } )
8117, 80sseldi 3095 . . . . . . . . . . 11  |-  ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A
) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  ->  (
f `  x )  e.  NN0 )
82 f1ocnvfv2 5679 . . . . . . . . . . 11  |-  ( ( G : om -1-1-onto-> NN0  /\  ( f `
 x )  e. 
NN0 )  ->  ( G `  ( `' G `  ( f `  x ) ) )  =  ( f `  x ) )
8310, 81, 82sylancr 410 . . . . . . . . . 10  |-  ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A
) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  ->  ( G `  ( `' G `  ( f `  x ) ) )  =  ( f `  x ) )
8483adantr 274 . . . . . . . . 9  |-  ( ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/  A. x  e.  A  ( g `  x )  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  /\  (
( `' G  o.  f ) `  x
)  =  (/) )  -> 
( G `  ( `' G `  ( f `
 x ) ) )  =  ( f `
 x ) )
85 fvco3 5492 . . . . . . . . . . . . . 14  |-  ( ( f : A --> { 0 ,  1 }  /\  x  e.  A )  ->  ( ( `' G  o.  f ) `  x
)  =  ( `' G `  ( f `
 x ) ) )
8678, 85sylancom 416 . . . . . . . . . . . . 13  |-  ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A
) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  ->  (
( `' G  o.  f ) `  x
)  =  ( `' G `  ( f `
 x ) ) )
8786eqeq1d 2148 . . . . . . . . . . . 12  |-  ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A
) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  ->  (
( ( `' G  o.  f ) `  x
)  =  (/)  <->  ( `' G `  ( f `  x ) )  =  (/) ) )
8887biimpa 294 . . . . . . . . . . 11  |-  ( ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/  A. x  e.  A  ( g `  x )  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  /\  (
( `' G  o.  f ) `  x
)  =  (/) )  -> 
( `' G `  ( f `  x
) )  =  (/) )
8988fveq2d 5425 . . . . . . . . . 10  |-  ( ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/  A. x  e.  A  ( g `  x )  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  /\  (
( `' G  o.  f ) `  x
)  =  (/) )  -> 
( G `  ( `' G `  ( f `
 x ) ) )  =  ( G `
 (/) ) )
9089, 27syl6eq 2188 . . . . . . . . 9  |-  ( ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/  A. x  e.  A  ( g `  x )  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  /\  (
( `' G  o.  f ) `  x
)  =  (/) )  -> 
( G `  ( `' G `  ( f `
 x ) ) )  =  0 )
9184, 90eqtr3d 2174 . . . . . . . 8  |-  ( ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/  A. x  e.  A  ( g `  x )  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  /\  (
( `' G  o.  f ) `  x
)  =  (/) )  -> 
( f `  x
)  =  0 )
9291exp31 361 . . . . . . 7  |-  ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  ->  (
x  e.  A  -> 
( ( ( `' G  o.  f ) `
 x )  =  (/)  ->  ( f `  x )  =  0 ) ) )
9376, 92reximdai 2530 . . . . . 6  |-  ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  ->  ( E. x  e.  A  ( ( `' G  o.  f ) `  x
)  =  (/)  ->  E. x  e.  A  ( f `  x )  =  0 ) )
9483adantr 274 . . . . . . . . 9  |-  ( ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/  A. x  e.  A  ( g `  x )  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  /\  (
( `' G  o.  f ) `  x
)  =  1o )  ->  ( G `  ( `' G `  ( f `
 x ) ) )  =  ( f `
 x ) )
9586adantr 274 . . . . . . . . . . . 12  |-  ( ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/  A. x  e.  A  ( g `  x )  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  /\  (
( `' G  o.  f ) `  x
)  =  1o )  ->  ( ( `' G  o.  f ) `
 x )  =  ( `' G `  ( f `  x
) ) )
96 simpr 109 . . . . . . . . . . . 12  |-  ( ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/  A. x  e.  A  ( g `  x )  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  /\  (
( `' G  o.  f ) `  x
)  =  1o )  ->  ( ( `' G  o.  f ) `
 x )  =  1o )
9795, 96eqtr3d 2174 . . . . . . . . . . 11  |-  ( ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/  A. x  e.  A  ( g `  x )  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  /\  (
( `' G  o.  f ) `  x
)  =  1o )  ->  ( `' G `  ( f `  x
) )  =  1o )
9897fveq2d 5425 . . . . . . . . . 10  |-  ( ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/  A. x  e.  A  ( g `  x )  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  /\  (
( `' G  o.  f ) `  x
)  =  1o )  ->  ( G `  ( `' G `  ( f `
 x ) ) )  =  ( G `
 1o ) )
9998, 44syl6eq 2188 . . . . . . . . 9  |-  ( ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/  A. x  e.  A  ( g `  x )  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  /\  (
( `' G  o.  f ) `  x
)  =  1o )  ->  ( G `  ( `' G `  ( f `
 x ) ) )  =  1 )
10094, 99eqtr3d 2174 . . . . . . . 8  |-  ( ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/  A. x  e.  A  ( g `  x )  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  /\  (
( `' G  o.  f ) `  x
)  =  1o )  ->  ( f `  x )  =  1 )
101100ex 114 . . . . . . 7  |-  ( ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A
) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  /\  x  e.  A )  ->  (
( ( `' G  o.  f ) `  x
)  =  1o  ->  ( f `  x )  =  1 ) )
10276, 101ralimdaa 2498 . . . . . 6  |-  ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  ->  ( A. x  e.  A  ( ( `' G  o.  f ) `  x
)  =  1o  ->  A. x  e.  A  ( f `  x )  =  1 ) )
10393, 102orim12d 775 . . . . 5  |-  ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  ->  (
( E. x  e.  A  ( ( `' G  o.  f ) `
 x )  =  (/)  \/  A. x  e.  A  ( ( `' G  o.  f ) `
 x )  =  1o )  ->  ( E. x  e.  A  ( f `  x
)  =  0  \/ 
A. x  e.  A  ( f `  x
)  =  1 ) ) )
10467, 103mpd 13 . . . 4  |-  ( ( ( A  e.  V  /\  A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )  /\  f  e.  ( { 0 ,  1 }  ^m  A
) )  ->  ( E. x  e.  A  ( f `  x
)  =  0  \/ 
A. x  e.  A  ( f `  x
)  =  1 ) )
105104ralrimiva 2505 . . 3  |-  ( ( A  e.  V  /\  A. g  e.  ( 2o 
^m  A ) ( E. x  e.  A  ( g `  x
)  =  (/)  \/  A. x  e.  A  (
g `  x )  =  1o ) )  ->  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )
106 fveq1 5420 . . . . . . . . 9  |-  ( f  =  ( G  o.  g )  ->  (
f `  x )  =  ( ( G  o.  g ) `  x ) )
107106eqeq1d 2148 . . . . . . . 8  |-  ( f  =  ( G  o.  g )  ->  (
( f `  x
)  =  0  <->  (
( G  o.  g
) `  x )  =  0 ) )
108107rexbidv 2438 . . . . . . 7  |-  ( f  =  ( G  o.  g )  ->  ( E. x  e.  A  ( f `  x
)  =  0  <->  E. x  e.  A  (
( G  o.  g
) `  x )  =  0 ) )
109106eqeq1d 2148 . . . . . . . 8  |-  ( f  =  ( G  o.  g )  ->  (
( f `  x
)  =  1  <->  (
( G  o.  g
) `  x )  =  1 ) )
110109ralbidv 2437 . . . . . . 7  |-  ( f  =  ( G  o.  g )  ->  ( A. x  e.  A  ( f `  x
)  =  1  <->  A. x  e.  A  (
( G  o.  g
) `  x )  =  1 ) )
111108, 110orbi12d 782 . . . . . 6  |-  ( f  =  ( G  o.  g )  ->  (
( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 )  <->  ( E. x  e.  A  ( ( G  o.  g ) `  x )  =  0  \/  A. x  e.  A  ( ( G  o.  g ) `  x )  =  1 ) ) )
112 simplr 519 . . . . . 6  |-  ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  ->  A. f  e.  ( { 0 ,  1 }  ^m  A
) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )
113 f1of 5367 . . . . . . . . . . . 12  |-  ( G : om -1-1-onto-> NN0  ->  G : om
--> NN0 )
11410, 113ax-mp 5 . . . . . . . . . . 11  |-  G : om
--> NN0
115 omelon 4522 . . . . . . . . . . . . 13  |-  om  e.  On
116115onelssi 4351 . . . . . . . . . . . 12  |-  ( 2o  e.  om  ->  2o  C_ 
om )
11762, 116ax-mp 5 . . . . . . . . . . 11  |-  2o  C_  om
118 fssres 5298 . . . . . . . . . . 11  |-  ( ( G : om --> NN0  /\  2o  C_  om )  -> 
( G  |`  2o ) : 2o --> NN0 )
119114, 117, 118mp2an 422 . . . . . . . . . 10  |-  ( G  |`  2o ) : 2o --> NN0
120 ffn 5272 . . . . . . . . . 10  |-  ( ( G  |`  2o ) : 2o --> NN0  ->  ( G  |`  2o )  Fn  2o )
121119, 120ax-mp 5 . . . . . . . . 9  |-  ( G  |`  2o )  Fn  2o
122 fvres 5445 . . . . . . . . . . 11  |-  ( j  e.  2o  ->  (
( G  |`  2o ) `
 j )  =  ( G `  j
) )
123 elpri 3550 . . . . . . . . . . . . 13  |-  ( j  e.  { (/) ,  1o }  ->  ( j  =  (/)  \/  j  =  1o ) )
124 df2o3 6327 . . . . . . . . . . . . 13  |-  2o  =  { (/) ,  1o }
125123, 124eleq2s 2234 . . . . . . . . . . . 12  |-  ( j  e.  2o  ->  (
j  =  (/)  \/  j  =  1o ) )
126 fveq2 5421 . . . . . . . . . . . . . 14  |-  ( j  =  (/)  ->  ( G `
 j )  =  ( G `  (/) ) )
127 c0ex 7760 . . . . . . . . . . . . . . . 16  |-  0  e.  _V
128127prid1 3629 . . . . . . . . . . . . . . 15  |-  0  e.  { 0 ,  1 }
12927, 128eqeltri 2212 . . . . . . . . . . . . . 14  |-  ( G `
 (/) )  e.  {
0 ,  1 }
130126, 129eqeltrdi 2230 . . . . . . . . . . . . 13  |-  ( j  =  (/)  ->  ( G `
 j )  e. 
{ 0 ,  1 } )
131 fveq2 5421 . . . . . . . . . . . . . 14  |-  ( j  =  1o  ->  ( G `  j )  =  ( G `  1o ) )
132 1ex 7761 . . . . . . . . . . . . . . . 16  |-  1  e.  _V
133132prid2 3630 . . . . . . . . . . . . . . 15  |-  1  e.  { 0 ,  1 }
13444, 133eqeltri 2212 . . . . . . . . . . . . . 14  |-  ( G `
 1o )  e. 
{ 0 ,  1 }
135131, 134eqeltrdi 2230 . . . . . . . . . . . . 13  |-  ( j  =  1o  ->  ( G `  j )  e.  { 0 ,  1 } )
136130, 135jaoi 705 . . . . . . . . . . . 12  |-  ( ( j  =  (/)  \/  j  =  1o )  ->  ( G `  j )  e.  { 0 ,  1 } )
137125, 136syl 14 . . . . . . . . . . 11  |-  ( j  e.  2o  ->  ( G `  j )  e.  { 0 ,  1 } )
138122, 137eqeltrd 2216 . . . . . . . . . 10  |-  ( j  e.  2o  ->  (
( G  |`  2o ) `
 j )  e. 
{ 0 ,  1 } )
139138rgen 2485 . . . . . . . . 9  |-  A. j  e.  2o  ( ( G  |`  2o ) `  j
)  e.  { 0 ,  1 }
140 ffnfv 5578 . . . . . . . . 9  |-  ( ( G  |`  2o ) : 2o --> { 0 ,  1 }  <->  ( ( G  |`  2o )  Fn  2o  /\  A. j  e.  2o  ( ( G  |`  2o ) `  j
)  e.  { 0 ,  1 } ) )
141121, 139, 140mpbir2an 926 . . . . . . . 8  |-  ( G  |`  2o ) : 2o --> { 0 ,  1 }
142 elmapi 6564 . . . . . . . . 9  |-  ( g  e.  ( 2o  ^m  A )  ->  g : A --> 2o )
143142adantl 275 . . . . . . . 8  |-  ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  ->  g : A --> 2o )
144 fco2 5289 . . . . . . . 8  |-  ( ( ( G  |`  2o ) : 2o --> { 0 ,  1 }  /\  g : A --> 2o )  ->  ( G  o.  g ) : A --> { 0 ,  1 } )
145141, 143, 144sylancr 410 . . . . . . 7  |-  ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  ->  ( G  o.  g ) : A --> { 0 ,  1 } )
146 prexg 4133 . . . . . . . . . 10  |-  ( ( 0  e.  NN0  /\  1  e.  NN0 )  ->  { 0 ,  1 }  e.  _V )
14714, 15, 146mp2an 422 . . . . . . . . 9  |-  { 0 ,  1 }  e.  _V
148147a1i 9 . . . . . . . 8  |-  ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  ->  { 0 ,  1 }  e.  _V )
149 simpll 518 . . . . . . . 8  |-  ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  ->  A  e.  V )
150148, 149elmapd 6556 . . . . . . 7  |-  ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  ->  (
( G  o.  g
)  e.  ( { 0 ,  1 }  ^m  A )  <->  ( G  o.  g ) : A --> { 0 ,  1 } ) )
151145, 150mpbird 166 . . . . . 6  |-  ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  ->  ( G  o.  g )  e.  ( { 0 ,  1 }  ^m  A
) )
152111, 112, 151rspcdva 2794 . . . . 5  |-  ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  ->  ( E. x  e.  A  ( ( G  o.  g ) `  x
)  =  0  \/ 
A. x  e.  A  ( ( G  o.  g ) `  x
)  =  1 ) )
153 nfcv 2281 . . . . . . . . . 10  |-  F/_ x
( { 0 ,  1 }  ^m  A
)
154 nfre1 2476 . . . . . . . . . . 11  |-  F/ x E. x  e.  A  ( f `  x
)  =  0
155 nfra1 2466 . . . . . . . . . . 11  |-  F/ x A. x  e.  A  ( f `  x
)  =  1
156154, 155nfor 1553 . . . . . . . . . 10  |-  F/ x
( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 )
157153, 156nfralxy 2471 . . . . . . . . 9  |-  F/ x A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 )
15868, 157nfan 1544 . . . . . . . 8  |-  F/ x
( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )
159 nfv 1508 . . . . . . . 8  |-  F/ x  g  e.  ( 2o  ^m  A )
160158, 159nfan 1544 . . . . . . 7  |-  F/ x
( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A
) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )
161143adantr 274 . . . . . . . . . . . . 13  |-  ( ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A
) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  ->  g : A --> 2o )
162117a1i 9 . . . . . . . . . . . . 13  |-  ( ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A
) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  ->  2o  C_ 
om )
163161, 162fssd 5285 . . . . . . . . . . . 12  |-  ( ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A
) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  ->  g : A --> om )
164 simpr 109 . . . . . . . . . . . 12  |-  ( ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A
) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  ->  x  e.  A )
165163, 164ffvelrnd 5556 . . . . . . . . . . 11  |-  ( ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A
) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  ->  (
g `  x )  e.  om )
166 f1ocnvfv1 5678 . . . . . . . . . . 11  |-  ( ( G : om -1-1-onto-> NN0  /\  ( g `
 x )  e. 
om )  ->  ( `' G `  ( G `
 ( g `  x ) ) )  =  ( g `  x ) )
16710, 165, 166sylancr 410 . . . . . . . . . 10  |-  ( ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A
) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  ->  ( `' G `  ( G `
 ( g `  x ) ) )  =  ( g `  x ) )
168167adantr 274 . . . . . . . . 9  |-  ( ( ( ( ( A  e.  V  /\  A. f  e.  ( {
0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x
)  =  0  \/ 
A. x  e.  A  ( f `  x
)  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  /\  (
( G  o.  g
) `  x )  =  0 )  -> 
( `' G `  ( G `  ( g `
 x ) ) )  =  ( g `
 x ) )
169 fvco3 5492 . . . . . . . . . . . . . 14  |-  ( ( g : A --> 2o  /\  x  e.  A )  ->  ( ( G  o.  g ) `  x
)  =  ( G `
 ( g `  x ) ) )
170161, 169sylancom 416 . . . . . . . . . . . . 13  |-  ( ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A
) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  ->  (
( G  o.  g
) `  x )  =  ( G `  ( g `  x
) ) )
171170eqeq1d 2148 . . . . . . . . . . . 12  |-  ( ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A
) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  ->  (
( ( G  o.  g ) `  x
)  =  0  <->  ( G `  ( g `  x ) )  =  0 ) )
172171biimpa 294 . . . . . . . . . . 11  |-  ( ( ( ( ( A  e.  V  /\  A. f  e.  ( {
0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x
)  =  0  \/ 
A. x  e.  A  ( f `  x
)  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  /\  (
( G  o.  g
) `  x )  =  0 )  -> 
( G `  (
g `  x )
)  =  0 )
173172fveq2d 5425 . . . . . . . . . 10  |-  ( ( ( ( ( A  e.  V  /\  A. f  e.  ( {
0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x
)  =  0  \/ 
A. x  e.  A  ( f `  x
)  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  /\  (
( G  o.  g
) `  x )  =  0 )  -> 
( `' G `  ( G `  ( g `
 x ) ) )  =  ( `' G `  0 ) )
174173, 31syl6eq 2188 . . . . . . . . 9  |-  ( ( ( ( ( A  e.  V  /\  A. f  e.  ( {
0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x
)  =  0  \/ 
A. x  e.  A  ( f `  x
)  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  /\  (
( G  o.  g
) `  x )  =  0 )  -> 
( `' G `  ( G `  ( g `
 x ) ) )  =  (/) )
175168, 174eqtr3d 2174 . . . . . . . 8  |-  ( ( ( ( ( A  e.  V  /\  A. f  e.  ( {
0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x
)  =  0  \/ 
A. x  e.  A  ( f `  x
)  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  /\  (
( G  o.  g
) `  x )  =  0 )  -> 
( g `  x
)  =  (/) )
176175exp31 361 . . . . . . 7  |-  ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  ->  (
x  e.  A  -> 
( ( ( G  o.  g ) `  x )  =  0  ->  ( g `  x )  =  (/) ) ) )
177160, 176reximdai 2530 . . . . . 6  |-  ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  ->  ( E. x  e.  A  ( ( G  o.  g ) `  x
)  =  0  ->  E. x  e.  A  ( g `  x
)  =  (/) ) )
178167adantr 274 . . . . . . . . 9  |-  ( ( ( ( ( A  e.  V  /\  A. f  e.  ( {
0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x
)  =  0  \/ 
A. x  e.  A  ( f `  x
)  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  /\  (
( G  o.  g
) `  x )  =  1 )  -> 
( `' G `  ( G `  ( g `
 x ) ) )  =  ( g `
 x ) )
179170eqeq1d 2148 . . . . . . . . . . . 12  |-  ( ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A
) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  ->  (
( ( G  o.  g ) `  x
)  =  1  <->  ( G `  ( g `  x ) )  =  1 ) )
180179biimpa 294 . . . . . . . . . . 11  |-  ( ( ( ( ( A  e.  V  /\  A. f  e.  ( {
0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x
)  =  0  \/ 
A. x  e.  A  ( f `  x
)  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  /\  (
( G  o.  g
) `  x )  =  1 )  -> 
( G `  (
g `  x )
)  =  1 )
181180fveq2d 5425 . . . . . . . . . 10  |-  ( ( ( ( ( A  e.  V  /\  A. f  e.  ( {
0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x
)  =  0  \/ 
A. x  e.  A  ( f `  x
)  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  /\  (
( G  o.  g
) `  x )  =  1 )  -> 
( `' G `  ( G `  ( g `
 x ) ) )  =  ( `' G `  1 ) )
182181, 48syl6eq 2188 . . . . . . . . 9  |-  ( ( ( ( ( A  e.  V  /\  A. f  e.  ( {
0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x
)  =  0  \/ 
A. x  e.  A  ( f `  x
)  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  /\  (
( G  o.  g
) `  x )  =  1 )  -> 
( `' G `  ( G `  ( g `
 x ) ) )  =  1o )
183178, 182eqtr3d 2174 . . . . . . . 8  |-  ( ( ( ( ( A  e.  V  /\  A. f  e.  ( {
0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x
)  =  0  \/ 
A. x  e.  A  ( f `  x
)  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  /\  (
( G  o.  g
) `  x )  =  1 )  -> 
( g `  x
)  =  1o )
184183ex 114 . . . . . . 7  |-  ( ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A
) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  /\  x  e.  A )  ->  (
( ( G  o.  g ) `  x
)  =  1  -> 
( g `  x
)  =  1o ) )
185160, 184ralimdaa 2498 . . . . . 6  |-  ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  ->  ( A. x  e.  A  ( ( G  o.  g ) `  x
)  =  1  ->  A. x  e.  A  ( g `  x
)  =  1o ) )
186177, 185orim12d 775 . . . . 5  |-  ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  ->  (
( E. x  e.  A  ( ( G  o.  g ) `  x )  =  0  \/  A. x  e.  A  ( ( G  o.  g ) `  x )  =  1 )  ->  ( E. x  e.  A  (
g `  x )  =  (/)  \/  A. x  e.  A  ( g `  x )  =  1o ) ) )
187152, 186mpd 13 . . . 4  |-  ( ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) )  /\  g  e.  ( 2o  ^m  A
) )  ->  ( E. x  e.  A  ( g `  x
)  =  (/)  \/  A. x  e.  A  (
g `  x )  =  1o ) )
188187ralrimiva 2505 . . 3  |-  ( ( A  e.  V  /\  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x
)  =  0  \/ 
A. x  e.  A  ( f `  x
)  =  1 ) )  ->  A. g  e.  ( 2o  ^m  A
) ( E. x  e.  A  ( g `  x )  =  (/)  \/ 
A. x  e.  A  ( g `  x
)  =  1o ) )
189105, 188impbida 585 . 2  |-  ( A  e.  V  ->  ( A. g  e.  ( 2o  ^m  A ) ( E. x  e.  A  ( g `  x
)  =  (/)  \/  A. x  e.  A  (
g `  x )  =  1o )  <->  A. f  e.  ( { 0 ,  1 }  ^m  A
) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) ) )
1901, 189bitrd 187 1  |-  ( A  e.  V  ->  ( A  e. Omni  <->  A. f  e.  ( { 0 ,  1 }  ^m  A ) ( E. x  e.  A  ( f `  x )  =  0  \/  A. x  e.  A  ( f `  x )  =  1 ) ) )
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 103    <-> wb 104    \/ wo 697    = wceq 1331   T. wtru 1332    e. wcel 1480   A.wral 2416   E.wrex 2417   _Vcvv 2686    C_ wss 3071   (/)c0 3363   {cpr 3528    |-> cmpt 3989   suc csuc 4287   omcom 4504   `'ccnv 4538    |` cres 4541    o. ccom 4543    Fn wfn 5118   -->wf 5119   -1-1-onto->wf1o 5122   ` cfv 5123  (class class class)co 5774  freccfrec 6287   1oc1o 6306   2oc2o 6307    ^m cmap 6542  Omnicomni 7004   0cc0 7620   1c1 7621    + caddc 7623   NN0cn0 8977   ZZcz 9054
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-ia1 105  ax-ia2 106  ax-ia3 107  ax-in1 603  ax-in2 604  ax-io 698  ax-5 1423  ax-7 1424  ax-gen 1425  ax-ie1 1469  ax-ie2 1470  ax-8 1482  ax-10 1483  ax-11 1484  ax-i12 1485  ax-bndl 1486  ax-4 1487  ax-13 1491  ax-14 1492  ax-17 1506  ax-i9 1510  ax-ial 1514  ax-i5r 1515  ax-ext 2121  ax-coll 4043  ax-sep 4046  ax-nul 4054  ax-pow 4098  ax-pr 4131  ax-un 4355  ax-setind 4452  ax-iinf 4502  ax-cnex 7711  ax-resscn 7712  ax-1cn 7713  ax-1re 7714  ax-icn 7715  ax-addcl 7716  ax-addrcl 7717  ax-mulcl 7718  ax-addcom 7720  ax-addass 7722  ax-distr 7724  ax-i2m1 7725  ax-0lt1 7726  ax-0id 7728  ax-rnegex 7729  ax-cnre 7731  ax-pre-ltirr 7732  ax-pre-ltwlin 7733  ax-pre-lttrn 7734  ax-pre-ltadd 7736
This theorem depends on definitions:  df-bi 116  df-3or 963  df-3an 964  df-tru 1334  df-fal 1337  df-nf 1437  df-sb 1736  df-eu 2002  df-mo 2003  df-clab 2126  df-cleq 2132  df-clel 2135  df-nfc 2270  df-ne 2309  df-nel 2404  df-ral 2421  df-rex 2422  df-reu 2423  df-rab 2425  df-v 2688  df-sbc 2910  df-csb 3004  df-dif 3073  df-un 3075  df-in 3077  df-ss 3084  df-nul 3364  df-pw 3512  df-sn 3533  df-pr 3534  df-op 3536  df-uni 3737  df-int 3772  df-iun 3815  df-br 3930  df-opab 3990  df-mpt 3991  df-tr 4027  df-id 4215  df-iord 4288  df-on 4290  df-ilim 4291  df-suc 4293  df-iom 4505  df-xp 4545  df-rel 4546  df-cnv 4547  df-co 4548  df-dm 4549  df-rn 4550  df-res 4551  df-ima 4552  df-iota 5088  df-fun 5125  df-fn 5126  df-f 5127  df-f1 5128  df-fo 5129  df-f1o 5130  df-fv 5131  df-riota 5730  df-ov 5777  df-oprab 5778  df-mpo 5779  df-recs 6202  df-frec 6288  df-1o 6313  df-2o 6314  df-map 6544  df-omni 7006  df-pnf 7802  df-mnf 7803  df-xr 7804  df-ltxr 7805  df-le 7806  df-sub 7935  df-neg 7936  df-inn 8721  df-n0 8978  df-z 9055  df-uz 9327
This theorem is referenced by:  isomninn  13226
  Copyright terms: Public domain W3C validator