Step |
Hyp |
Ref |
Expression |
1 |
|
ist0.1 |
|- X = U. J |
2 |
1
|
ist0 |
|- ( J e. Kol2 <-> ( J e. Top /\ A. y e. X A. z e. X ( A. x e. J ( y e. x <-> z e. x ) -> y = z ) ) ) |
3 |
2
|
simprbi |
|- ( J e. Kol2 -> A. y e. X A. z e. X ( A. x e. J ( y e. x <-> z e. x ) -> y = z ) ) |
4 |
|
eleq1 |
|- ( y = A -> ( y e. x <-> A e. x ) ) |
5 |
4
|
bibi1d |
|- ( y = A -> ( ( y e. x <-> z e. x ) <-> ( A e. x <-> z e. x ) ) ) |
6 |
5
|
ralbidv |
|- ( y = A -> ( A. x e. J ( y e. x <-> z e. x ) <-> A. x e. J ( A e. x <-> z e. x ) ) ) |
7 |
|
eqeq1 |
|- ( y = A -> ( y = z <-> A = z ) ) |
8 |
6 7
|
imbi12d |
|- ( y = A -> ( ( A. x e. J ( y e. x <-> z e. x ) -> y = z ) <-> ( A. x e. J ( A e. x <-> z e. x ) -> A = z ) ) ) |
9 |
|
eleq1 |
|- ( z = B -> ( z e. x <-> B e. x ) ) |
10 |
9
|
bibi2d |
|- ( z = B -> ( ( A e. x <-> z e. x ) <-> ( A e. x <-> B e. x ) ) ) |
11 |
10
|
ralbidv |
|- ( z = B -> ( A. x e. J ( A e. x <-> z e. x ) <-> A. x e. J ( A e. x <-> B e. x ) ) ) |
12 |
|
eqeq2 |
|- ( z = B -> ( A = z <-> A = B ) ) |
13 |
11 12
|
imbi12d |
|- ( z = B -> ( ( A. x e. J ( A e. x <-> z e. x ) -> A = z ) <-> ( A. x e. J ( A e. x <-> B e. x ) -> A = B ) ) ) |
14 |
8 13
|
rspc2va |
|- ( ( ( A e. X /\ B e. X ) /\ A. y e. X A. z e. X ( A. x e. J ( y e. x <-> z e. x ) -> y = z ) ) -> ( A. x e. J ( A e. x <-> B e. x ) -> A = B ) ) |
15 |
14
|
ancoms |
|- ( ( A. y e. X A. z e. X ( A. x e. J ( y e. x <-> z e. x ) -> y = z ) /\ ( A e. X /\ B e. X ) ) -> ( A. x e. J ( A e. x <-> B e. x ) -> A = B ) ) |
16 |
3 15
|
sylan |
|- ( ( J e. Kol2 /\ ( A e. X /\ B e. X ) ) -> ( A. x e. J ( A e. x <-> B e. x ) -> A = B ) ) |