let Values be Values_with_Bool; for DS being DistributedSysWithSharedMem of Values
for e1, e2, e3 being Event of DS st e1 <= e2 & e2 <= e3 holds
e1 <= e3
let DS be DistributedSysWithSharedMem of Values; for e1, e2, e3 being Event of DS st e1 <= e2 & e2 <= e3 holds
e1 <= e3
let e1, e2, e3 be Event of DS; ( e1 <= e2 & e2 <= e3 implies e1 <= e3 )
( [e1,e2] in the InternalRel of the events of DS & [e2,e3] in the InternalRel of the events of DS implies [e1,e3] in the InternalRel of the events of DS )
by ORDERS_2:def 3, RELAT_2:def 8;
hence
( e1 <= e2 & e2 <= e3 implies e1 <= e3 )
by ORDERS_2:def 5; verum