let x, y be set ; :: thesis: for E being non empty set
for e being Element of E
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) & x,<%e%> ==>* y,TS holds
x,<%e%> ==>. y, <%> E,TS
let E be non empty set ; :: thesis: for e being Element of E
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) & x,<%e%> ==>* y,TS holds
x,<%e%> ==>. y, <%> E,TS
let e be Element of E; :: 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) & x,<%e%> ==>* y,TS holds
x,<%e%> ==>. y, <%> E,TS
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) & x,<%e%> ==>* y,TS holds
x,<%e%> ==>. y, <%> E,TS
let TS be non empty transition-system of F; :: thesis: ( not <%> E in rng (dom the Tran of TS) & x,<%e%> ==>* y,TS implies x,<%e%> ==>. y, <%> E,TS )
assume A:
not <%> E in rng (dom the Tran of TS)
; :: thesis: ( not x,<%e%> ==>* y,TS or x,<%e%> ==>. y, <%> E,TS )
assume
x,<%e%> ==>* y,TS
; :: thesis: x,<%e%> ==>. y, <%> E,TS
then
x,<%e%> ==>* y, <%> E,TS
by DefAcc;
hence
x,<%e%> ==>. y, <%> E,TS
by A, ThTran80; :: thesis: verum