{ 
[es:EO]. 
[d,b,a,c:E].
    ({(a = c) 
 (b = d)}) supposing 
       (([a, b] = [c, d]) and 
       c 
loc d  and 
       a 
loc b ) }
{ Proof }
Definitions occuring in Statement : 
es-interval: [e, e'], 
es-le: e 
loc e' , 
es-E: E, 
event_ordering: EO, 
uimplies: b supposing a, 
uall:
[x:A]. B[x], 
guard: {T}, 
and: P 
 Q, 
list: type List, 
equal: s = t
Definitions : 
uall:
[x:A]. B[x], 
uimplies: b supposing a, 
guard: {T}, 
and: P 
 Q, 
member: t 
 T, 
prop:
, 
rev_implies: P 
 Q, 
iff: P 

 Q, 
squash:
T, 
true: True, 
all:
x:A. B[x], 
implies: P 
 Q
Lemmas : 
es-E_wf, 
es-interval_wf, 
es-le_wf, 
event_ordering_wf, 
hd-es-interval, 
hd_wf, 
pos_length, 
not_functionality_wrt_iff, 
es-locl_wf, 
es-interval-nil, 
es-le-not-locl, 
ge_wf, 
length_wf1, 
es-le-loc, 
es-interval-length-one-one, 
squash_wf, 
true_wf
\mforall{}[es:EO].  \mforall{}[d,b,a,c:E].
    (\{(a  =  c)  \mwedge{}  (b  =  d)\})  supposing  (([a,  b]  =  [c,  d])  and  c  \mleq{}loc  d    and  a  \mleq{}loc  b  )
Date html generated:
2011_08_16-AM-10_40_43
Last ObjectModification:
2011_06_18-AM-09_19_00
Home
Index