MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  unfi Unicode version

Theorem unfi 7310
Description: The union of two finite sets is finite. Part of Corollary 6K of [Enderton] p. 144. (Contributed by NM, 16-Nov-2002.)
Assertion
Ref Expression
unfi  |-  ( ( A  e.  Fin  /\  B  e.  Fin )  ->  ( A  u.  B
)  e.  Fin )

Proof of Theorem unfi
Dummy variables  x  y  z are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 diffi 7275 . 2  |-  ( B  e.  Fin  ->  ( B  \  A )  e. 
Fin )
2 reeanv 2818 . . . 4  |-  ( E. x  e.  om  E. y  e.  om  ( A  ~~  x  /\  ( B  \  A )  ~~  y )  <->  ( E. x  e.  om  A  ~~  x  /\  E. y  e. 
om  ( B  \  A )  ~~  y
) )
3 isfi 7067 . . . . 5  |-  ( A  e.  Fin  <->  E. x  e.  om  A  ~~  x
)
4 isfi 7067 . . . . 5  |-  ( ( B  \  A )  e.  Fin  <->  E. y  e.  om  ( B  \  A )  ~~  y
)
53, 4anbi12i 679 . . . 4  |-  ( ( A  e.  Fin  /\  ( B  \  A )  e.  Fin )  <->  ( E. x  e.  om  A  ~~  x  /\  E. y  e. 
om  ( B  \  A )  ~~  y
) )
62, 5bitr4i 244 . . 3  |-  ( E. x  e.  om  E. y  e.  om  ( A  ~~  x  /\  ( B  \  A )  ~~  y )  <->  ( A  e.  Fin  /\  ( B 
\  A )  e. 
Fin ) )
7 nnacl 6790 . . . . 5  |-  ( ( x  e.  om  /\  y  e.  om )  ->  ( x  +o  y
)  e.  om )
8 unfilem3 7309 . . . . . . 7  |-  ( ( x  e.  om  /\  y  e.  om )  ->  y  ~~  ( ( x  +o  y ) 
\  x ) )
9 entr 7095 . . . . . . . 8  |-  ( ( ( B  \  A
)  ~~  y  /\  y  ~~  ( ( x  +o  y )  \  x ) )  -> 
( B  \  A
)  ~~  ( (
x  +o  y ) 
\  x ) )
109expcom 425 . . . . . . 7  |-  ( y 
~~  ( ( x  +o  y )  \  x )  ->  (
( B  \  A
)  ~~  y  ->  ( B  \  A ) 
~~  ( ( x  +o  y )  \  x ) ) )
118, 10syl 16 . . . . . 6  |-  ( ( x  e.  om  /\  y  e.  om )  ->  ( ( B  \  A )  ~~  y  ->  ( B  \  A
)  ~~  ( (
x  +o  y ) 
\  x ) ) )
12 disjdif 3643 . . . . . . . 8  |-  ( A  i^i  ( B  \  A ) )  =  (/)
13 disjdif 3643 . . . . . . . 8  |-  ( x  i^i  ( ( x  +o  y )  \  x ) )  =  (/)
14 unen 7125 . . . . . . . 8  |-  ( ( ( A  ~~  x  /\  ( B  \  A
)  ~~  ( (
x  +o  y ) 
\  x ) )  /\  ( ( A  i^i  ( B  \  A ) )  =  (/)  /\  ( x  i^i  ( ( x  +o  y )  \  x
) )  =  (/) ) )  ->  ( A  u.  ( B  \  A ) )  ~~  ( x  u.  (
( x  +o  y
)  \  x )
) )
1512, 13, 14mpanr12 667 . . . . . . 7  |-  ( ( A  ~~  x  /\  ( B  \  A ) 
~~  ( ( x  +o  y )  \  x ) )  -> 
( A  u.  ( B  \  A ) ) 
~~  ( x  u.  ( ( x  +o  y )  \  x
) ) )
16 undif2 3647 . . . . . . . . 9  |-  ( A  u.  ( B  \  A ) )  =  ( A  u.  B
)
1716a1i 11 . . . . . . . 8  |-  ( ( x  e.  om  /\  y  e.  om )  ->  ( A  u.  ( B  \  A ) )  =  ( A  u.  B ) )
18 nnaword1 6808 . . . . . . . . 9  |-  ( ( x  e.  om  /\  y  e.  om )  ->  x  C_  ( x  +o  y ) )
19 undif 3651 . . . . . . . . 9  |-  ( x 
C_  ( x  +o  y )  <->  ( x  u.  ( ( x  +o  y )  \  x
) )  =  ( x  +o  y ) )
2018, 19sylib 189 . . . . . . . 8  |-  ( ( x  e.  om  /\  y  e.  om )  ->  ( x  u.  (
( x  +o  y
)  \  x )
)  =  ( x  +o  y ) )
2117, 20breq12d 4166 . . . . . . 7  |-  ( ( x  e.  om  /\  y  e.  om )  ->  ( ( A  u.  ( B  \  A ) )  ~~  ( x  u.  ( ( x  +o  y )  \  x ) )  <->  ( A  u.  B )  ~~  (
x  +o  y ) ) )
2215, 21syl5ib 211 . . . . . 6  |-  ( ( x  e.  om  /\  y  e.  om )  ->  ( ( A  ~~  x  /\  ( B  \  A )  ~~  (
( x  +o  y
)  \  x )
)  ->  ( A  u.  B )  ~~  (
x  +o  y ) ) )
2311, 22sylan2d 469 . . . . 5  |-  ( ( x  e.  om  /\  y  e.  om )  ->  ( ( A  ~~  x  /\  ( B  \  A )  ~~  y
)  ->  ( A  u.  B )  ~~  (
x  +o  y ) ) )
24 breq2 4157 . . . . . . 7  |-  ( z  =  ( x  +o  y )  ->  (
( A  u.  B
)  ~~  z  <->  ( A  u.  B )  ~~  (
x  +o  y ) ) )
2524rspcev 2995 . . . . . 6  |-  ( ( ( x  +o  y
)  e.  om  /\  ( A  u.  B
)  ~~  ( x  +o  y ) )  ->  E. z  e.  om  ( A  u.  B
)  ~~  z )
26 isfi 7067 . . . . . 6  |-  ( ( A  u.  B )  e.  Fin  <->  E. z  e.  om  ( A  u.  B )  ~~  z
)
2725, 26sylibr 204 . . . . 5  |-  ( ( ( x  +o  y
)  e.  om  /\  ( A  u.  B
)  ~~  ( x  +o  y ) )  -> 
( A  u.  B
)  e.  Fin )
287, 23, 27ee12an 1369 . . . 4  |-  ( ( x  e.  om  /\  y  e.  om )  ->  ( ( A  ~~  x  /\  ( B  \  A )  ~~  y
)  ->  ( A  u.  B )  e.  Fin ) )
2928rexlimivv 2778 . . 3  |-  ( E. x  e.  om  E. y  e.  om  ( A  ~~  x  /\  ( B  \  A )  ~~  y )  ->  ( A  u.  B )  e.  Fin )
306, 29sylbir 205 . 2  |-  ( ( A  e.  Fin  /\  ( B  \  A )  e.  Fin )  -> 
( A  u.  B
)  e.  Fin )
311, 30sylan2 461 1  |-  ( ( A  e.  Fin  /\  B  e.  Fin )  ->  ( A  u.  B
)  e.  Fin )
Colors of variables: wff set class
Syntax hints:    -> wi 4    /\ wa 359    = wceq 1649    e. wcel 1717   E.wrex 2650    \ cdif 3260    u. cun 3261    i^i cin 3262    C_ wss 3263   (/)c0 3571   class class class wbr 4153   omcom 4785  (class class class)co 6020    +o coa 6657    ~~ cen 7042   Fincfn 7045
This theorem is referenced by:  unfi2  7312  difinf  7313  xpfi  7314  prfi  7317  tpfi  7318  fnfi  7320  iunfi  7330  pwfilem  7336  fiin  7362  wemapso2  7454  cantnfp1lem1  7567  ficardun2  8016  ackbij1lem6  8038  ackbij1lem16  8048  fin23lem28  8153  fin23lem30  8155  isfin1-3  8199  axcclem  8270  hashun  11583  hashunlei  11611  hashmap  11625  hashbclem  11628  hashf1lem1  11631  hashf1lem2  11632  hashf1  11633  incexclem  12543  isumltss  12555  ramub1lem1  13321  fpwipodrs  14517  acsfiindd  14530  gsumzaddlem  15453  gsumunsn  15471  dprdfadd  15505  psrbagaddcl  16362  mplsubg  16427  mpllss  16428  fctop  16991  uncmp  17388  1stckgenlem  17506  ptbasin  17530  cfinfil  17846  fin1aufil  17885  alexsubALTlem3  18001  tmdgsum  18046  tsmsfbas  18078  tsmsgsum  18089  tsmsres  18094  tsmsxplem1  18103  prdsmet  18308  prdsbl  18411  icccmplem2  18725  ovolfiniun  19264  volfiniun  19308  fta1glem2  19956  fta1lem  20091  aannenlem2  20113  aalioulem2  20117  dchrfi  20906  usgrafilem2  21292  vdgrfiun  21521  konigsberg  21557  ballotlemgun  24561  itg2addnclem2  25958  locfincmp  26075  comppfsc  26078  prdsbnd  26193  funsnfsup  26434  elrfi  26439  mzpcompact2lem  26499  eldioph2  26511  lsmfgcl  26841  dsmmacl  26876  symgfisg  27078  fiuneneq  27182  pclfinN  30014
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1552  ax-5 1563  ax-17 1623  ax-9 1661  ax-8 1682  ax-13 1719  ax-14 1721  ax-6 1736  ax-7 1741  ax-11 1753  ax-12 1939  ax-ext 2368  ax-sep 4271  ax-nul 4279  ax-pow 4318  ax-pr 4344  ax-un 4641
This theorem depends on definitions:  df-bi 178  df-or 360  df-an 361  df-3or 937  df-3an 938  df-tru 1325  df-ex 1548  df-nf 1551  df-sb 1656  df-eu 2242  df-mo 2243  df-clab 2374  df-cleq 2380  df-clel 2383  df-nfc 2512  df-ne 2552  df-ral 2654  df-rex 2655  df-reu 2656  df-rab 2658  df-v 2901  df-sbc 3105  df-csb 3195  df-dif 3266  df-un 3268  df-in 3270  df-ss 3277  df-pss 3279  df-nul 3572  df-if 3683  df-pw 3744  df-sn 3763  df-pr 3764  df-tp 3765  df-op 3766  df-uni 3958  df-int 3993  df-iun 4037  df-br 4154  df-opab 4208  df-mpt 4209  df-tr 4244  df-eprel 4435  df-id 4439  df-po 4444  df-so 4445  df-fr 4482  df-we 4484  df-ord 4525  df-on 4526  df-lim 4527  df-suc 4528  df-om 4786  df-xp 4824  df-rel 4825  df-cnv 4826  df-co 4827  df-dm 4828  df-rn 4829  df-res 4830  df-ima 4831  df-iota 5358  df-fun 5396  df-fn 5397  df-f 5398  df-f1 5399  df-fo 5400  df-f1o 5401  df-fv 5402  df-ov 6023  df-oprab 6024  df-mpt2 6025  df-recs 6569  df-rdg 6604  df-oadd 6664  df-er 6841  df-en 7046  df-fin 7049
  Copyright terms: Public domain W3C validator