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

Theorem kmlem14 7805
Description: Lemma for 5-quantifier AC of Kurt Maes, Th. 4, part of 5 <=> 4. (Contributed by NM, 4-Apr-2004.)
Hypotheses
Ref Expression
kmlem14.1  |-  ( ph  <->  ( z  e.  y  -> 
( ( v  e.  x  /\  y  =/=  v )  /\  z  e.  v ) ) )
kmlem14.2  |-  ( ps  <->  ( z  e.  x  -> 
( ( v  e.  z  /\  v  e.  y )  /\  (
( u  e.  z  /\  u  e.  y )  ->  u  =  v ) ) ) )
kmlem14.3  |-  ( ch  <->  A. z  e.  x  E! v  v  e.  ( z  i^i  y ) )
Assertion
Ref Expression
kmlem14  |-  ( E. z  e.  x  A. v  e.  z  E. w  e.  x  (
z  =/=  w  /\  v  e.  ( z  i^i  w ) )  <->  E. y A. z E. v A. u ( y  e.  x  /\  ph )
)
Distinct variable groups:    x, y,
z, w, v, u    ph, u
Allowed substitution hints:    ph( x, y, z, w, v)    ps( x, y, z, w, v, u)    ch( x, y, z, w, v, u)

Proof of Theorem kmlem14
StepHypRef Expression
1 neeq1 2467 . . . . . 6  |-  ( z  =  y  ->  (
z  =/=  w  <->  y  =/=  w ) )
2 ineq1 3376 . . . . . . 7  |-  ( z  =  y  ->  (
z  i^i  w )  =  ( y  i^i  w ) )
32eleq2d 2363 . . . . . 6  |-  ( z  =  y  ->  (
v  e.  ( z  i^i  w )  <->  v  e.  ( y  i^i  w
) ) )
41, 3anbi12d 691 . . . . 5  |-  ( z  =  y  ->  (
( z  =/=  w  /\  v  e.  (
z  i^i  w )
)  <->  ( y  =/=  w  /\  v  e.  ( y  i^i  w
) ) ) )
54rexbidv 2577 . . . 4  |-  ( z  =  y  ->  ( E. w  e.  x  ( z  =/=  w  /\  v  e.  (
z  i^i  w )
)  <->  E. w  e.  x  ( y  =/=  w  /\  v  e.  (
y  i^i  w )
) ) )
65raleqbi1dv 2757 . . 3  |-  ( z  =  y  ->  ( A. v  e.  z  E. w  e.  x  ( z  =/=  w  /\  v  e.  (
z  i^i  w )
)  <->  A. v  e.  y  E. w  e.  x  ( y  =/=  w  /\  v  e.  (
y  i^i  w )
) ) )
76cbvrexv 2778 . 2  |-  ( E. z  e.  x  A. v  e.  z  E. w  e.  x  (
z  =/=  w  /\  v  e.  ( z  i^i  w ) )  <->  E. y  e.  x  A. v  e.  y  E. w  e.  x  ( y  =/=  w  /\  v  e.  ( y  i^i  w
) ) )
8 df-rex 2562 . 2  |-  ( E. y  e.  x  A. v  e.  y  E. w  e.  x  (
y  =/=  w  /\  v  e.  ( y  i^i  w ) )  <->  E. y
( y  e.  x  /\  A. v  e.  y  E. w  e.  x  ( y  =/=  w  /\  v  e.  (
y  i^i  w )
) ) )
9 eleq1 2356 . . . . . . . . 9  |-  ( v  =  z  ->  (
v  e.  ( y  i^i  w )  <->  z  e.  ( y  i^i  w
) ) )
109anbi2d 684 . . . . . . . 8  |-  ( v  =  z  ->  (
( y  =/=  w  /\  v  e.  (
y  i^i  w )
)  <->  ( y  =/=  w  /\  z  e.  ( y  i^i  w
) ) ) )
1110rexbidv 2577 . . . . . . 7  |-  ( v  =  z  ->  ( E. w  e.  x  ( y  =/=  w  /\  v  e.  (
y  i^i  w )
)  <->  E. w  e.  x  ( y  =/=  w  /\  z  e.  (
y  i^i  w )
) ) )
1211cbvralv 2777 . . . . . 6  |-  ( A. v  e.  y  E. w  e.  x  (
y  =/=  w  /\  v  e.  ( y  i^i  w ) )  <->  A. z  e.  y  E. w  e.  x  ( y  =/=  w  /\  z  e.  ( y  i^i  w
) ) )
13 df-ral 2561 . . . . . 6  |-  ( A. z  e.  y  E. w  e.  x  (
y  =/=  w  /\  z  e.  ( y  i^i  w ) )  <->  A. z
( z  e.  y  ->  E. w  e.  x  ( y  =/=  w  /\  z  e.  (
y  i^i  w )
) ) )
1412, 13bitri 240 . . . . 5  |-  ( A. v  e.  y  E. w  e.  x  (
y  =/=  w  /\  v  e.  ( y  i^i  w ) )  <->  A. z
( z  e.  y  ->  E. w  e.  x  ( y  =/=  w  /\  z  e.  (
y  i^i  w )
) ) )
1514anbi2i 675 . . . 4  |-  ( ( y  e.  x  /\  A. v  e.  y  E. w  e.  x  (
y  =/=  w  /\  v  e.  ( y  i^i  w ) ) )  <-> 
( y  e.  x  /\  A. z ( z  e.  y  ->  E. w  e.  x  ( y  =/=  w  /\  z  e.  ( y  i^i  w
) ) ) ) )
16 19.28v 1848 . . . 4  |-  ( A. z ( y  e.  x  /\  ( z  e.  y  ->  E. w  e.  x  ( y  =/=  w  /\  z  e.  ( y  i^i  w
) ) ) )  <-> 
( y  e.  x  /\  A. z ( z  e.  y  ->  E. w  e.  x  ( y  =/=  w  /\  z  e.  ( y  i^i  w
) ) ) ) )
17 neeq2 2468 . . . . . . . . . . . 12  |-  ( w  =  v  ->  (
y  =/=  w  <->  y  =/=  v ) )
18 ineq2 3377 . . . . . . . . . . . . 13  |-  ( w  =  v  ->  (
y  i^i  w )  =  ( y  i^i  v ) )
1918eleq2d 2363 . . . . . . . . . . . 12  |-  ( w  =  v  ->  (
z  e.  ( y  i^i  w )  <->  z  e.  ( y  i^i  v
) ) )
2017, 19anbi12d 691 . . . . . . . . . . 11  |-  ( w  =  v  ->  (
( y  =/=  w  /\  z  e.  (
y  i^i  w )
)  <->  ( y  =/=  v  /\  z  e.  ( y  i^i  v
) ) ) )
2120cbvrexv 2778 . . . . . . . . . 10  |-  ( E. w  e.  x  ( y  =/=  w  /\  z  e.  ( y  i^i  w ) )  <->  E. v  e.  x  ( y  =/=  v  /\  z  e.  ( y  i^i  v
) ) )
22 df-rex 2562 . . . . . . . . . 10  |-  ( E. v  e.  x  ( y  =/=  v  /\  z  e.  ( y  i^i  v ) )  <->  E. v
( v  e.  x  /\  ( y  =/=  v  /\  z  e.  (
y  i^i  v )
) ) )
2321, 22bitri 240 . . . . . . . . 9  |-  ( E. w  e.  x  ( y  =/=  w  /\  z  e.  ( y  i^i  w ) )  <->  E. v
( v  e.  x  /\  ( y  =/=  v  /\  z  e.  (
y  i^i  v )
) ) )
2423imbi2i 303 . . . . . . . 8  |-  ( ( z  e.  y  ->  E. w  e.  x  ( y  =/=  w  /\  z  e.  (
y  i^i  w )
) )  <->  ( z  e.  y  ->  E. v
( v  e.  x  /\  ( y  =/=  v  /\  z  e.  (
y  i^i  v )
) ) ) )
25 19.37v 1852 . . . . . . . 8  |-  ( E. v ( z  e.  y  ->  ( v  e.  x  /\  (
y  =/=  v  /\  z  e.  ( y  i^i  v ) ) ) )  <->  ( z  e.  y  ->  E. v
( v  e.  x  /\  ( y  =/=  v  /\  z  e.  (
y  i^i  v )
) ) ) )
2624, 25bitr4i 243 . . . . . . 7  |-  ( ( z  e.  y  ->  E. w  e.  x  ( y  =/=  w  /\  z  e.  (
y  i^i  w )
) )  <->  E. v
( z  e.  y  ->  ( v  e.  x  /\  ( y  =/=  v  /\  z  e.  ( y  i^i  v
) ) ) ) )
2726anbi2i 675 . . . . . 6  |-  ( ( y  e.  x  /\  ( z  e.  y  ->  E. w  e.  x  ( y  =/=  w  /\  z  e.  (
y  i^i  w )
) ) )  <->  ( y  e.  x  /\  E. v
( z  e.  y  ->  ( v  e.  x  /\  ( y  =/=  v  /\  z  e.  ( y  i^i  v
) ) ) ) ) )
28 19.42v 1858 . . . . . 6  |-  ( E. v ( y  e.  x  /\  ( z  e.  y  ->  (
v  e.  x  /\  ( y  =/=  v  /\  z  e.  (
y  i^i  v )
) ) ) )  <-> 
( y  e.  x  /\  E. v ( z  e.  y  ->  (
v  e.  x  /\  ( y  =/=  v  /\  z  e.  (
y  i^i  v )
) ) ) ) )
29 nfv 1609 . . . . . . . . 9  |-  F/ u
( y  e.  x  /\  ph )
302919.3 1793 . . . . . . . 8  |-  ( A. u ( y  e.  x  /\  ph )  <->  ( y  e.  x  /\  ph ) )
31 kmlem14.1 . . . . . . . . . 10  |-  ( ph  <->  ( z  e.  y  -> 
( ( v  e.  x  /\  y  =/=  v )  /\  z  e.  v ) ) )
32 elin 3371 . . . . . . . . . . . . . 14  |-  ( z  e.  ( y  i^i  v )  <->  ( z  e.  y  /\  z  e.  v ) )
3332baibr 872 . . . . . . . . . . . . 13  |-  ( z  e.  y  ->  (
z  e.  v  <->  z  e.  ( y  i^i  v
) ) )
3433anbi2d 684 . . . . . . . . . . . 12  |-  ( z  e.  y  ->  (
( ( v  e.  x  /\  y  =/=  v )  /\  z  e.  v )  <->  ( (
v  e.  x  /\  y  =/=  v )  /\  z  e.  ( y  i^i  v ) ) ) )
35 anass 630 . . . . . . . . . . . 12  |-  ( ( ( v  e.  x  /\  y  =/=  v
)  /\  z  e.  ( y  i^i  v
) )  <->  ( v  e.  x  /\  (
y  =/=  v  /\  z  e.  ( y  i^i  v ) ) ) )
3634, 35syl6bb 252 . . . . . . . . . . 11  |-  ( z  e.  y  ->  (
( ( v  e.  x  /\  y  =/=  v )  /\  z  e.  v )  <->  ( v  e.  x  /\  (
y  =/=  v  /\  z  e.  ( y  i^i  v ) ) ) ) )
3736pm5.74i 236 . . . . . . . . . 10  |-  ( ( z  e.  y  -> 
( ( v  e.  x  /\  y  =/=  v )  /\  z  e.  v ) )  <->  ( z  e.  y  ->  ( v  e.  x  /\  (
y  =/=  v  /\  z  e.  ( y  i^i  v ) ) ) ) )
3831, 37bitri 240 . . . . . . . . 9  |-  ( ph  <->  ( z  e.  y  -> 
( v  e.  x  /\  ( y  =/=  v  /\  z  e.  (
y  i^i  v )
) ) ) )
3938anbi2i 675 . . . . . . . 8  |-  ( ( y  e.  x  /\  ph )  <->  ( y  e.  x  /\  ( z  e.  y  ->  (
v  e.  x  /\  ( y  =/=  v  /\  z  e.  (
y  i^i  v )
) ) ) ) )
4030, 39bitr2i 241 . . . . . . 7  |-  ( ( y  e.  x  /\  ( z  e.  y  ->  ( v  e.  x  /\  ( y  =/=  v  /\  z  e.  ( y  i^i  v
) ) ) ) )  <->  A. u ( y  e.  x  /\  ph ) )
4140exbii 1572 . . . . . 6  |-  ( E. v ( y  e.  x  /\  ( z  e.  y  ->  (
v  e.  x  /\  ( y  =/=  v  /\  z  e.  (
y  i^i  v )
) ) ) )  <->  E. v A. u ( y  e.  x  /\  ph ) )
4227, 28, 413bitr2i 264 . . . . 5  |-  ( ( y  e.  x  /\  ( z  e.  y  ->  E. w  e.  x  ( y  =/=  w  /\  z  e.  (
y  i^i  w )
) ) )  <->  E. v A. u ( y  e.  x  /\  ph )
)
4342albii 1556 . . . 4  |-  ( A. z ( y  e.  x  /\  ( z  e.  y  ->  E. w  e.  x  ( y  =/=  w  /\  z  e.  ( y  i^i  w
) ) ) )  <->  A. z E. v A. u ( y  e.  x  /\  ph )
)
4415, 16, 433bitr2i 264 . . 3  |-  ( ( y  e.  x  /\  A. v  e.  y  E. w  e.  x  (
y  =/=  w  /\  v  e.  ( y  i^i  w ) ) )  <->  A. z E. v A. u ( y  e.  x  /\  ph )
)
4544exbii 1572 . 2  |-  ( E. y ( y  e.  x  /\  A. v  e.  y  E. w  e.  x  ( y  =/=  w  /\  v  e.  ( y  i^i  w
) ) )  <->  E. y A. z E. v A. u ( y  e.  x  /\  ph )
)
467, 8, 453bitri 262 1  |-  ( E. z  e.  x  A. v  e.  z  E. w  e.  x  (
z  =/=  w  /\  v  e.  ( z  i^i  w ) )  <->  E. y A. z E. v A. u ( y  e.  x  /\  ph )
)
Colors of variables: wff set class
Syntax hints:    -> wi 4    <-> wb 176    /\ wa 358   A.wal 1530   E.wex 1531    = wceq 1632    e. wcel 1696   E!weu 2156    =/= wne 2459   A.wral 2556   E.wrex 2557    i^i cin 3164
This theorem is referenced by:  kmlem16  7807
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1536  ax-5 1547  ax-17 1606  ax-9 1644  ax-8 1661  ax-6 1715  ax-7 1720  ax-11 1727  ax-12 1878  ax-ext 2277
This theorem depends on definitions:  df-bi 177  df-or 359  df-an 360  df-tru 1310  df-ex 1532  df-nf 1535  df-sb 1639  df-clab 2283  df-cleq 2289  df-clel 2292  df-nfc 2421  df-ne 2461  df-ral 2561  df-rex 2562  df-v 2803  df-in 3172
  Copyright terms: Public domain W3C validator