Users' Mathboxes Mathbox for Alan Sare < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >   Mathboxes  >  onfrALTlem4VD Structured version   Unicode version

Theorem onfrALTlem4VD 28999
Description: Virtual deduction proof of onfrALTlem4 28630. The following User's Proof is a Virtual Deduction proof completed automatically by the tools program completeusersproof.cmd, which invokes Mel O'Cat's mmj2 and Norm Megill's Metamath Proof Assistant. onfrALTlem4 28630 is onfrALTlem4VD 28999 without virtual deductions and was automatically derived from onfrALTlem4VD 28999.
1::  |-  y  e.  _V
2:1:  |-  ( [. y  /  x ]. ( a  i^i  x )  =  (/)  <->  [_  y  /  x ]_ ( a  i^i  x )  =  [_ y  /  x ]_ (/) )
3:1:  |-  [_ y  /  x ]_ ( a  i^i  x )  =  ( [_ y  /  x ]_  a  i^i  [_ y  /  x ]_ x )
4:1:  |-  [_ y  /  x ]_ a  =  a
5:1:  |-  [_ y  /  x ]_ x  =  y
6:4,5:  |-  ( [_ y  /  x ]_ a  i^i  [_ y  /  x ]_ x )  =  (  a  i^i  y )
7:3,6:  |-  [_ y  /  x ]_ ( a  i^i  x )  =  ( a  i^i  y )
8:1:  |-  [_ y  /  x ]_ (/)  =  (/)
9:7,8:  |-  ( [_ y  /  x ]_ ( a  i^i  x )  =  [_ y  /  x ]_  (/)  <->  ( a  i^i  y )  =  (/) )
10:2,9:  |-  ( [. y  /  x ]. ( a  i^i  x )  =  (/)  <->  ( a  i^i  y )  =  (/) )
11:1:  |-  ( [. y  /  x ]. x  e.  a  <->  y  e.  a )
12:11,10:  |-  ( ( [. y  /  x ]. x  e.  a  /\  [. y  /  x ]. (  a  i^i  x )  =  (/) )  <->  ( y  e.  a  /\  ( a  i^i  y )  =  (/) ) )
13:1:  |-  ( [. y  /  x ]. ( x  e.  a  /\  ( a  i^i  x )  =  (/) )  <->  ( [. y  /  x ]. x  e.  a  /\  [. y  /  x ]. ( a  i^i  x )  =  (/) ) )
qed:13,12:  |-  ( [. y  /  x ]. ( x  e.  a  /\  ( a  i^i  x )  =  (/) )  <->  ( y  e.  a  /\  ( a  i^i  y )  =  (/) ) )
(Contributed by Alan Sare, 22-Jul-2012.) (Proof modification is discouraged.) (New usage is discouraged.)
Assertion
Ref Expression
onfrALTlem4VD  |-  ( [. y  /  x ]. (
x  e.  a  /\  ( a  i^i  x
)  =  (/) )  <->  ( y  e.  a  /\  (
a  i^i  y )  =  (/) ) )
Distinct variable group:    x, a

Proof of Theorem onfrALTlem4VD
StepHypRef Expression
1 vex 2960 . . 3  |-  y  e. 
_V
2 sbcang 3205 . . 3  |-  ( y  e.  _V  ->  ( [. y  /  x ]. ( x  e.  a  /\  ( a  i^i  x )  =  (/) ) 
<->  ( [. y  /  x ]. x  e.  a  /\  [. y  /  x ]. ( a  i^i  x )  =  (/) ) ) )
31, 2e0_ 28885 . 2  |-  ( [. y  /  x ]. (
x  e.  a  /\  ( a  i^i  x
)  =  (/) )  <->  ( [. y  /  x ]. x  e.  a  /\  [. y  /  x ]. ( a  i^i  x )  =  (/) ) )
4 sbcel1gv 3221 . . . 4  |-  ( y  e.  _V  ->  ( [. y  /  x ]. x  e.  a  <->  y  e.  a ) )
51, 4e0_ 28885 . . 3  |-  ( [. y  /  x ]. x  e.  a  <->  y  e.  a )
6 sbceqg 3268 . . . . 5  |-  ( y  e.  _V  ->  ( [. y  /  x ]. ( a  i^i  x
)  =  (/)  <->  [_ y  /  x ]_ ( a  i^i  x )  =  [_ y  /  x ]_ (/) ) )
71, 6e0_ 28885 . . . 4  |-  ( [. y  /  x ]. (
a  i^i  x )  =  (/)  <->  [_ y  /  x ]_ ( a  i^i  x
)  =  [_ y  /  x ]_ (/) )
8 csbing 3549 . . . . . . 7  |-  ( y  e.  _V  ->  [_ y  /  x ]_ ( a  i^i  x )  =  ( [_ y  /  x ]_ a  i^i  [_ y  /  x ]_ x ) )
91, 8e0_ 28885 . . . . . 6  |-  [_ y  /  x ]_ ( a  i^i  x )  =  ( [_ y  /  x ]_ a  i^i  [_ y  /  x ]_ x )
10 csbconstg 3266 . . . . . . . 8  |-  ( y  e.  _V  ->  [_ y  /  x ]_ a  =  a )
111, 10e0_ 28885 . . . . . . 7  |-  [_ y  /  x ]_ a  =  a
12 csbvarg 3279 . . . . . . . 8  |-  ( y  e.  _V  ->  [_ y  /  x ]_ x  =  y )
131, 12e0_ 28885 . . . . . . 7  |-  [_ y  /  x ]_ x  =  y
1411, 13ineq12i 3541 . . . . . 6  |-  ( [_ y  /  x ]_ a  i^i  [_ y  /  x ]_ x )  =  ( a  i^i  y )
159, 14eqtri 2457 . . . . 5  |-  [_ y  /  x ]_ ( a  i^i  x )  =  ( a  i^i  y
)
16 csbconstg 3266 . . . . . 6  |-  ( y  e.  _V  ->  [_ y  /  x ]_ (/)  =  (/) )
171, 16e0_ 28885 . . . . 5  |-  [_ y  /  x ]_ (/)  =  (/)
1815, 17eqeq12i 2450 . . . 4  |-  ( [_ y  /  x ]_ (
a  i^i  x )  =  [_ y  /  x ]_ (/)  <->  ( a  i^i  y )  =  (/) )
197, 18bitri 242 . . 3  |-  ( [. y  /  x ]. (
a  i^i  x )  =  (/)  <->  ( a  i^i  y )  =  (/) )
205, 19anbi12i 680 . 2  |-  ( (
[. y  /  x ]. x  e.  a  /\  [. y  /  x ]. ( a  i^i  x
)  =  (/) )  <->  ( y  e.  a  /\  (
a  i^i  y )  =  (/) ) )
213, 20bitri 242 1  |-  ( [. y  /  x ]. (
x  e.  a  /\  ( a  i^i  x
)  =  (/) )  <->  ( y  e.  a  /\  (
a  i^i  y )  =  (/) ) )
Colors of variables: wff set class
Syntax hints:    <-> wb 178    /\ wa 360    = wceq 1653    e. wcel 1726   _Vcvv 2957   [.wsbc 3162   [_csb 3252    i^i cin 3320   (/)c0 3629
This theorem was proved from axioms:  ax-1 5  ax-2 6  ax-3 7  ax-mp 8  ax-gen 1556  ax-5 1567  ax-17 1627  ax-9 1667  ax-8 1688  ax-6 1745  ax-7 1750  ax-11 1762  ax-12 1951  ax-ext 2418
This theorem depends on definitions:  df-bi 179  df-or 361  df-an 362  df-3an 939  df-tru 1329  df-ex 1552  df-nf 1555  df-sb 1660  df-clab 2424  df-cleq 2430  df-clel 2433  df-nfc 2562  df-rab 2715  df-v 2959  df-sbc 3163  df-csb 3253  df-in 3328
  Copyright terms: Public domain W3C validator