{ [Info:Type]. [es:EO+(Info)]. [e1,e2,e:E].
    (es-hist(es;e1;e2) = (es-hist(es;e1;pred(e)) @ es-hist(es;e;e2))) supposing 
       (e loc e2  and 
       (e1 <loc e)) }

{ Proof }



Definitions occuring in Statement :  es-hist: es-hist(es;e1;e2),  event-ordering+: EO+(Info),  es-le: e loc e' ,  es-locl: (e <loc e'),  es-pred: pred(e),  es-E: E,  append: as @ bs,  uimplies: b supposing a,  uall: [x:A]. B[x],  list: type List,  universe: Type,  equal: s = t
Definitions :  uall: [x:A]. B[x],  uimplies: b supposing a,  es-hist: es-hist(es;e1;e2),  member: t  T,  top: Top,  not: A,  assert: b,  bfalse: ff,  all: x:A. B[x],  implies: P  Q,  ifthenelse: if b then t else f fi ,  true: True,  subtype: S  T,  squash: T,  and: P  Q,  prop: ,  sq_type: SQType(T),  guard: {T},  false: False
Lemmas :  map_append_sq,  es-interval_wf2,  es-pred_wf,  subtype_base_sq,  bool_wf,  bool_subtype_base,  false_wf,  top_wf,  es-E_wf,  Id_wf,  es-loc_wf,  map_wf,  squash_wf,  true_wf,  es-info_wf,  es-le_wf,  event-ordering+_inc,  es-locl_wf,  event-ordering+_wf,  es-locl-first,  es-interval-partition

\mforall{}[Info:Type].  \mforall{}[es:EO+(Info)].  \mforall{}[e1,e2,e:E].
    (es-hist(es;e1;e2)  =  (es-hist(es;e1;pred(e))  @  es-hist(es;e;e2)))  supposing 
          (e  \mleq{}loc  e2    and 
          (e1  <loc  e))


Date html generated: 2011_08_16-AM-11_27_02
Last ObjectModification: 2011_06_20-AM-00_27_12

Home Index