let E be non empty set ; :: thesis: for F being Subset of (E ^omega )
for TS being non empty transition-system of F st not <%> E in rng (dom the Tran of TS) holds
for P being RedSequence of ==>.-relation TS
for k being Nat st k in dom P & k + 1 in dom P holds
(P . k) `2 <> (P . (k + 1)) `2
let F be Subset of (E ^omega ); :: thesis: for TS being non empty transition-system of F st not <%> E in rng (dom the Tran of TS) holds
for P being RedSequence of ==>.-relation TS
for k being Nat st k in dom P & k + 1 in dom P holds
(P . k) `2 <> (P . (k + 1)) `2
let TS be non empty transition-system of F; :: thesis: ( not <%> E in rng (dom the Tran of TS) implies for P being RedSequence of ==>.-relation TS
for k being Nat st k in dom P & k + 1 in dom P holds
(P . k) `2 <> (P . (k + 1)) `2 )
assume A:
not <%> E in rng (dom the Tran of TS)
; :: thesis: for P being RedSequence of ==>.-relation TS
for k being Nat st k in dom P & k + 1 in dom P holds
(P . k) `2 <> (P . (k + 1)) `2
let P be RedSequence of ==>.-relation TS; :: thesis: for k being Nat st k in dom P & k + 1 in dom P holds
(P . k) `2 <> (P . (k + 1)) `2
let k be Nat; :: thesis: ( k in dom P & k + 1 in dom P implies (P . k) `2 <> (P . (k + 1)) `2 )
assume B:
( k in dom P & k + 1 in dom P )
; :: thesis: (P . k) `2 <> (P . (k + 1)) `2
consider s being Element of TS, u being Element of E ^omega , t being Element of TS, v being Element of E ^omega such that
C:
( P . k = [s,u] & P . (k + 1) = [t,v] )
by B, ThRedSeq4;
[[s,u],[t,v]] in ==>.-relation TS
by B, C, REWRITE1:def 2;
then
u <> v
by A, ThRel110;
then
(P . k) `2 <> v
by C, MCART_1:7;
hence
(P . k) `2 <> (P . (k + 1)) `2
by C, MCART_1:7; :: thesis: verum