let G be Graph; {} is Chain of G
thus
for n being Element of NAT st 1 <= n & n <= len {} holds
{} . n in the carrier' of G
by XXREAL_0:2; GRAPH_1:def 12 ex p being FinSequence st
( len p = (len {} ) + 1 & ( for n being Element of NAT st 1 <= n & n <= len p holds
p . n in the carrier of G ) & ( for n being Element of NAT st 1 <= n & n <= len {} holds
ex x9, y9 being Vertex of G st
( x9 = p . n & y9 = p . (n + 1) & {} . n joins x9,y9 ) ) )
consider x being Vertex of G;
A1:
x in the carrier of G
;
take
<*x*>
; ( len <*x*> = (len {} ) + 1 & ( for n being Element of NAT st 1 <= n & n <= len <*x*> holds
<*x*> . n in the carrier of G ) & ( for n being Element of NAT st 1 <= n & n <= len {} holds
ex x9, y9 being Vertex of G st
( x9 = <*x*> . n & y9 = <*x*> . (n + 1) & {} . n joins x9,y9 ) ) )
thus
len <*x*> = (len {} ) + 1
by FINSEQ_1:56; ( ( for n being Element of NAT st 1 <= n & n <= len <*x*> holds
<*x*> . n in the carrier of G ) & ( for n being Element of NAT st 1 <= n & n <= len {} holds
ex x9, y9 being Vertex of G st
( x9 = <*x*> . n & y9 = <*x*> . (n + 1) & {} . n joins x9,y9 ) ) )
thus
for n being Element of NAT st 1 <= n & n <= len <*x*> holds
<*x*> . n in the carrier of G
for n being Element of NAT st 1 <= n & n <= len {} holds
ex x9, y9 being Vertex of G st
( x9 = <*x*> . n & y9 = <*x*> . (n + 1) & {} . n joins x9,y9 )
let n be Element of NAT ; ( 1 <= n & n <= len {} implies ex x9, y9 being Vertex of G st
( x9 = <*x*> . n & y9 = <*x*> . (n + 1) & {} . n joins x9,y9 ) )
thus
( 1 <= n & n <= len {} implies ex x9, y9 being Vertex of G st
( x9 = <*x*> . n & y9 = <*x*> . (n + 1) & {} . n joins x9,y9 ) )
by XXREAL_0:2; verum