Users' Mathboxes Mathbox for Brendan Leahy < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  fin2solem Structured version   Unicode version

Theorem fin2solem 31832
Description: Lemma for fin2so 31833. (Contributed by Brendan Leahy, 29-Jun-2019.)
Assertion
Ref Expression
fin2solem  |-  ( ( R  Or  x  /\  ( y  e.  x  /\  z  e.  x
) )  ->  (
y R z  ->  { w  e.  x  |  w R y } [ C.]  { w  e.  x  |  w R z } ) )
Distinct variable group:    x, w, y, z, R

Proof of Theorem fin2solem
StepHypRef Expression
1 ancom 451 . . . . . . . . . 10  |-  ( ( ( y  e.  x  /\  z  e.  x
)  /\  w  e.  x )  <->  ( w  e.  x  /\  (
y  e.  x  /\  z  e.  x )
) )
2 3anass 986 . . . . . . . . . 10  |-  ( ( w  e.  x  /\  y  e.  x  /\  z  e.  x )  <->  ( w  e.  x  /\  ( y  e.  x  /\  z  e.  x
) ) )
31, 2bitr4i 255 . . . . . . . . 9  |-  ( ( ( y  e.  x  /\  z  e.  x
)  /\  w  e.  x )  <->  ( w  e.  x  /\  y  e.  x  /\  z  e.  x ) )
4 sotr 4732 . . . . . . . . 9  |-  ( ( R  Or  x  /\  ( w  e.  x  /\  y  e.  x  /\  z  e.  x
) )  ->  (
( w R y  /\  y R z )  ->  w R
z ) )
53, 4sylan2b 477 . . . . . . . 8  |-  ( ( R  Or  x  /\  ( ( y  e.  x  /\  z  e.  x )  /\  w  e.  x ) )  -> 
( ( w R y  /\  y R z )  ->  w R z ) )
65anassrs 652 . . . . . . 7  |-  ( ( ( R  Or  x  /\  ( y  e.  x  /\  z  e.  x
) )  /\  w  e.  x )  ->  (
( w R y  /\  y R z )  ->  w R
z ) )
76ancomsd 455 . . . . . 6  |-  ( ( ( R  Or  x  /\  ( y  e.  x  /\  z  e.  x
) )  /\  w  e.  x )  ->  (
( y R z  /\  w R y )  ->  w R
z ) )
87expdimp 438 . . . . 5  |-  ( ( ( ( R  Or  x  /\  ( y  e.  x  /\  z  e.  x ) )  /\  w  e.  x )  /\  y R z )  ->  ( w R y  ->  w R
z ) )
98an32s 811 . . . 4  |-  ( ( ( ( R  Or  x  /\  ( y  e.  x  /\  z  e.  x ) )  /\  y R z )  /\  w  e.  x )  ->  ( w R y  ->  w R z ) )
109ss2rabdv 3478 . . 3  |-  ( ( ( R  Or  x  /\  ( y  e.  x  /\  z  e.  x
) )  /\  y R z )  ->  { w  e.  x  |  w R y } 
C_  { w  e.  x  |  w R z } )
11 breq1 4362 . . . . . . . 8  |-  ( w  =  y  ->  (
w R z  <->  y R
z ) )
1211elrab 3164 . . . . . . 7  |-  ( y  e.  { w  e.  x  |  w R z }  <->  ( y  e.  x  /\  y R z ) )
1312biimpri 209 . . . . . 6  |-  ( ( y  e.  x  /\  y R z )  -> 
y  e.  { w  e.  x  |  w R z } )
1413adantll 718 . . . . 5  |-  ( ( ( R  Or  x  /\  y  e.  x
)  /\  y R
z )  ->  y  e.  { w  e.  x  |  w R z } )
15 sonr 4731 . . . . . . 7  |-  ( ( R  Or  x  /\  y  e.  x )  ->  -.  y R y )
16 breq1 4362 . . . . . . . . 9  |-  ( w  =  y  ->  (
w R y  <->  y R
y ) )
1716elrab 3164 . . . . . . . 8  |-  ( y  e.  { w  e.  x  |  w R y }  <->  ( y  e.  x  /\  y R y ) )
1817simprbi 465 . . . . . . 7  |-  ( y  e.  { w  e.  x  |  w R y }  ->  y R y )
1915, 18nsyl 124 . . . . . 6  |-  ( ( R  Or  x  /\  y  e.  x )  ->  -.  y  e.  {
w  e.  x  |  w R y } )
2019adantr 466 . . . . 5  |-  ( ( ( R  Or  x  /\  y  e.  x
)  /\  y R
z )  ->  -.  y  e.  { w  e.  x  |  w R y } )
21 nelne1 2691 . . . . . 6  |-  ( ( y  e.  { w  e.  x  |  w R z }  /\  -.  y  e.  { w  e.  x  |  w R y } )  ->  { w  e.  x  |  w R z }  =/=  {
w  e.  x  |  w R y } )
2221necomd 2650 . . . . 5  |-  ( ( y  e.  { w  e.  x  |  w R z }  /\  -.  y  e.  { w  e.  x  |  w R y } )  ->  { w  e.  x  |  w R y }  =/=  {
w  e.  x  |  w R z } )
2314, 20, 22syl2anc 665 . . . 4  |-  ( ( ( R  Or  x  /\  y  e.  x
)  /\  y R
z )  ->  { w  e.  x  |  w R y }  =/=  { w  e.  x  |  w R z } )
2423adantlrr 725 . . 3  |-  ( ( ( R  Or  x  /\  ( y  e.  x  /\  z  e.  x
) )  /\  y R z )  ->  { w  e.  x  |  w R y }  =/=  { w  e.  x  |  w R z } )
25 vex 3019 . . . . . 6  |-  x  e. 
_V
2625rabex 4511 . . . . 5  |-  { w  e.  x  |  w R z }  e.  _V
2726brrpss 6525 . . . 4  |-  ( { w  e.  x  |  w R y } [ C.]  { w  e.  x  |  w R z }  <->  { w  e.  x  |  w R y } 
C.  { w  e.  x  |  w R z } )
28 df-pss 3388 . . . 4  |-  ( { w  e.  x  |  w R y } 
C.  { w  e.  x  |  w R z }  <->  ( {
w  e.  x  |  w R y } 
C_  { w  e.  x  |  w R z }  /\  {
w  e.  x  |  w R y }  =/=  { w  e.  x  |  w R z } ) )
2927, 28bitri 252 . . 3  |-  ( { w  e.  x  |  w R y } [ C.]  { w  e.  x  |  w R z }  <-> 
( { w  e.  x  |  w R y }  C_  { w  e.  x  |  w R z }  /\  { w  e.  x  |  w R y }  =/=  { w  e.  x  |  w R z } ) )
3010, 24, 29sylanbrc 668 . 2  |-  ( ( ( R  Or  x  /\  ( y  e.  x  /\  z  e.  x
) )  /\  y R z )  ->  { w  e.  x  |  w R y } [ C.]  { w  e.  x  |  w R z } )
3130ex 435 1  |-  ( ( R  Or  x  /\  ( y  e.  x  /\  z  e.  x
) )  ->  (
y R z  ->  { w  e.  x  |  w R y } [ C.]  { w  e.  x  |  w R z } ) )
Colors of variables: wff setvar class
Syntax hints:   -. wn 3    -> wi 4    /\ wa 370    /\ w3a 982    e. wcel 1872    =/= wne 2593   {crab 2712    C_ wss 3372    C. wpss 3373   class class class wbr 4359    Or wor 4709   [ C.] crpss 6521
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1663  ax-4 1676  ax-5 1752  ax-6 1798  ax-7 1843  ax-9 1876  ax-10 1891  ax-11 1896  ax-12 1909  ax-13 2058  ax-ext 2402  ax-sep 4482  ax-nul 4491  ax-pr 4596
This theorem depends on definitions:  df-bi 188  df-or 371  df-an 372  df-3an 984  df-tru 1440  df-ex 1658  df-nf 1662  df-sb 1791  df-eu 2274  df-mo 2275  df-clab 2409  df-cleq 2415  df-clel 2418  df-nfc 2552  df-ne 2595  df-ral 2713  df-rex 2714  df-rab 2717  df-v 3018  df-dif 3375  df-un 3377  df-in 3379  df-ss 3386  df-pss 3388  df-nul 3698  df-if 3848  df-sn 3935  df-pr 3937  df-op 3941  df-br 4360  df-opab 4419  df-po 4710  df-so 4711  df-xp 4795  df-rel 4796  df-rpss 6522
This theorem is referenced by:  fin2so  31833
  Copyright terms: Public domain W3C validator