Step |
Hyp |
Ref |
Expression |
1 |
|
elex |
|- ( A e. ( R " B ) -> A e. _V ) |
2 |
|
xpeq2 |
|- ( { A } = (/) -> ( B X. { A } ) = ( B X. (/) ) ) |
3 |
|
xp0 |
|- ( B X. (/) ) = (/) |
4 |
2 3
|
eqtrdi |
|- ( { A } = (/) -> ( B X. { A } ) = (/) ) |
5 |
4
|
ineq2d |
|- ( { A } = (/) -> ( R i^i ( B X. { A } ) ) = ( R i^i (/) ) ) |
6 |
|
in0 |
|- ( R i^i (/) ) = (/) |
7 |
5 6
|
eqtrdi |
|- ( { A } = (/) -> ( R i^i ( B X. { A } ) ) = (/) ) |
8 |
7
|
necon3i |
|- ( ( R i^i ( B X. { A } ) ) =/= (/) -> { A } =/= (/) ) |
9 |
|
snnzb |
|- ( A e. _V <-> { A } =/= (/) ) |
10 |
8 9
|
sylibr |
|- ( ( R i^i ( B X. { A } ) ) =/= (/) -> A e. _V ) |
11 |
|
eleq1 |
|- ( x = A -> ( x e. ( R " B ) <-> A e. ( R " B ) ) ) |
12 |
|
sneq |
|- ( x = A -> { x } = { A } ) |
13 |
12
|
xpeq2d |
|- ( x = A -> ( B X. { x } ) = ( B X. { A } ) ) |
14 |
13
|
ineq2d |
|- ( x = A -> ( R i^i ( B X. { x } ) ) = ( R i^i ( B X. { A } ) ) ) |
15 |
14
|
neeq1d |
|- ( x = A -> ( ( R i^i ( B X. { x } ) ) =/= (/) <-> ( R i^i ( B X. { A } ) ) =/= (/) ) ) |
16 |
|
elin |
|- ( p e. ( R i^i ( B X. { x } ) ) <-> ( p e. R /\ p e. ( B X. { x } ) ) ) |
17 |
|
ancom |
|- ( ( p e. R /\ p e. ( B X. { x } ) ) <-> ( p e. ( B X. { x } ) /\ p e. R ) ) |
18 |
|
elxp |
|- ( p e. ( B X. { x } ) <-> E. y E. z ( p = <. y , z >. /\ ( y e. B /\ z e. { x } ) ) ) |
19 |
18
|
anbi1i |
|- ( ( p e. ( B X. { x } ) /\ p e. R ) <-> ( E. y E. z ( p = <. y , z >. /\ ( y e. B /\ z e. { x } ) ) /\ p e. R ) ) |
20 |
16 17 19
|
3bitri |
|- ( p e. ( R i^i ( B X. { x } ) ) <-> ( E. y E. z ( p = <. y , z >. /\ ( y e. B /\ z e. { x } ) ) /\ p e. R ) ) |
21 |
20
|
exbii |
|- ( E. p p e. ( R i^i ( B X. { x } ) ) <-> E. p ( E. y E. z ( p = <. y , z >. /\ ( y e. B /\ z e. { x } ) ) /\ p e. R ) ) |
22 |
|
anass |
|- ( ( ( p = <. y , z >. /\ ( y e. B /\ z e. { x } ) ) /\ p e. R ) <-> ( p = <. y , z >. /\ ( ( y e. B /\ z e. { x } ) /\ p e. R ) ) ) |
23 |
22
|
2exbii |
|- ( E. y E. z ( ( p = <. y , z >. /\ ( y e. B /\ z e. { x } ) ) /\ p e. R ) <-> E. y E. z ( p = <. y , z >. /\ ( ( y e. B /\ z e. { x } ) /\ p e. R ) ) ) |
24 |
|
19.41vv |
|- ( E. y E. z ( ( p = <. y , z >. /\ ( y e. B /\ z e. { x } ) ) /\ p e. R ) <-> ( E. y E. z ( p = <. y , z >. /\ ( y e. B /\ z e. { x } ) ) /\ p e. R ) ) |
25 |
23 24
|
bitr3i |
|- ( E. y E. z ( p = <. y , z >. /\ ( ( y e. B /\ z e. { x } ) /\ p e. R ) ) <-> ( E. y E. z ( p = <. y , z >. /\ ( y e. B /\ z e. { x } ) ) /\ p e. R ) ) |
26 |
25
|
exbii |
|- ( E. p E. y E. z ( p = <. y , z >. /\ ( ( y e. B /\ z e. { x } ) /\ p e. R ) ) <-> E. p ( E. y E. z ( p = <. y , z >. /\ ( y e. B /\ z e. { x } ) ) /\ p e. R ) ) |
27 |
|
exrot3 |
|- ( E. p E. y E. z ( p = <. y , z >. /\ ( ( y e. B /\ z e. { x } ) /\ p e. R ) ) <-> E. y E. z E. p ( p = <. y , z >. /\ ( ( y e. B /\ z e. { x } ) /\ p e. R ) ) ) |
28 |
26 27
|
bitr3i |
|- ( E. p ( E. y E. z ( p = <. y , z >. /\ ( y e. B /\ z e. { x } ) ) /\ p e. R ) <-> E. y E. z E. p ( p = <. y , z >. /\ ( ( y e. B /\ z e. { x } ) /\ p e. R ) ) ) |
29 |
|
opex |
|- <. y , z >. e. _V |
30 |
|
eleq1 |
|- ( p = <. y , z >. -> ( p e. R <-> <. y , z >. e. R ) ) |
31 |
30
|
anbi2d |
|- ( p = <. y , z >. -> ( ( ( y e. B /\ z e. { x } ) /\ p e. R ) <-> ( ( y e. B /\ z e. { x } ) /\ <. y , z >. e. R ) ) ) |
32 |
29 31
|
ceqsexv |
|- ( E. p ( p = <. y , z >. /\ ( ( y e. B /\ z e. { x } ) /\ p e. R ) ) <-> ( ( y e. B /\ z e. { x } ) /\ <. y , z >. e. R ) ) |
33 |
32
|
exbii |
|- ( E. z E. p ( p = <. y , z >. /\ ( ( y e. B /\ z e. { x } ) /\ p e. R ) ) <-> E. z ( ( y e. B /\ z e. { x } ) /\ <. y , z >. e. R ) ) |
34 |
|
anass |
|- ( ( ( y e. B /\ z e. { x } ) /\ <. y , z >. e. R ) <-> ( y e. B /\ ( z e. { x } /\ <. y , z >. e. R ) ) ) |
35 |
|
an12 |
|- ( ( y e. B /\ ( z e. { x } /\ <. y , z >. e. R ) ) <-> ( z e. { x } /\ ( y e. B /\ <. y , z >. e. R ) ) ) |
36 |
|
velsn |
|- ( z e. { x } <-> z = x ) |
37 |
36
|
anbi1i |
|- ( ( z e. { x } /\ ( y e. B /\ <. y , z >. e. R ) ) <-> ( z = x /\ ( y e. B /\ <. y , z >. e. R ) ) ) |
38 |
34 35 37
|
3bitri |
|- ( ( ( y e. B /\ z e. { x } ) /\ <. y , z >. e. R ) <-> ( z = x /\ ( y e. B /\ <. y , z >. e. R ) ) ) |
39 |
38
|
exbii |
|- ( E. z ( ( y e. B /\ z e. { x } ) /\ <. y , z >. e. R ) <-> E. z ( z = x /\ ( y e. B /\ <. y , z >. e. R ) ) ) |
40 |
|
vex |
|- x e. _V |
41 |
|
opeq2 |
|- ( z = x -> <. y , z >. = <. y , x >. ) |
42 |
41
|
eleq1d |
|- ( z = x -> ( <. y , z >. e. R <-> <. y , x >. e. R ) ) |
43 |
42
|
anbi2d |
|- ( z = x -> ( ( y e. B /\ <. y , z >. e. R ) <-> ( y e. B /\ <. y , x >. e. R ) ) ) |
44 |
40 43
|
ceqsexv |
|- ( E. z ( z = x /\ ( y e. B /\ <. y , z >. e. R ) ) <-> ( y e. B /\ <. y , x >. e. R ) ) |
45 |
33 39 44
|
3bitri |
|- ( E. z E. p ( p = <. y , z >. /\ ( ( y e. B /\ z e. { x } ) /\ p e. R ) ) <-> ( y e. B /\ <. y , x >. e. R ) ) |
46 |
45
|
exbii |
|- ( E. y E. z E. p ( p = <. y , z >. /\ ( ( y e. B /\ z e. { x } ) /\ p e. R ) ) <-> E. y ( y e. B /\ <. y , x >. e. R ) ) |
47 |
21 28 46
|
3bitri |
|- ( E. p p e. ( R i^i ( B X. { x } ) ) <-> E. y ( y e. B /\ <. y , x >. e. R ) ) |
48 |
|
n0 |
|- ( ( R i^i ( B X. { x } ) ) =/= (/) <-> E. p p e. ( R i^i ( B X. { x } ) ) ) |
49 |
40
|
elima3 |
|- ( x e. ( R " B ) <-> E. y ( y e. B /\ <. y , x >. e. R ) ) |
50 |
47 48 49
|
3bitr4ri |
|- ( x e. ( R " B ) <-> ( R i^i ( B X. { x } ) ) =/= (/) ) |
51 |
11 15 50
|
vtoclbg |
|- ( A e. _V -> ( A e. ( R " B ) <-> ( R i^i ( B X. { A } ) ) =/= (/) ) ) |
52 |
1 10 51
|
pm5.21nii |
|- ( A e. ( R " B ) <-> ( R i^i ( B X. { A } ) ) =/= (/) ) |