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

Theorem bnj1398 34510
Description: Technical lemma for bnj60 34538. 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 4317 . . . . . . . . . 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 34318 . . . . . . . . 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 34236 . . . . . . . 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 1712 . . . . . . . . . . . . 13  |-  F/ y ps
8 nfv 1712 . . . . . . . . . . . . 13  |-  F/ y  x  e.  D
9 nfra1 2835 . . . . . . . . . . . . 13  |-  F/ y A. y  e.  D  -.  y R x
107, 8, 9nf3an 1935 . . . . . . . . . . . 12  |-  F/ y ( ps  /\  x  e.  D  /\  A. y  e.  D  -.  y R x )
116, 10nfxfr 1650 . . . . . . . . . . 11  |-  F/ y ch
12 nfiu1 4345 . . . . . . . . . . . 12  |-  F/_ y U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) )
1312nfcri 2609 . . . . . . . . . . 11  |-  F/ y  z  e.  U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) )
1411, 13nfan 1933 . . . . . . . . . 10  |-  F/ y ( ch  /\  z  e.  U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) ) )
151, 14nfxfr 1650 . . . . . . . . 9  |-  F/ y th
1615nfri 1879 . . . . . . . 8  |-  ( th 
->  A. y th )
174, 5, 16bnj1521 34329 . . . . . . 7  |-  ( th 
->  E. y et )
18 bnj1398.6 . . . . . . . . . . . . . . . . . . 19  |-  ( ps  <->  ( R  FrSe  A  /\  D  =/=  (/) ) )
19 nfv 1712 . . . . . . . . . . . . . . . . . . . 20  |-  F/ f  R  FrSe  A
20 bnj1398.5 . . . . . . . . . . . . . . . . . . . . . 22  |-  D  =  { x  e.  A  |  -.  E. f ta }
21 nfe1 1845 . . . . . . . . . . . . . . . . . . . . . . . 24  |-  F/ f E. f ta
2221nfn 1906 . . . . . . . . . . . . . . . . . . . . . . 23  |-  F/ f  -.  E. f ta
23 nfcv 2616 . . . . . . . . . . . . . . . . . . . . . . 23  |-  F/_ f A
2422, 23nfrab 3036 . . . . . . . . . . . . . . . . . . . . . 22  |-  F/_ f { x  e.  A  |  -.  E. f ta }
2520, 24nfcxfr 2614 . . . . . . . . . . . . . . . . . . . . 21  |-  F/_ f D
26 nfcv 2616 . . . . . . . . . . . . . . . . . . . . 21  |-  F/_ f (/)
2725, 26nfne 2785 . . . . . . . . . . . . . . . . . . . 20  |-  F/ f  D  =/=  (/)
2819, 27nfan 1933 . . . . . . . . . . . . . . . . . . 19  |-  F/ f ( R  FrSe  A  /\  D  =/=  (/) )
2918, 28nfxfr 1650 . . . . . . . . . . . . . . . . . 18  |-  F/ f ps
3025nfcri 2609 . . . . . . . . . . . . . . . . . 18  |-  F/ f  x  e.  D
31 nfv 1712 . . . . . . . . . . . . . . . . . . 19  |-  F/ f  -.  y R x
3225, 31nfral 2840 . . . . . . . . . . . . . . . . . 18  |-  F/ f A. y  e.  D  -.  y R x
3329, 30, 32nf3an 1935 . . . . . . . . . . . . . . . . 17  |-  F/ f ( ps  /\  x  e.  D  /\  A. y  e.  D  -.  y R x )
346, 33nfxfr 1650 . . . . . . . . . . . . . . . 16  |-  F/ f ch
35 nfv 1712 . . . . . . . . . . . . . . . 16  |-  F/ f  z  e.  U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) )
3634, 35nfan 1933 . . . . . . . . . . . . . . 15  |-  F/ f ( ch  /\  z  e.  U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) ) )
371, 36nfxfr 1650 . . . . . . . . . . . . . 14  |-  F/ f th
38 nfv 1712 . . . . . . . . . . . . . 14  |-  F/ f  y  e.  pred (
x ,  A ,  R )
39 nfv 1712 . . . . . . . . . . . . . 14  |-  F/ f  z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) )
4037, 38, 39nf3an 1935 . . . . . . . . . . . . 13  |-  F/ f ( th  /\  y  e.  pred ( x ,  A ,  R )  /\  z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
415, 40nfxfr 1650 . . . . . . . . . . . 12  |-  F/ f et
4241nfri 1879 . . . . . . . . . . 11  |-  ( et 
->  A. f et )
431simplbi 458 . . . . . . . . . . . . 13  |-  ( th 
->  ch )
445, 43bnj835 34237 . . . . . . . . . . . 12  |-  ( et 
->  ch )
455simp2bi 1010 . . . . . . . . . . . 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 34509 . . . . . . . . . . . . 13  |-  ( ch 
->  A. y  e.  pred  ( x ,  A ,  R ) E. f ta' )
52 rsp 2820 . . . . . . . . . . . . 13  |-  ( A. y  e.  pred  ( x ,  A ,  R
) E. f ta'  ->  ( y  e.  pred ( x ,  A ,  R )  ->  E. f ta' ) )
5351, 52syl 16 . . . . . . . . . . . 12  |-  ( ch 
->  ( y  e.  pred ( x ,  A ,  R )  ->  E. f ta' ) )
5444, 45, 53sylc 60 . . . . . . . . . . 11  |-  ( et 
->  E. f ta' )
5542, 54bnj596 34223 . . . . . . . . . 10  |-  ( et 
->  E. f ( et 
/\  ta' ) )
5646, 47, 48, 49, 50bnj1373 34506 . . . . . . . . . . . . . 14  |-  ( ta'  <->  (
f  e.  C  /\  dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) ) ) )
5756simplbi 458 . . . . . . . . . . . . 13  |-  ( ta'  ->  f  e.  C )
5857adantl 464 . . . . . . . . . . . 12  |-  ( ( et  /\  ta' )  -> 
f  e.  C )
5956simprbi 462 . . . . . . . . . . . . 13  |-  ( ta'  ->  dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
60 rspe 2912 . . . . . . . . . . . . 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 475 . . . . . . . . . . . 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 2581 . . . . . . . . . . . . 13  |-  ( f  e.  H  <->  E. y  e.  pred  ( x ,  A ,  R ) ta' )
6456rexbii 2956 . . . . . . . . . . . . 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 3009 . . . . . . . . . . . . 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 271 . . . . . . . . . . . 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 662 . . . . . . . . . . 11  |-  ( ( et  /\  ta' )  -> 
f  e.  H )
685simp3bi 1011 . . . . . . . . . . . . 13  |-  ( et 
->  z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
6968adantr 463 . . . . . . . . . . . 12  |-  ( ( et  /\  ta' )  -> 
z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
7059adantl 464 . . . . . . . . . . . 12  |-  ( ( et  /\  ta' )  ->  dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
7169, 70eleqtrrd 2545 . . . . . . . . . . 11  |-  ( ( et  /\  ta' )  -> 
z  e.  dom  f
)
7267, 71jca 530 . . . . . . . . . 10  |-  ( ( et  /\  ta' )  -> 
( f  e.  H  /\  z  e.  dom  f ) )
7355, 72bnj593 34222 . . . . . . . . 9  |-  ( et 
->  E. f ( f  e.  H  /\  z  e.  dom  f ) )
74 df-rex 2810 . . . . . . . . 9  |-  ( E. f  e.  H  z  e.  dom  f  <->  E. f
( f  e.  H  /\  z  e.  dom  f ) )
7573, 74sylibr 212 . . . . . . . 8  |-  ( et 
->  E. f  e.  H  z  e.  dom  f )
76 bnj1398.10 . . . . . . . . . . . 12  |-  P  = 
U. H
7776dmeqi 5193 . . . . . . . . . . 11  |-  dom  P  =  dom  U. H
7862bnj1317 34300 . . . . . . . . . . . 12  |-  ( w  e.  H  ->  A. f  w  e.  H )
7978bnj1400 34314 . . . . . . . . . . 11  |-  dom  U. H  =  U_ f  e.  H  dom  f
8077, 79eqtri 2483 . . . . . . . . . 10  |-  dom  P  =  U_ f  e.  H  dom  f
8180eleq2i 2532 . . . . . . . . 9  |-  ( z  e.  dom  P  <->  z  e.  U_ f  e.  H  dom  f )
82 eliun 4320 . . . . . . . . 9  |-  ( z  e.  U_ f  e.  H  dom  f  <->  E. f  e.  H  z  e.  dom  f )
8381, 82bitri 249 . . . . . . . 8  |-  ( z  e.  dom  P  <->  E. f  e.  H  z  e.  dom  f )
8475, 83sylibr 212 . . . . . . 7  |-  ( et 
->  z  e.  dom  P )
8517, 84bnj593 34222 . . . . . 6  |-  ( th 
->  E. y  z  e. 
dom  P )
86 nfre1 2915 . . . . . . . . . . . 12  |-  F/ y E. y  e.  pred  ( x ,  A ,  R ) ta'
8786nfab 2620 . . . . . . . . . . 11  |-  F/_ y { f  |  E. y  e.  pred  ( x ,  A ,  R
) ta' }
8862, 87nfcxfr 2614 . . . . . . . . . 10  |-  F/_ y H
8988nfuni 4241 . . . . . . . . 9  |-  F/_ y U. H
9076, 89nfcxfr 2614 . . . . . . . 8  |-  F/_ y P
9190nfdm 5233 . . . . . . 7  |-  F/_ y dom  P
9291nfcrii 2608 . . . . . 6  |-  ( z  e.  dom  P  ->  A. y  z  e.  dom  P )
9385, 92bnj1397 34313 . . . . 5  |-  ( th 
->  z  e.  dom  P )
941, 93sylbir 213 . . . 4  |-  ( ( ch  /\  z  e. 
U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) ) )  ->  z  e.  dom  P )
9594ex 432 . . 3  |-  ( ch 
->  ( z  e.  U_ y  e.  pred  ( x ,  A ,  R
) ( { y }  u.  trCl (
y ,  A ,  R ) )  -> 
z  e.  dom  P
) )
9695ssrdv 3495 . 2  |-  ( ch 
->  U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) )  C_  dom  P )
97 simpr 459 . . . . . . 7  |-  ( ( f  e.  H  /\  z  e.  dom  f )  ->  z  e.  dom  f )
9866simprbi 462 . . . . . . . 8  |-  ( f  e.  H  ->  E. y  e.  pred  ( x ,  A ,  R ) dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
9998adantr 463 . . . . . . 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 3009 . . . . . . . 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 2527 . . . . . . . . . 10  |-  ( dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) )  -> 
( z  e.  dom  f 
<->  z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) ) )
102101biimpac 484 . . . . . . . . 9  |-  ( ( z  e.  dom  f  /\  dom  f  =  ( { y }  u.  trCl ( y ,  A ,  R ) ) )  ->  z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
103102reximi 2922 . . . . . . . 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 213 . . . . . . 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 659 . . . . . 6  |-  ( ( f  e.  H  /\  z  e.  dom  f )  ->  E. y  e.  pred  ( x ,  A ,  R ) z  e.  ( { y }  u.  trCl ( y ,  A ,  R ) ) )
106105rexlimiva 2942 . . . . 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 4320 . . . . 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 266 . . . 4  |-  ( z  e.  dom  P  -> 
z  e.  U_ y  e.  pred  ( x ,  A ,  R ) ( { y }  u.  trCl ( y ,  A ,  R ) ) )
109108ssriv 3493 . . 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 3506 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 184    /\ wa 367    /\ w3a 971    = wceq 1398   E.wex 1617    e. wcel 1823   {cab 2439    =/= wne 2649   A.wral 2804   E.wrex 2805   {crab 2808   [.wsbc 3324    u. cun 3459    C_ wss 3461   (/)c0 3783   {csn 4016   <.cop 4022   U.cuni 4235   U_ciun 4315   class class class wbr 4439   dom cdm 4988    |` cres 4990    Fn wfn 5565   ` cfv 5570    predc-bnj14 34160    FrSe w-bnj15 34164    trClc-bnj18 34166
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1623  ax-4 1636  ax-5 1709  ax-6 1752  ax-7 1795  ax-10 1842  ax-11 1847  ax-12 1859  ax-13 2004  ax-ext 2432
This theorem depends on definitions:  df-bi 185  df-or 368  df-an 369  df-3an 973  df-tru 1401  df-ex 1618  df-nf 1622  df-sb 1745  df-clab 2440  df-cleq 2446  df-clel 2449  df-nfc 2604  df-ne 2651  df-ral 2809  df-rex 2810  df-rab 2813  df-v 3108  df-sbc 3325  df-dif 3464  df-un 3466  df-in 3468  df-ss 3475  df-nul 3784  df-if 3930  df-sn 4017  df-pr 4019  df-op 4023  df-uni 4236  df-iun 4317  df-br 4440  df-dm 4998  df-bnj14 34161  df-bnj18 34167
This theorem is referenced by:  bnj1415  34514
  Copyright terms: Public domain W3C validator