{ the_es:EO. e',e:E.
    ((e  before(e'))  (l:E List. (before(e') = (before(e) @ [e] @ l)))) }

{ Proof }



Definitions occuring in Statement :  es-before: before(e) es-E: E event_ordering: EO append: as @ bs all: x:A. B[x] exists: x:A. B[x] implies: P  Q cons: [car / cdr] nil: [] list: type List equal: s = t l_member: (x  l)
Definitions :  and: P  Q iff: P  Q rev_implies: P  Q prop: subtype: S  T top: Top false: False implies: P  Q not: A le: A  B ycomb: Y label: ...$L... t ge: i  j  all: x:A. B[x] member: t  T length: ||as||
Lemmas :  add_functionality_wrt_eq length_append length_cons non_neg_length top_wf length_wf_nat length_nil length_wf1

\mforall{}the$_{es}$:EO.  \mforall{}e',e:E.    ((e  \mmember{}  before(e'))  {}\mRightarrow{}  (\mexists{}l:E  List.  (before(e')  =  (before\000C(e)  @  [e]  @  l))))


Date html generated: 2011_08_16-AM-10_43_43
Last ObjectModification: 2010_09_24-PM-09_04_26

Home Index