{ 
[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