:: deftheorem defines in PETERSON:def 7 :
for Values being Values_with_Bool
for S being Events_structure over Values
for e being Event of S
for tr being trace of S holds
( e in tr iff e in the traceE of S . tr );