{ 
[Info:Type]. 
[eo:EO+(Info)]. 
[e:E].
    (E ~ {e@0:es-base-E(eo)| 
          
((es-dom(eo) e@0) 
 (e 
loc e@0 
(
loc(e@0) = loc(e))))} ) }
{ Proof }
Definitions occuring in Statement : 
eo-forward: eo.e, 
event-ordering+: EO+(Info), 
es-ble: e 
loc e', 
es-loc: loc(e), 
es-E: E, 
es-dom: es-dom(es), 
es-base-E: es-base-E(es), 
eq_id: a = b, 
bor: p 
q, 
band: p 
 q, 
bnot: 
b, 
assert:
b, 
uall:
[x:A]. B[x], 
set: {x:A| B[x]} , 
apply: f a, 
universe: Type, 
sqequal: s ~ t
Definitions : 
ifthenelse: if b then t else f fi , 
eq_atom: x =a y, 
eq_atom: eq_atom$n(x;y), 
rec_select_update: rec_select_update{rec_select_update_compseq_tag_def:o}(y; v; x; r), 
lambda:
x.A[x], 
eo-restrict: eo-restrict(eo;P), 
assert:
b, 
es-dom: es-dom(es), 
record-select: r.x, 
eo-forward: eo.e, 
subtype: S 
 T, 
function: x:A 
 B[x], 
all:
x:A. B[x], 
equal: s = t, 
universe: Type, 
sqequal: s ~ t, 
member: t 
 T, 
uall:
[x:A]. B[x], 
isect:
x:A. B[x], 
es-E: E, 
event_ordering: EO, 
event-ordering+: EO+(Info), 
Auto: Error :Auto, 
CollapseTHEN: Error :CollapseTHEN, 
RepUR: Error :RepUR, 
CollapseTHENA: Error :CollapseTHENA
Lemmas : 
es-E_wf, 
event-ordering+_inc, 
event-ordering+_wf
\mforall{}[Info:Type].  \mforall{}[eo:EO+(Info)].  \mforall{}[e:E].
    (E  \msim{}  \{e@0:es-base-E(eo)|  \muparrow{}((es-dom(eo)  e@0)  \mwedge{}\msubb{}  (e  \mleq{}loc  e@0  \mvee{}\msubb{}(\mneg{}\msubb{}loc(e@0)  =  loc(e))))\}  )
Date html generated:
2011_08_16-AM-11_21_56
Last ObjectModification:
2011_06_20-AM-00_25_44
Home
Index