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

Theorem ordtri3or 4577
Description: A trichotomy law for ordinals. Proposition 7.10 of [TakeutiZaring] p. 38. (Contributed by NM, 10-May-1994.) (Proof shortened by Andrew Salmon, 25-Jul-2011.)
Assertion
Ref Expression
ordtri3or  |-  ( ( Ord  A  /\  Ord  B )  ->  ( A  e.  B  \/  A  =  B  \/  B  e.  A ) )

Proof of Theorem ordtri3or
StepHypRef Expression
1 ordin 4575 . . . . . 6  |-  ( ( Ord  A  /\  Ord  B )  ->  Ord  ( A  i^i  B ) )
2 ordirr 4563 . . . . . 6  |-  ( Ord  ( A  i^i  B
)  ->  -.  ( A  i^i  B )  e.  ( A  i^i  B
) )
31, 2syl 16 . . . . 5  |-  ( ( Ord  A  /\  Ord  B )  ->  -.  ( A  i^i  B )  e.  ( A  i^i  B
) )
4 ianor 475 . . . . . 6  |-  ( -.  ( ( A  i^i  B )  e.  A  /\  ( B  i^i  A )  e.  B )  <->  ( -.  ( A  i^i  B )  e.  A  \/  -.  ( B  i^i  A )  e.  B ) )
5 elin 3494 . . . . . . 7  |-  ( ( A  i^i  B )  e.  ( A  i^i  B )  <->  ( ( A  i^i  B )  e.  A  /\  ( A  i^i  B )  e.  B ) )
6 incom 3497 . . . . . . . . 9  |-  ( A  i^i  B )  =  ( B  i^i  A
)
76eleq1i 2471 . . . . . . . 8  |-  ( ( A  i^i  B )  e.  B  <->  ( B  i^i  A )  e.  B
)
87anbi2i 676 . . . . . . 7  |-  ( ( ( A  i^i  B
)  e.  A  /\  ( A  i^i  B )  e.  B )  <->  ( ( A  i^i  B )  e.  A  /\  ( B  i^i  A )  e.  B ) )
95, 8bitri 241 . . . . . 6  |-  ( ( A  i^i  B )  e.  ( A  i^i  B )  <->  ( ( A  i^i  B )  e.  A  /\  ( B  i^i  A )  e.  B ) )
104, 9xchnxbir 301 . . . . 5  |-  ( -.  ( A  i^i  B
)  e.  ( A  i^i  B )  <->  ( -.  ( A  i^i  B )  e.  A  \/  -.  ( B  i^i  A )  e.  B ) )
113, 10sylib 189 . . . 4  |-  ( ( Ord  A  /\  Ord  B )  ->  ( -.  ( A  i^i  B )  e.  A  \/  -.  ( B  i^i  A )  e.  B ) )
12 inss1 3525 . . . . . . . . . 10  |-  ( A  i^i  B )  C_  A
13 ordsseleq 4574 . . . . . . . . . 10  |-  ( ( Ord  ( A  i^i  B )  /\  Ord  A
)  ->  ( ( A  i^i  B )  C_  A 
<->  ( ( A  i^i  B )  e.  A  \/  ( A  i^i  B )  =  A ) ) )
1412, 13mpbii 203 . . . . . . . . 9  |-  ( ( Ord  ( A  i^i  B )  /\  Ord  A
)  ->  ( ( A  i^i  B )  e.  A  \/  ( A  i^i  B )  =  A ) )
151, 14sylan 458 . . . . . . . 8  |-  ( ( ( Ord  A  /\  Ord  B )  /\  Ord  A )  ->  ( ( A  i^i  B )  e.  A  \/  ( A  i^i  B )  =  A ) )
1615anabss1 788 . . . . . . 7  |-  ( ( Ord  A  /\  Ord  B )  ->  ( ( A  i^i  B )  e.  A  \/  ( A  i^i  B )  =  A ) )
1716ord 367 . . . . . 6  |-  ( ( Ord  A  /\  Ord  B )  ->  ( -.  ( A  i^i  B )  e.  A  ->  ( A  i^i  B )  =  A ) )
18 df-ss 3298 . . . . . 6  |-  ( A 
C_  B  <->  ( A  i^i  B )  =  A )
1917, 18syl6ibr 219 . . . . 5  |-  ( ( Ord  A  /\  Ord  B )  ->  ( -.  ( A  i^i  B )  e.  A  ->  A  C_  B ) )
20 ordin 4575 . . . . . . . . 9  |-  ( ( Ord  B  /\  Ord  A )  ->  Ord  ( B  i^i  A ) )
21 inss1 3525 . . . . . . . . . 10  |-  ( B  i^i  A )  C_  B
22 ordsseleq 4574 . . . . . . . . . 10  |-  ( ( Ord  ( B  i^i  A )  /\  Ord  B
)  ->  ( ( B  i^i  A )  C_  B 
<->  ( ( B  i^i  A )  e.  B  \/  ( B  i^i  A )  =  B ) ) )
2321, 22mpbii 203 . . . . . . . . 9  |-  ( ( Ord  ( B  i^i  A )  /\  Ord  B
)  ->  ( ( B  i^i  A )  e.  B  \/  ( B  i^i  A )  =  B ) )
2420, 23sylan 458 . . . . . . . 8  |-  ( ( ( Ord  B  /\  Ord  A )  /\  Ord  B )  ->  ( ( B  i^i  A )  e.  B  \/  ( B  i^i  A )  =  B ) )
2524anabss4 789 . . . . . . 7  |-  ( ( Ord  A  /\  Ord  B )  ->  ( ( B  i^i  A )  e.  B  \/  ( B  i^i  A )  =  B ) )
2625ord 367 . . . . . 6  |-  ( ( Ord  A  /\  Ord  B )  ->  ( -.  ( B  i^i  A )  e.  B  ->  ( B  i^i  A )  =  B ) )
27 df-ss 3298 . . . . . 6  |-  ( B 
C_  A  <->  ( B  i^i  A )  =  B )
2826, 27syl6ibr 219 . . . . 5  |-  ( ( Ord  A  /\  Ord  B )  ->  ( -.  ( B  i^i  A )  e.  B  ->  B  C_  A ) )
2919, 28orim12d 812 . . . 4  |-  ( ( Ord  A  /\  Ord  B )  ->  ( ( -.  ( A  i^i  B
)  e.  A  \/  -.  ( B  i^i  A
)  e.  B )  ->  ( A  C_  B  \/  B  C_  A
) ) )
3011, 29mpd 15 . . 3  |-  ( ( Ord  A  /\  Ord  B )  ->  ( A  C_  B  \/  B  C_  A ) )
31 sspsstri 3413 . . 3  |-  ( ( A  C_  B  \/  B  C_  A )  <->  ( A  C.  B  \/  A  =  B  \/  B  C.  A ) )
3230, 31sylib 189 . 2  |-  ( ( Ord  A  /\  Ord  B )  ->  ( A  C.  B  \/  A  =  B  \/  B  C.  A ) )
33 ordelpss 4573 . . 3  |-  ( ( Ord  A  /\  Ord  B )  ->  ( A  e.  B  <->  A  C.  B ) )
34 biidd 229 . . 3  |-  ( ( Ord  A  /\  Ord  B )  ->  ( A  =  B  <->  A  =  B
) )
35 ordelpss 4573 . . . 4  |-  ( ( Ord  B  /\  Ord  A )  ->  ( B  e.  A  <->  B  C.  A ) )
3635ancoms 440 . . 3  |-  ( ( Ord  A  /\  Ord  B )  ->  ( B  e.  A  <->  B  C.  A ) )
3733, 34, 363orbi123d 1253 . 2  |-  ( ( Ord  A  /\  Ord  B )  ->  ( ( A  e.  B  \/  A  =  B  \/  B  e.  A )  <->  ( A  C.  B  \/  A  =  B  \/  B  C.  A ) ) )
3832, 37mpbird 224 1  |-  ( ( Ord  A  /\  Ord  B )  ->  ( A  e.  B  \/  A  =  B  \/  B  e.  A ) )
Colors of variables: wff set class
Syntax hints:   -. wn 3    -> wi 4    <-> wb 177    \/ wo 358    /\ wa 359    \/ w3o 935    = wceq 1649    e. wcel 1721    i^i cin 3283    C_ wss 3284    C. wpss 3285   Ord word 4544
This theorem is referenced by:  ordtri1  4578  ordtri3  4581  ordon  4726  ordeleqon  4732  smo11  6589  smoord  6590  omopth2  6790  r111  7661  tcrank  7768  domtriomlem  8282  axdc3lem2  8291  zorn2lem6  8341  grur1  8655  poseq  25471  soseq  25472
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 1662  ax-8 1683  ax-14 1725  ax-6 1740  ax-7 1745  ax-11 1757  ax-12 1946  ax-ext 2389  ax-sep 4294  ax-nul 4302  ax-pr 4367
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 2262  df-mo 2263  df-clab 2395  df-cleq 2401  df-clel 2404  df-nfc 2533  df-ne 2573  df-ral 2675  df-rex 2676  df-rab 2679  df-v 2922  df-sbc 3126  df-dif 3287  df-un 3289  df-in 3291  df-ss 3298  df-pss 3300  df-nul 3593  df-if 3704  df-sn 3784  df-pr 3785  df-op 3787  df-uni 3980  df-br 4177  df-opab 4231  df-tr 4267  df-eprel 4458  df-po 4467  df-so 4468  df-fr 4505  df-we 4507  df-ord 4548
  Copyright terms: Public domain W3C validator