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

Theorem ordintdif 4622
Description: If  B is smaller than  A, then it equals the intersection of the difference. Exercise 11 in [TakeutiZaring] p. 44. (Contributed by Andrew Salmon, 14-Nov-2011.)
Assertion
Ref Expression
ordintdif  |-  ( ( Ord  A  /\  Ord  B  /\  ( A  \  B )  =/=  (/) )  ->  B  =  |^| ( A 
\  B ) )

Proof of Theorem ordintdif
Dummy variable  x is distinct from all other variables.
StepHypRef Expression
1 ssdif0 3678 . . 3  |-  ( A 
C_  B  <->  ( A  \  B )  =  (/) )
21necon3bbii 2629 . 2  |-  ( -.  A  C_  B  <->  ( A  \  B )  =/=  (/) )
3 dfdif2 3321 . . . 4  |-  ( A 
\  B )  =  { x  e.  A  |  -.  x  e.  B }
43inteqi 4046 . . 3  |-  |^| ( A  \  B )  = 
|^| { x  e.  A  |  -.  x  e.  B }
5 ordtri1 4606 . . . . . 6  |-  ( ( Ord  A  /\  Ord  B )  ->  ( A  C_  B  <->  -.  B  e.  A ) )
65con2bid 320 . . . . 5  |-  ( ( Ord  A  /\  Ord  B )  ->  ( B  e.  A  <->  -.  A  C_  B
) )
7 ordelord 4595 . . . . . . . . . . . 12  |-  ( ( Ord  A  /\  x  e.  A )  ->  Ord  x )
8 ordtri1 4606 . . . . . . . . . . . . 13  |-  ( ( Ord  B  /\  Ord  x )  ->  ( B  C_  x  <->  -.  x  e.  B ) )
98ancoms 440 . . . . . . . . . . . 12  |-  ( ( Ord  x  /\  Ord  B )  ->  ( B  C_  x  <->  -.  x  e.  B ) )
107, 9sylan 458 . . . . . . . . . . 11  |-  ( ( ( Ord  A  /\  x  e.  A )  /\  Ord  B )  -> 
( B  C_  x  <->  -.  x  e.  B ) )
1110an32s 780 . . . . . . . . . 10  |-  ( ( ( Ord  A  /\  Ord  B )  /\  x  e.  A )  ->  ( B  C_  x  <->  -.  x  e.  B ) )
1211bicomd 193 . . . . . . . . 9  |-  ( ( ( Ord  A  /\  Ord  B )  /\  x  e.  A )  ->  ( -.  x  e.  B  <->  B 
C_  x ) )
1312rabbidva 2939 . . . . . . . 8  |-  ( ( Ord  A  /\  Ord  B )  ->  { x  e.  A  |  -.  x  e.  B }  =  { x  e.  A  |  B  C_  x }
)
1413inteqd 4047 . . . . . . 7  |-  ( ( Ord  A  /\  Ord  B )  ->  |^| { x  e.  A  |  -.  x  e.  B }  =  |^| { x  e.  A  |  B  C_  x } )
15 intmin 4062 . . . . . . 7  |-  ( B  e.  A  ->  |^| { x  e.  A  |  B  C_  x }  =  B )
1614, 15sylan9eq 2487 . . . . . 6  |-  ( ( ( Ord  A  /\  Ord  B )  /\  B  e.  A )  ->  |^| { x  e.  A  |  -.  x  e.  B }  =  B )
1716ex 424 . . . . 5  |-  ( ( Ord  A  /\  Ord  B )  ->  ( B  e.  A  ->  |^| { x  e.  A  |  -.  x  e.  B }  =  B ) )
186, 17sylbird 227 . . . 4  |-  ( ( Ord  A  /\  Ord  B )  ->  ( -.  A  C_  B  ->  |^| { x  e.  A  |  -.  x  e.  B }  =  B ) )
19183impia 1150 . . 3  |-  ( ( Ord  A  /\  Ord  B  /\  -.  A  C_  B )  ->  |^| { x  e.  A  |  -.  x  e.  B }  =  B )
204, 19syl5req 2480 . 2  |-  ( ( Ord  A  /\  Ord  B  /\  -.  A  C_  B )  ->  B  =  |^| ( A  \  B ) )
212, 20syl3an3br 1225 1  |-  ( ( Ord  A  /\  Ord  B  /\  ( A  \  B )  =/=  (/) )  ->  B  =  |^| ( A 
\  B ) )
Colors of variables: wff set class
Syntax hints:   -. wn 3    -> wi 4    <-> wb 177    /\ wa 359    /\ w3a 936    = wceq 1652    e. wcel 1725    =/= wne 2598   {crab 2701    \ cdif 3309    C_ wss 3312   (/)c0 3620   |^|cint 4042   Ord word 4572
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1555  ax-5 1566  ax-17 1626  ax-9 1666  ax-8 1687  ax-14 1729  ax-6 1744  ax-7 1749  ax-11 1761  ax-12 1950  ax-ext 2416  ax-sep 4322  ax-nul 4330  ax-pr 4395
This theorem depends on definitions:  df-bi 178  df-or 360  df-an 361  df-3or 937  df-3an 938  df-tru 1328  df-ex 1551  df-nf 1554  df-sb 1659  df-eu 2284  df-mo 2285  df-clab 2422  df-cleq 2428  df-clel 2431  df-nfc 2560  df-ne 2600  df-ral 2702  df-rex 2703  df-rab 2706  df-v 2950  df-sbc 3154  df-dif 3315  df-un 3317  df-in 3319  df-ss 3326  df-pss 3328  df-nul 3621  df-if 3732  df-sn 3812  df-pr 3813  df-op 3815  df-uni 4008  df-int 4043  df-br 4205  df-opab 4259  df-tr 4295  df-eprel 4486  df-po 4495  df-so 4496  df-fr 4533  df-we 4535  df-ord 4576
  Copyright terms: Public domain W3C validator