Users' Mathboxes Mathbox for Jonathan Ben-Naim < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  bnj1398 Structured version   Visualization version   Unicode version

Theorem bnj1398 29915
Description: Technical lemma for bnj60 29943. This lemma may no longer be used or have become an indirect lemma of the theorem in question (i.e. a lemma of a lemma... of the theorem). (Contributed by Jonathan Ben-Naim, 3-Jun-2011.) (New usage is discouraged.)
Hypotheses
Ref Expression
bnj1398.1  |-  B  =  { d  |  ( d  C_  A  /\  A. x  e.  d  pred ( x ,  A ,  R )  C_  d
) }
bnj1398.2  |-  Y  = 
<. x ,  ( f  |`  pred ( x ,  A ,  R ) ) >.
bnj1398.3  |-  C  =  { f  |  E. d  e.  B  (
f  Fn  d  /\  A. x  e.  d  ( f `  x )  =  ( G `  Y ) ) }
bnj1398.4  |-  ( ta  <->  ( f  e.  C  /\  dom  f  =  ( { x }  u.  trCl ( x ,  A ,  R ) ) ) )
bnj1398.5  |-  D  =  { x  e.  A  |  -.  E. f ta }
bnj1398.6  |-  ( ps  <->  ( R  FrSe  A  /\  D  =/=  (/) ) )
bnj1398.7  |-  ( ch  <->  ( ps  /\  x  e.  D  /\  A. y  e.  D  -.  y R x ) )
bnj1398.8  |-  ( ta'  <->  [. y  /  x ]. ta )
bnj1398.9  |-  H  =  { f  |  E. y  e.  pred  ( x ,  A ,  R
) ta' }
bnj1398.10  |-  P  = 
U. H
bnj1398.11  |-  ( th  <->  ( ch  /\  z  e. 
U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) ) ) )
bnj1398.12  |-  ( et  <->  ( th  /\  y  e. 
pred ( x ,  A ,  R )  /\  z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) ) )
Assertion
Ref Expression
bnj1398  |-  ( ch 
->  U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) )  =  dom  P )
Distinct variable groups:    A, f, x, y, z    B, f   
y, C    y, D    z, H    z, P    R, f, x, y, z    ch, z    f, d, x    ps, y    ta, y
Allowed substitution hints:    ps( x, z, f, d)    ch( x, y, f, d)    th( x, y, z, f, d)    ta( x, z, f, d)    et( x, y, z, f, d)    A( d)    B( x, y, z, d)    C( x, z, f, d)    D( x, z, f, d)    P( x, y, f, d)    R( d)    G( x, y, z, f, d)    H( x, y, f, d)    Y( x, y, z, f, d)    ta'( x, y, z, f, d)

Proof of Theorem bnj1398
Dummy variable  w is distinct from all other variables.
StepHypRef Expression
1 bnj1398.11 . . . . 5  |-  ( th  <->  ( ch  /\  z  e. 
U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) ) ) )
2 df-iun 4271 . . . . . . . . . 10  |-  U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) )  =  { z  |  E. y  e. 
pred  ( x ,  A ,  R ) z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) }
32bnj1436 29723 . . . . . . . . 9  |-  ( z  e.  U_ y  e. 
pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) )  ->  E. y  e.  pred  ( x ,  A ,  R ) z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
41, 3bnj833 29641 . . . . . . . 8  |-  ( th 
->  E. y  e.  pred  ( x ,  A ,  R ) z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
5 bnj1398.12 . . . . . . . 8  |-  ( et  <->  ( th  /\  y  e. 
pred ( x ,  A ,  R )  /\  z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) ) )
6 bnj1398.7 . . . . . . . . . . . 12  |-  ( ch  <->  ( ps  /\  x  e.  D  /\  A. y  e.  D  -.  y R x ) )
7 nfv 1769 . . . . . . . . . . . . 13  |-  F/ y ps
8 nfv 1769 . . . . . . . . . . . . 13  |-  F/ y  x  e.  D
9 nfra1 2785 . . . . . . . . . . . . 13  |-  F/ y A. y  e.  D  -.  y R x
107, 8, 9nf3an 2033 . . . . . . . . . . . 12  |-  F/ y ( ps  /\  x  e.  D  /\  A. y  e.  D  -.  y R x )
116, 10nfxfr 1704 . . . . . . . . . . 11  |-  F/ y ch
12 nfiu1 4299 . . . . . . . . . . . 12  |-  F/_ y U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) )
1312nfcri 2606 . . . . . . . . . . 11  |-  F/ y  z  e.  U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) )
1411, 13nfan 2031 . . . . . . . . . 10  |-  F/ y ( ch  /\  z  e.  U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) ) )
151, 14nfxfr 1704 . . . . . . . . 9  |-  F/ y th
1615nfri 1972 . . . . . . . 8  |-  ( th 
->  A. y th )
174, 5, 16bnj1521 29734 . . . . . . 7  |-  ( th 
->  E. y et )
18 bnj1398.6 . . . . . . . . . . . . . . . . . . 19  |-  ( ps  <->  ( R  FrSe  A  /\  D  =/=  (/) ) )
19 nfv 1769 . . . . . . . . . . . . . . . . . . . 20  |-  F/ f  R  FrSe  A
20 bnj1398.5 . . . . . . . . . . . . . . . . . . . . . 22  |-  D  =  { x  e.  A  |  -.  E. f ta }
21 nfe1 1935 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  F/ f E. f ta
2221nfn 2003 . . . . . . . . . . . . . . . . . . . . . . 23  |-  F/ f  -.  E. f ta
23 nfcv 2612 . . . . . . . . . . . . . . . . . . . . . . 23  |-  F/_ f A
2422, 23nfrab 2958 . . . . . . . . . . . . . . . . . . . . . 22  |-  F/_ f { x  e.  A  |  -.  E. f ta }
2520, 24nfcxfr 2610 . . . . . . . . . . . . . . . . . . . . 21  |-  F/_ f D
26 nfcv 2612 . . . . . . . . . . . . . . . . . . . . 21  |-  F/_ f (/)
2725, 26nfne 2742 . . . . . . . . . . . . . . . . . . . 20  |-  F/ f  D  =/=  (/)
2819, 27nfan 2031 . . . . . . . . . . . . . . . . . . 19  |-  F/ f ( R  FrSe  A  /\  D  =/=  (/) )
2918, 28nfxfr 1704 . . . . . . . . . . . . . . . . . 18  |-  F/ f ps
3025nfcri 2606 . . . . . . . . . . . . . . . . . 18  |-  F/ f  x  e.  D
31 nfv 1769 . . . . . . . . . . . . . . . . . . 19  |-  F/ f  -.  y R x
3225, 31nfral 2789 . . . . . . . . . . . . . . . . . 18  |-  F/ f A. y  e.  D  -.  y R x
3329, 30, 32nf3an 2033 . . . . . . . . . . . . . . . . 17  |-  F/ f ( ps  /\  x  e.  D  /\  A. y  e.  D  -.  y R x )
346, 33nfxfr 1704 . . . . . . . . . . . . . . . 16  |-  F/ f ch
35 nfv 1769 . . . . . . . . . . . . . . . 16  |-  F/ f  z  e.  U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) )
3634, 35nfan 2031 . . . . . . . . . . . . . . 15  |-  F/ f ( ch  /\  z  e.  U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) ) )
371, 36nfxfr 1704 . . . . . . . . . . . . . 14  |-  F/ f th
38 nfv 1769 . . . . . . . . . . . . . 14  |-  F/ f  y  e.  pred (
x ,  A ,  R )
39 nfv 1769 . . . . . . . . . . . . . 14  |-  F/ f  z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) )
4037, 38, 39nf3an 2033 . . . . . . . . . . . . 13  |-  F/ f ( th  /\  y  e.  pred ( x ,  A ,  R )  /\  z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
415, 40nfxfr 1704 . . . . . . . . . . . 12  |-  F/ f et
4241nfri 1972 . . . . . . . . . . 11  |-  ( et 
->  A. f et )
431simplbi 467 . . . . . . . . . . . . 13  |-  ( th 
->  ch )
445, 43bnj835 29642 . . . . . . . . . . . 12  |-  ( et 
->  ch )
455simp2bi 1046 . . . . . . . . . . . 12  |-  ( et 
->  y  e.  pred ( x ,  A ,  R ) )
46 bnj1398.1 . . . . . . . . . . . . . 14  |-  B  =  { d  |  ( d  C_  A  /\  A. x  e.  d  pred ( x ,  A ,  R )  C_  d
) }
47 bnj1398.2 . . . . . . . . . . . . . 14  |-  Y  = 
<. x ,  ( f  |`  pred ( x ,  A ,  R ) ) >.
48 bnj1398.3 . . . . . . . . . . . . . 14  |-  C  =  { f  |  E. d  e.  B  (
f  Fn  d  /\  A. x  e.  d  ( f `  x )  =  ( G `  Y ) ) }
49 bnj1398.4 . . . . . . . . . . . . . 14  |-  ( ta  <->  ( f  e.  C  /\  dom  f  =  ( { x }  u.  trCl ( x ,  A ,  R ) ) ) )
50 bnj1398.8 . . . . . . . . . . . . . 14  |-  ( ta'  <->  [. y  /  x ]. ta )
5146, 47, 48, 49, 20, 18, 6, 50bnj1388 29914 . . . . . . . . . . . . 13  |-  ( ch 
->  A. y  e.  pred  ( x ,  A ,  R ) E. f ta' )
52 rsp 2773 . . . . . . . . . . . . 13  |-  ( A. y  e.  pred  ( x ,  A ,  R
) E. f ta'  ->  ( y  e.  pred ( x ,  A ,  R )  ->  E. f ta' ) )
5351, 52syl 17 . . . . . . . . . . . 12  |-  ( ch 
->  ( y  e.  pred ( x ,  A ,  R )  ->  E. f ta' ) )
5444, 45, 53sylc 61 . . . . . . . . . . 11  |-  ( et 
->  E. f ta' )
5542, 54bnj596 29628 . . . . . . . . . 10  |-  ( et 
->  E. f ( et 
/\  ta' ) )
5646, 47, 48, 49, 50bnj1373 29911 . . . . . . . . . . . . . 14  |-  ( ta'  <->  (
f  e.  C  /\  dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) ) ) )
5756simplbi 467 . . . . . . . . . . . . 13  |-  ( ta'  ->  f  e.  C )
5857adantl 473 . . . . . . . . . . . 12  |-  ( ( et  /\  ta' )  -> 
f  e.  C )
5956simprbi 471 . . . . . . . . . . . . 13  |-  ( ta'  ->  dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
60 rspe 2844 . . . . . . . . . . . . 13  |-  ( ( y  e.  pred (
x ,  A ,  R )  /\  dom  f  =  ( {
y }  u.  trCl ( y ,  A ,  R ) ) )  ->  E. y  e.  pred  ( x ,  A ,  R ) dom  f  =  ( { y }  u.  trCl (
y ,  A ,  R ) ) )
6145, 59, 60syl2an 485 . . . . . . . . . . . 12  |-  ( ( et  /\  ta' )  ->  E. y  e.  pred  ( x ,  A ,  R ) dom  f  =  ( { y }  u.  trCl (
y ,  A ,  R ) ) )
62 bnj1398.9 . . . . . . . . . . . . . 14  |-  H  =  { f  |  E. y  e.  pred  ( x ,  A ,  R
) ta' }
6362abeq2i 2583 . . . . . . . . . . . . 13  |-  ( f  e.  H  <->  E. y  e.  pred  ( x ,  A ,  R ) ta' )
6456rexbii 2881 . . . . . . . . . . . . 13  |-  ( E. y  e.  pred  (
x ,  A ,  R ) ta'  <->  E. y  e.  pred  ( x ,  A ,  R ) ( f  e.  C  /\  dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) ) ) )
65 r19.42v 2931 . . . . . . . . . . . . 13  |-  ( E. y  e.  pred  (
x ,  A ,  R ) ( f  e.  C  /\  dom  f  =  ( {
y }  u.  trCl ( y ,  A ,  R ) ) )  <-> 
( f  e.  C  /\  E. y  e.  pred  ( x ,  A ,  R ) dom  f  =  ( { y }  u.  trCl (
y ,  A ,  R ) ) ) )
6663, 64, 653bitri 279 . . . . . . . . . . . 12  |-  ( f  e.  H  <->  ( f  e.  C  /\  E. y  e.  pred  ( x ,  A ,  R ) dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) ) ) )
6758, 61, 66sylanbrc 677 . . . . . . . . . . 11  |-  ( ( et  /\  ta' )  -> 
f  e.  H )
685simp3bi 1047 . . . . . . . . . . . . 13  |-  ( et 
->  z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
6968adantr 472 . . . . . . . . . . . 12  |-  ( ( et  /\  ta' )  -> 
z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
7059adantl 473 . . . . . . . . . . . 12  |-  ( ( et  /\  ta' )  ->  dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
7169, 70eleqtrrd 2552 . . . . . . . . . . 11  |-  ( ( et  /\  ta' )  -> 
z  e.  dom  f
)
7267, 71jca 541 . . . . . . . . . 10  |-  ( ( et  /\  ta' )  -> 
( f  e.  H  /\  z  e.  dom  f ) )
7355, 72bnj593 29627 . . . . . . . . 9  |-  ( et 
->  E. f ( f  e.  H  /\  z  e.  dom  f ) )
74 df-rex 2762 . . . . . . . . 9  |-  ( E. f  e.  H  z  e.  dom  f  <->  E. f
( f  e.  H  /\  z  e.  dom  f ) )
7573, 74sylibr 217 . . . . . . . 8  |-  ( et 
->  E. f  e.  H  z  e.  dom  f )
76 bnj1398.10 . . . . . . . . . . . 12  |-  P  = 
U. H
7776dmeqi 5041 . . . . . . . . . . 11  |-  dom  P  =  dom  U. H
7862bnj1317 29705 . . . . . . . . . . . 12  |-  ( w  e.  H  ->  A. f  w  e.  H )
7978bnj1400 29719 . . . . . . . . . . 11  |-  dom  U. H  =  U_ f  e.  H  dom  f
8077, 79eqtri 2493 . . . . . . . . . 10  |-  dom  P  =  U_ f  e.  H  dom  f
8180eleq2i 2541 . . . . . . . . 9  |-  ( z  e.  dom  P  <->  z  e.  U_ f  e.  H  dom  f )
82 eliun 4274 . . . . . . . . 9  |-  ( z  e.  U_ f  e.  H  dom  f  <->  E. f  e.  H  z  e.  dom  f )
8381, 82bitri 257 . . . . . . . 8  |-  ( z  e.  dom  P  <->  E. f  e.  H  z  e.  dom  f )
8475, 83sylibr 217 . . . . . . 7  |-  ( et 
->  z  e.  dom  P )
8517, 84bnj593 29627 . . . . . 6  |-  ( th 
->  E. y  z  e. 
dom  P )
86 nfre1 2846 . . . . . . . . . . . 12  |-  F/ y E. y  e.  pred  ( x ,  A ,  R ) ta'
8786nfab 2616 . . . . . . . . . . 11  |-  F/_ y { f  |  E. y  e.  pred  ( x ,  A ,  R
) ta' }
8862, 87nfcxfr 2610 . . . . . . . . . 10  |-  F/_ y H
8988nfuni 4196 . . . . . . . . 9  |-  F/_ y U. H
9076, 89nfcxfr 2610 . . . . . . . 8  |-  F/_ y P
9190nfdm 5082 . . . . . . 7  |-  F/_ y dom  P
9291nfcrii 2605 . . . . . 6  |-  ( z  e.  dom  P  ->  A. y  z  e.  dom  P )
9385, 92bnj1397 29718 . . . . 5  |-  ( th 
->  z  e.  dom  P )
941, 93sylbir 218 . . . 4  |-  ( ( ch  /\  z  e. 
U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) ) )  ->  z  e.  dom  P )
9594ex 441 . . 3  |-  ( ch 
->  ( z  e.  U_ y  e.  pred  ( x ,  A ,  R
) ( { y }  u.  trCl (
y ,  A ,  R ) )  -> 
z  e.  dom  P
) )
9695ssrdv 3424 . 2  |-  ( ch 
->  U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) )  C_  dom  P )
97 simpr 468 . . . . . . 7  |-  ( ( f  e.  H  /\  z  e.  dom  f )  ->  z  e.  dom  f )
9866simprbi 471 . . . . . . . 8  |-  ( f  e.  H  ->  E. y  e.  pred  ( x ,  A ,  R ) dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
9998adantr 472 . . . . . . 7  |-  ( ( f  e.  H  /\  z  e.  dom  f )  ->  E. y  e.  pred  ( x ,  A ,  R ) dom  f  =  ( { y }  u.  trCl (
y ,  A ,  R ) ) )
100 r19.42v 2931 . . . . . . . 8  |-  ( E. y  e.  pred  (
x ,  A ,  R ) ( z  e.  dom  f  /\  dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) ) )  <-> 
( z  e.  dom  f  /\  E. y  e. 
pred  ( x ,  A ,  R ) dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) ) ) )
101 eleq2 2538 . . . . . . . . . 10  |-  ( dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) )  -> 
( z  e.  dom  f 
<->  z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) ) )
102101biimpac 494 . . . . . . . . 9  |-  ( ( z  e.  dom  f  /\  dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) ) )  ->  z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
103102reximi 2852 . . . . . . . 8  |-  ( E. y  e.  pred  (
x ,  A ,  R ) ( z  e.  dom  f  /\  dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) ) )  ->  E. y  e.  pred  ( x ,  A ,  R ) z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
104100, 103sylbir 218 . . . . . . 7  |-  ( ( z  e.  dom  f  /\  E. y  e.  pred  ( x ,  A ,  R ) dom  f  =  ( { y }  u.  trCl (
y ,  A ,  R ) ) )  ->  E. y  e.  pred  ( x ,  A ,  R ) z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
10597, 99, 104syl2anc 673 . . . . . 6  |-  ( ( f  e.  H  /\  z  e.  dom  f )  ->  E. y  e.  pred  ( x ,  A ,  R ) z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
106105rexlimiva 2868 . . . . 5  |-  ( E. f  e.  H  z  e.  dom  f  ->  E. y  e.  pred  ( x ,  A ,  R ) z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
107 eliun 4274 . . . . 5  |-  ( z  e.  U_ y  e. 
pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) )  <->  E. y  e.  pred  ( x ,  A ,  R ) z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
108106, 83, 1073imtr4i 274 . . . 4  |-  ( z  e.  dom  P  -> 
z  e.  U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) ) )
109108ssriv 3422 . . 3  |-  dom  P  C_ 
U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) )
110109a1i 11 . 2  |-  ( ch 
->  dom  P  C_  U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) ) )
11196, 110eqssd 3435 1  |-  ( ch 
->  U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) )  =  dom  P )
Colors of variables: wff setvar class
Syntax hints:   -. wn 3    -> wi 4    <-> wb 189    /\ wa 376    /\ w3a 1007    = wceq 1452   E.wex 1671    e. wcel 1904   {cab 2457    =/= wne 2641   A.wral 2756   E.wrex 2757   {crab 2760   [.wsbc 3255    u. cun 3388    C_ wss 3390   (/)c0 3722   {csn 3959   <.cop 3965   U.cuni 4190   U_ciun 4269   class class class wbr 4395   dom cdm 4839    |` cres 4841    Fn wfn 5584   ` cfv 5589    predc-bnj14 29565    FrSe w-bnj15 29569    trClc-bnj18 29571
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1677  ax-4 1690  ax-5 1766  ax-6 1813  ax-7 1859  ax-10 1932  ax-11 1937  ax-12 1950  ax-13 2104  ax-ext 2451
This theorem depends on definitions:  df-bi 190  df-or 377  df-an 378  df-3an 1009  df-tru 1455  df-ex 1672  df-nf 1676  df-sb 1806  df-clab 2458  df-cleq 2464  df-clel 2467  df-nfc 2601  df-ne 2643  df-ral 2761  df-rex 2762  df-rab 2765  df-v 3033  df-sbc 3256  df-dif 3393  df-un 3395  df-in 3397  df-ss 3404  df-nul 3723  df-if 3873  df-sn 3960  df-pr 3962  df-op 3966  df-uni 4191  df-iun 4271  df-br 4396  df-dm 4849  df-bnj14 29566  df-bnj18 29572
This theorem is referenced by:  bnj1415  29919
  Copyright terms: Public domain W3C validator