{ 
[es:EO]. [e1:E]. [e2:{e:E| loc(e) = loc(e1)} ]. [p,q:{e:E|
loc(e) = loc(e1)}
{e:E|
loc(e) = loc(e1)}
].
([e1;e2]~([a,b].p[a;b])*[a,b].q[a;b] 
) }
{ Proof }
Definitions occuring in Statement :
es-pstar-q: [e1;e2]~([a,b].p[a; b])*[a,b].q[a; b],
es-loc: loc(e),
es-E: E,
event_ordering: EO,
Id: Id,
uall: [x:A]. B[x],
prop: ,
so_apply: x[s1;s2],
member: t T,
set: {x:A| B[x]} ,
function: x:A B[x],
equal: s = t
Definitions :
uall: [x:A]. B[x],
prop: ,
member: t T,
es-pstar-q: [e1;e2]~([a,b].p[a; b])*[a,b].q[a; b],
so_apply: x[s1;s2],
exists: 
x:A. B[x],
int_seg: {i..j
},
and: P 
Q,
all: x:A. B[x],
cand: A c B,
lelt: i 
j < k,
le: A B,
not: 
A,
implies: P 
Q,
false: False,
iff: P 
Q,
rev_implies: P Q,
squash: 
T,
true: True,
nat_plus: 
,
uimplies: b supposing a
Lemmas :
nat_plus_wf,
int_seg_wf,
le_wf,
es-le_wf,
es-locl_wf,
es-E_wf,
Id_wf,
es-loc_wf,
event_ordering_wf,
es-locl-iff,
es-pred_wf,
nat_plus_properties,
es-le-loc,
es-loc-pred
\mforall{}[es:EO]. \mforall{}[e1:E]. \mforall{}[e2:\{e:E| loc(e) = loc(e1)\} ]. \mforall{}[p,q:\{e:E| loc(e) = loc(e1)\}
{}\mrightarrow{} \{e:E| loc(e) = loc(e1)\}
{}\mrightarrow{} \mBbbP{}].
([e1;e2]\msim{}([a,b].p[a;b])*[a,b].q[a;b] \mmember{} \mBbbP{})
Date html generated:
2011_08_16-AM-10_56_55
Last ObjectModification:
2011_06_18-AM-09_29_54
Home
Index