Step |
Hyp |
Ref |
Expression |
1 |
|
clnbgredg.e |
|- E = ( Edg ` G ) |
2 |
|
clnbgredg.n |
|- N = ( G ClNeighbVtx X ) |
3 |
1
|
eleq2i |
|- ( K e. E <-> K e. ( Edg ` G ) ) |
4 |
3
|
biimpi |
|- ( K e. E -> K e. ( Edg ` G ) ) |
5 |
4
|
3ad2ant1 |
|- ( ( K e. E /\ X e. K /\ Y e. K ) -> K e. ( Edg ` G ) ) |
6 |
|
simp3 |
|- ( ( K e. E /\ X e. K /\ Y e. K ) -> Y e. K ) |
7 |
5 6
|
jca |
|- ( ( K e. E /\ X e. K /\ Y e. K ) -> ( K e. ( Edg ` G ) /\ Y e. K ) ) |
8 |
7
|
anim2i |
|- ( ( G e. UHGraph /\ ( K e. E /\ X e. K /\ Y e. K ) ) -> ( G e. UHGraph /\ ( K e. ( Edg ` G ) /\ Y e. K ) ) ) |
9 |
|
3anass |
|- ( ( G e. UHGraph /\ K e. ( Edg ` G ) /\ Y e. K ) <-> ( G e. UHGraph /\ ( K e. ( Edg ` G ) /\ Y e. K ) ) ) |
10 |
8 9
|
sylibr |
|- ( ( G e. UHGraph /\ ( K e. E /\ X e. K /\ Y e. K ) ) -> ( G e. UHGraph /\ K e. ( Edg ` G ) /\ Y e. K ) ) |
11 |
|
uhgredgrnv |
|- ( ( G e. UHGraph /\ K e. ( Edg ` G ) /\ Y e. K ) -> Y e. ( Vtx ` G ) ) |
12 |
10 11
|
syl |
|- ( ( G e. UHGraph /\ ( K e. E /\ X e. K /\ Y e. K ) ) -> Y e. ( Vtx ` G ) ) |
13 |
|
simp2 |
|- ( ( K e. E /\ X e. K /\ Y e. K ) -> X e. K ) |
14 |
5 13
|
jca |
|- ( ( K e. E /\ X e. K /\ Y e. K ) -> ( K e. ( Edg ` G ) /\ X e. K ) ) |
15 |
14
|
anim2i |
|- ( ( G e. UHGraph /\ ( K e. E /\ X e. K /\ Y e. K ) ) -> ( G e. UHGraph /\ ( K e. ( Edg ` G ) /\ X e. K ) ) ) |
16 |
|
3anass |
|- ( ( G e. UHGraph /\ K e. ( Edg ` G ) /\ X e. K ) <-> ( G e. UHGraph /\ ( K e. ( Edg ` G ) /\ X e. K ) ) ) |
17 |
15 16
|
sylibr |
|- ( ( G e. UHGraph /\ ( K e. E /\ X e. K /\ Y e. K ) ) -> ( G e. UHGraph /\ K e. ( Edg ` G ) /\ X e. K ) ) |
18 |
|
uhgredgrnv |
|- ( ( G e. UHGraph /\ K e. ( Edg ` G ) /\ X e. K ) -> X e. ( Vtx ` G ) ) |
19 |
17 18
|
syl |
|- ( ( G e. UHGraph /\ ( K e. E /\ X e. K /\ Y e. K ) ) -> X e. ( Vtx ` G ) ) |
20 |
|
simpr1 |
|- ( ( G e. UHGraph /\ ( K e. E /\ X e. K /\ Y e. K ) ) -> K e. E ) |
21 |
|
sseq2 |
|- ( e = K -> ( { X , Y } C_ e <-> { X , Y } C_ K ) ) |
22 |
21
|
adantl |
|- ( ( ( G e. UHGraph /\ ( K e. E /\ X e. K /\ Y e. K ) ) /\ e = K ) -> ( { X , Y } C_ e <-> { X , Y } C_ K ) ) |
23 |
|
prssi |
|- ( ( X e. K /\ Y e. K ) -> { X , Y } C_ K ) |
24 |
23
|
3adant1 |
|- ( ( K e. E /\ X e. K /\ Y e. K ) -> { X , Y } C_ K ) |
25 |
24
|
adantl |
|- ( ( G e. UHGraph /\ ( K e. E /\ X e. K /\ Y e. K ) ) -> { X , Y } C_ K ) |
26 |
20 22 25
|
rspcedvd |
|- ( ( G e. UHGraph /\ ( K e. E /\ X e. K /\ Y e. K ) ) -> E. e e. E { X , Y } C_ e ) |
27 |
26
|
olcd |
|- ( ( G e. UHGraph /\ ( K e. E /\ X e. K /\ Y e. K ) ) -> ( Y = X \/ E. e e. E { X , Y } C_ e ) ) |
28 |
|
eqid |
|- ( Vtx ` G ) = ( Vtx ` G ) |
29 |
28 1
|
clnbgrel |
|- ( Y e. ( G ClNeighbVtx X ) <-> ( ( Y e. ( Vtx ` G ) /\ X e. ( Vtx ` G ) ) /\ ( Y = X \/ E. e e. E { X , Y } C_ e ) ) ) |
30 |
12 19 27 29
|
syl21anbrc |
|- ( ( G e. UHGraph /\ ( K e. E /\ X e. K /\ Y e. K ) ) -> Y e. ( G ClNeighbVtx X ) ) |
31 |
2
|
eleq2i |
|- ( Y e. N <-> Y e. ( G ClNeighbVtx X ) ) |
32 |
30 31
|
sylibr |
|- ( ( G e. UHGraph /\ ( K e. E /\ X e. K /\ Y e. K ) ) -> Y e. N ) |