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

Theorem bnj1145 29023
Description: Technical lemma for bnj69 29040. 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
bnj1145.1  |-  ( ph  <->  ( f `  (/) )  = 
pred ( X ,  A ,  R )
)
bnj1145.2  |-  ( ps  <->  A. i  e.  om  ( suc  i  e.  n  ->  ( f `  suc  i )  =  U_ y  e.  ( f `  i )  pred (
y ,  A ,  R ) ) )
bnj1145.3  |-  D  =  ( om  \  { (/)
} )
bnj1145.4  |-  B  =  { f  |  E. n  e.  D  (
f  Fn  n  /\  ph 
/\  ps ) }
bnj1145.5  |-  ( ch  <->  ( n  e.  D  /\  f  Fn  n  /\  ph 
/\  ps ) )
bnj1145.6  |-  ( th  <->  ( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  /\  ( j  e.  n  /\  i  =  suc  j ) ) )
Assertion
Ref Expression
bnj1145  |-  trCl ( X ,  A ,  R )  C_  A
Distinct variable groups:    A, f,
i, j, n, y    D, i, j    R, f, i, j, n, y   
f, X, i, n, y    ch, j    ph, i
Allowed substitution hints:    ph( y, f, j, n)    ps( y,
f, i, j, n)    ch( y, f, i, n)    th( y, f, i, j, n)    B( y, f, i, j, n)    D( y,
f, n)    X( j)

Proof of Theorem bnj1145
Dummy variable  w is distinct from all other variables.
StepHypRef Expression
1 bnj1145.1 . . 3  |-  ( ph  <->  ( f `  (/) )  = 
pred ( X ,  A ,  R )
)
2 bnj1145.2 . . 3  |-  ( ps  <->  A. i  e.  om  ( suc  i  e.  n  ->  ( f `  suc  i )  =  U_ y  e.  ( f `  i )  pred (
y ,  A ,  R ) ) )
3 bnj1145.3 . . 3  |-  D  =  ( om  \  { (/)
} )
4 bnj1145.4 . . 3  |-  B  =  { f  |  E. n  e.  D  (
f  Fn  n  /\  ph 
/\  ps ) }
51, 2, 3, 4bnj882 28958 . 2  |-  trCl ( X ,  A ,  R )  =  U_ f  e.  B  U_ i  e.  dom  f ( f `
 i )
6 ss2iun 3920 . . . 4  |-  ( A. f  e.  B  U_ i  e.  dom  f ( f `
 i )  C_  A  ->  U_ f  e.  B  U_ i  e.  dom  f
( f `  i
)  C_  U_ f  e.  B  A )
7 bnj1145.5 . . . . . . 7  |-  ( ch  <->  ( n  e.  D  /\  f  Fn  n  /\  ph 
/\  ps ) )
87, 4bnj1083 29008 . . . . . 6  |-  ( f  e.  B  <->  E. n ch )
92bnj1095 28813 . . . . . . . . . 10  |-  ( ps 
->  A. i ps )
109, 7bnj1096 28814 . . . . . . . . 9  |-  ( ch 
->  A. i ch )
1110nfi 1538 . . . . . . . 8  |-  F/ i ch
123bnj1098 28815 . . . . . . . . . . . . . . . . 17  |-  E. j
( ( i  =/=  (/)  /\  i  e.  n  /\  n  e.  D
)  ->  ( j  e.  n  /\  i  =  suc  j ) )
137bnj1232 28836 . . . . . . . . . . . . . . . . . 18  |-  ( ch 
->  n  e.  D
)
14133anim3i 1139 . . . . . . . . . . . . . . . . 17  |-  ( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  ( i  =/=  (/)  /\  i  e.  n  /\  n  e.  D ) )
1512, 14bnj1101 28816 . . . . . . . . . . . . . . . 16  |-  E. j
( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  (
j  e.  n  /\  i  =  suc  j ) )
16 ancl 529 . . . . . . . . . . . . . . . 16  |-  ( ( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  ( j  e.  n  /\  i  =  suc  j ) )  -> 
( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  (
( i  =/=  (/)  /\  i  e.  n  /\  ch )  /\  ( j  e.  n  /\  i  =  suc  j ) ) ) )
1715, 16bnj101 28749 . . . . . . . . . . . . . . 15  |-  E. j
( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  (
( i  =/=  (/)  /\  i  e.  n  /\  ch )  /\  ( j  e.  n  /\  i  =  suc  j ) ) )
18 bnj1145.6 . . . . . . . . . . . . . . . . 17  |-  ( th  <->  ( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  /\  ( j  e.  n  /\  i  =  suc  j ) ) )
1918imbi2i 303 . . . . . . . . . . . . . . . 16  |-  ( ( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  th )  <->  ( (
i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  ( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  /\  (
j  e.  n  /\  i  =  suc  j ) ) ) )
2019exbii 1569 . . . . . . . . . . . . . . 15  |-  ( E. j ( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  th )  <->  E. j
( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  (
( i  =/=  (/)  /\  i  e.  n  /\  ch )  /\  ( j  e.  n  /\  i  =  suc  j ) ) ) )
2117, 20mpbir 200 . . . . . . . . . . . . . 14  |-  E. j
( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  th )
22 bnj213 28914 . . . . . . . . . . . . . . . 16  |-  pred (
y ,  A ,  R )  C_  A
2322bnj226 28762 . . . . . . . . . . . . . . 15  |-  U_ y  e.  ( f `  j
)  pred ( y ,  A ,  R ) 
C_  A
24 simpr 447 . . . . . . . . . . . . . . . . . . 19  |-  ( ( j  e.  n  /\  i  =  suc  j )  ->  i  =  suc  j )
2518, 24bnj833 28788 . . . . . . . . . . . . . . . . . 18  |-  ( th 
->  i  =  suc  j )
26 simp2 956 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  i  e.  n )
27133ad2ant3 978 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  n  e.  D )
283bnj923 28798 . . . . . . . . . . . . . . . . . . . . 21  |-  ( n  e.  D  ->  n  e.  om )
29 elnn 4666 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( i  e.  n  /\  n  e.  om )  ->  i  e.  om )
3028, 29sylan2 460 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( i  e.  n  /\  n  e.  D )  ->  i  e.  om )
3126, 27, 30syl2anc 642 . . . . . . . . . . . . . . . . . . 19  |-  ( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  i  e.  om )
3218, 31bnj832 28787 . . . . . . . . . . . . . . . . . 18  |-  ( th 
->  i  e.  om )
33 vex 2791 . . . . . . . . . . . . . . . . . . . 20  |-  j  e. 
_V
3433bnj216 28760 . . . . . . . . . . . . . . . . . . 19  |-  ( i  =  suc  j  -> 
j  e.  i )
35 elnn 4666 . . . . . . . . . . . . . . . . . . 19  |-  ( ( j  e.  i  /\  i  e.  om )  ->  j  e.  om )
3634, 35sylan 457 . . . . . . . . . . . . . . . . . 18  |-  ( ( i  =  suc  j  /\  i  e.  om )  ->  j  e.  om )
3725, 32, 36syl2anc 642 . . . . . . . . . . . . . . . . 17  |-  ( th 
->  j  e.  om )
3818, 26bnj832 28787 . . . . . . . . . . . . . . . . . 18  |-  ( th 
->  i  e.  n
)
3925, 38eqeltrrd 2358 . . . . . . . . . . . . . . . . 17  |-  ( th 
->  suc  j  e.  n
)
402bnj589 28941 . . . . . . . . . . . . . . . . . . . . . . 23  |-  ( ps  <->  A. j  e.  om  ( suc  j  e.  n  ->  ( f `  suc  j )  =  U_ y  e.  ( f `  j )  pred (
y ,  A ,  R ) ) )
4140biimpi 186 . . . . . . . . . . . . . . . . . . . . . 22  |-  ( ps 
->  A. j  e.  om  ( suc  j  e.  n  ->  ( f `  suc  j )  =  U_ y  e.  ( f `  j )  pred (
y ,  A ,  R ) ) )
4241bnj708 28785 . . . . . . . . . . . . . . . . . . . . 21  |-  ( ( n  e.  D  /\  f  Fn  n  /\  ph 
/\  ps )  ->  A. j  e.  om  ( suc  j  e.  n  ->  ( f `
 suc  j )  =  U_ y  e.  ( f `  j ) 
pred ( y ,  A ,  R ) ) )
43 rsp 2603 . . . . . . . . . . . . . . . . . . . . 21  |-  ( A. j  e.  om  ( suc  j  e.  n  ->  ( f `  suc  j )  =  U_ y  e.  ( f `  j )  pred (
y ,  A ,  R ) )  -> 
( j  e.  om  ->  ( suc  j  e.  n  ->  ( f `  suc  j )  = 
U_ y  e.  ( f `  j ) 
pred ( y ,  A ,  R ) ) ) )
4442, 43syl 15 . . . . . . . . . . . . . . . . . . . 20  |-  ( ( n  e.  D  /\  f  Fn  n  /\  ph 
/\  ps )  ->  (
j  e.  om  ->  ( suc  j  e.  n  ->  ( f `  suc  j )  =  U_ y  e.  ( f `  j )  pred (
y ,  A ,  R ) ) ) )
457, 44sylbi 187 . . . . . . . . . . . . . . . . . . 19  |-  ( ch 
->  ( j  e.  om  ->  ( suc  j  e.  n  ->  ( f `  suc  j )  = 
U_ y  e.  ( f `  j ) 
pred ( y ,  A ,  R ) ) ) )
46453ad2ant3 978 . . . . . . . . . . . . . . . . . 18  |-  ( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  ( j  e.  om  ->  ( suc  j  e.  n  ->  ( f `  suc  j )  = 
U_ y  e.  ( f `  j ) 
pred ( y ,  A ,  R ) ) ) )
4718, 46bnj832 28787 . . . . . . . . . . . . . . . . 17  |-  ( th 
->  ( j  e.  om  ->  ( suc  j  e.  n  ->  ( f `  suc  j )  = 
U_ y  e.  ( f `  j ) 
pred ( y ,  A ,  R ) ) ) )
4837, 39, 47mp2d 41 . . . . . . . . . . . . . . . 16  |-  ( th 
->  ( f `  suc  j )  =  U_ y  e.  ( f `  j )  pred (
y ,  A ,  R ) )
49 fveq2 5525 . . . . . . . . . . . . . . . . . 18  |-  ( i  =  suc  j  -> 
( f `  i
)  =  ( f `
 suc  j )
)
5049eqeq1d 2291 . . . . . . . . . . . . . . . . 17  |-  ( i  =  suc  j  -> 
( ( f `  i )  =  U_ y  e.  ( f `  j )  pred (
y ,  A ,  R )  <->  ( f `  suc  j )  = 
U_ y  e.  ( f `  j ) 
pred ( y ,  A ,  R ) ) )
5125, 50syl 15 . . . . . . . . . . . . . . . 16  |-  ( th 
->  ( ( f `  i )  =  U_ y  e.  ( f `  j )  pred (
y ,  A ,  R )  <->  ( f `  suc  j )  = 
U_ y  e.  ( f `  j ) 
pred ( y ,  A ,  R ) ) )
5248, 51mpbird 223 . . . . . . . . . . . . . . 15  |-  ( th 
->  ( f `  i
)  =  U_ y  e.  ( f `  j
)  pred ( y ,  A ,  R ) )
5323, 52bnj1262 28843 . . . . . . . . . . . . . 14  |-  ( th 
->  ( f `  i
)  C_  A )
5421, 53bnj1023 28812 . . . . . . . . . . . . 13  |-  E. j
( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  (
f `  i )  C_  A )
55 3anass 938 . . . . . . . . . . . . . . 15  |-  ( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  <->  ( i  =/=  (/)  /\  (
i  e.  n  /\  ch ) ) )
5655imbi1i 315 . . . . . . . . . . . . . 14  |-  ( ( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  ( f `  i
)  C_  A )  <->  ( ( i  =/=  (/)  /\  (
i  e.  n  /\  ch ) )  ->  (
f `  i )  C_  A ) )
5756exbii 1569 . . . . . . . . . . . . 13  |-  ( E. j ( ( i  =/=  (/)  /\  i  e.  n  /\  ch )  ->  ( f `  i
)  C_  A )  <->  E. j ( ( i  =/=  (/)  /\  ( i  e.  n  /\  ch ) )  ->  (
f `  i )  C_  A ) )
5854, 57mpbi 199 . . . . . . . . . . . 12  |-  E. j
( ( i  =/=  (/)  /\  ( i  e.  n  /\  ch )
)  ->  ( f `  i )  C_  A
)
591biimpi 186 . . . . . . . . . . . . . . 15  |-  ( ph  ->  ( f `  (/) )  = 
pred ( X ,  A ,  R )
)
607, 59bnj771 28794 . . . . . . . . . . . . . 14  |-  ( ch 
->  ( f `  (/) )  = 
pred ( X ,  A ,  R )
)
61 fveq2 5525 . . . . . . . . . . . . . . 15  |-  ( i  =  (/)  ->  ( f `
 i )  =  ( f `  (/) ) )
62 bnj213 28914 . . . . . . . . . . . . . . . 16  |-  pred ( X ,  A ,  R )  C_  A
63 sseq1 3199 . . . . . . . . . . . . . . . 16  |-  ( ( f `  (/) )  = 
pred ( X ,  A ,  R )  ->  ( ( f `  (/) )  C_  A  <->  pred ( X ,  A ,  R
)  C_  A )
)
6462, 63mpbiri 224 . . . . . . . . . . . . . . 15  |-  ( ( f `  (/) )  = 
pred ( X ,  A ,  R )  ->  ( f `  (/) )  C_  A )
65 sseq1 3199 . . . . . . . . . . . . . . . 16  |-  ( ( f `  i )  =  ( f `  (/) )  ->  ( (
f `  i )  C_  A  <->  ( f `  (/) )  C_  A )
)
6665biimpar 471 . . . . . . . . . . . . . . 15  |-  ( ( ( f `  i
)  =  ( f `
 (/) )  /\  (
f `  (/) )  C_  A )  ->  (
f `  i )  C_  A )
6761, 64, 66syl2an 463 . . . . . . . . . . . . . 14  |-  ( ( i  =  (/)  /\  (
f `  (/) )  = 
pred ( X ,  A ,  R )
)  ->  ( f `  i )  C_  A
)
6860, 67sylan2 460 . . . . . . . . . . . . 13  |-  ( ( i  =  (/)  /\  ch )  ->  ( f `  i )  C_  A
)
6968adantrl 696 . . . . . . . . . . . 12  |-  ( ( i  =  (/)  /\  (
i  e.  n  /\  ch ) )  ->  (
f `  i )  C_  A )
7058, 69bnj1109 28818 . . . . . . . . . . 11  |-  E. j
( ( i  e.  n  /\  ch )  ->  ( f `  i
)  C_  A )
71 19.9v 1663 . . . . . . . . . . 11  |-  ( E. j ( ( i  e.  n  /\  ch )  ->  ( f `  i )  C_  A
)  <->  ( ( i  e.  n  /\  ch )  ->  ( f `  i )  C_  A
) )
7270, 71mpbi 199 . . . . . . . . . 10  |-  ( ( i  e.  n  /\  ch )  ->  ( f `
 i )  C_  A )
7372expcom 424 . . . . . . . . 9  |-  ( ch 
->  ( i  e.  n  ->  ( f `  i
)  C_  A )
)
74 fndm 5343 . . . . . . . . . . 11  |-  ( f  Fn  n  ->  dom  f  =  n )
757, 74bnj770 28793 . . . . . . . . . 10  |-  ( ch 
->  dom  f  =  n )
76 eleq2 2344 . . . . . . . . . . 11  |-  ( dom  f  =  n  -> 
( i  e.  dom  f 
<->  i  e.  n ) )
7776imbi1d 308 . . . . . . . . . 10  |-  ( dom  f  =  n  -> 
( ( i  e. 
dom  f  ->  (
f `  i )  C_  A )  <->  ( i  e.  n  ->  ( f `
 i )  C_  A ) ) )
7875, 77syl 15 . . . . . . . . 9  |-  ( ch 
->  ( ( i  e. 
dom  f  ->  (
f `  i )  C_  A )  <->  ( i  e.  n  ->  ( f `
 i )  C_  A ) ) )
7973, 78mpbird 223 . . . . . . . 8  |-  ( ch 
->  ( i  e.  dom  f  ->  ( f `  i )  C_  A
) )
8011, 79ralrimi 2624 . . . . . . 7  |-  ( ch 
->  A. i  e.  dom  f ( f `  i )  C_  A
)
8180exlimiv 1666 . . . . . 6  |-  ( E. n ch  ->  A. i  e.  dom  f ( f `
 i )  C_  A )
828, 81sylbi 187 . . . . 5  |-  ( f  e.  B  ->  A. i  e.  dom  f ( f `
 i )  C_  A )
83 ss2iun 3920 . . . . . 6  |-  ( A. i  e.  dom  f ( f `  i ) 
C_  A  ->  U_ i  e.  dom  f ( f `
 i )  C_  U_ i  e.  dom  f  A )
84 bnj1143 28822 . . . . . 6  |-  U_ i  e.  dom  f  A  C_  A
8583, 84syl6ss 3191 . . . . 5  |-  ( A. i  e.  dom  f ( f `  i ) 
C_  A  ->  U_ i  e.  dom  f ( f `
 i )  C_  A )
8682, 85syl 15 . . . 4  |-  ( f  e.  B  ->  U_ i  e.  dom  f ( f `
 i )  C_  A )
876, 86mprg 2612 . . 3  |-  U_ f  e.  B  U_ i  e. 
dom  f ( f `
 i )  C_  U_ f  e.  B  A
884bnj1317 28854 . . . 4  |-  ( w  e.  B  ->  A. f  w  e.  B )
8988bnj1146 28823 . . 3  |-  U_ f  e.  B  A  C_  A
9087, 89sstri 3188 . 2  |-  U_ f  e.  B  U_ i  e. 
dom  f ( f `
 i )  C_  A
915, 90eqsstri 3208 1  |-  trCl ( X ,  A ,  R )  C_  A
Colors of variables: wff set class
Syntax hints:    -> wi 4    <-> wb 176    /\ wa 358    /\ w3a 934   E.wex 1528    = wceq 1623    e. wcel 1684   {cab 2269    =/= wne 2446   A.wral 2543   E.wrex 2544    \ cdif 3149    C_ wss 3152   (/)c0 3455   {csn 3640   U_ciun 3905   suc csuc 4394   omcom 4656   dom cdm 4689    Fn wfn 5250   ` cfv 5255    /\ w-bnj17 28711    predc-bnj14 28713    trClc-bnj18 28719
This theorem is referenced by:  bnj1147  29024
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1533  ax-5 1544  ax-17 1603  ax-9 1635  ax-8 1643  ax-13 1686  ax-14 1688  ax-6 1703  ax-7 1708  ax-11 1715  ax-12 1866  ax-ext 2264  ax-sep 4141  ax-nul 4149  ax-pr 4214  ax-un 4512
This theorem depends on definitions:  df-bi 177  df-or 359  df-an 360  df-3or 935  df-3an 936  df-tru 1310  df-ex 1529  df-nf 1532  df-sb 1630  df-eu 2147  df-mo 2148  df-clab 2270  df-cleq 2276  df-clel 2279  df-nfc 2408  df-ne 2448  df-ral 2548  df-rex 2549  df-rab 2552  df-v 2790  df-sbc 2992  df-dif 3155  df-un 3157  df-in 3159  df-ss 3166  df-pss 3168  df-nul 3456  df-if 3566  df-pw 3627  df-sn 3646  df-pr 3647  df-tp 3648  df-op 3649  df-uni 3828  df-iun 3907  df-br 4024  df-opab 4078  df-tr 4114  df-eprel 4305  df-po 4314  df-so 4315  df-fr 4352  df-we 4354  df-ord 4395  df-on 4396  df-lim 4397  df-suc 4398  df-om 4657  df-iota 5219  df-fn 5258  df-fv 5263  df-bnj17 28712  df-bnj14 28714  df-bnj18 28720
  Copyright terms: Public domain W3C validator