let x, y be object ; :: thesis: for E being non empty set
for v, w being Element of E ^omega
for F being Subset of (E ^omega)
for TS being non empty transition-system over F st x,v ==>* y,w,TS holds
len w <= len v

let E be non empty set ; :: thesis: for v, w being Element of E ^omega
for F being Subset of (E ^omega)
for TS being non empty transition-system over F st x,v ==>* y,w,TS holds
len w <= len v

let v, w be Element of E ^omega ; :: thesis: for F being Subset of (E ^omega)
for TS being non empty transition-system over F st x,v ==>* y,w,TS holds
len w <= len v

let F be Subset of (E ^omega); :: thesis: for TS being non empty transition-system over F st x,v ==>* y,w,TS holds
len w <= len v

let TS be non empty transition-system over F; :: thesis: ( x,v ==>* y,w,TS implies len w <= len v )
assume x,v ==>* y,w,TS ; :: thesis: len w <= len v
then ex u being Element of E ^omega st v = u ^ w by Th88;
hence len w <= len v by Th9; :: thesis: verum