{ 
[the_es:EO]. 
[e:E].  (
(e <loc e)) }
{ Proof }
Definitions occuring in Statement : 
es-locl: (e <loc e'), 
es-E: E, 
event_ordering: EO, 
uall:
[x:A]. B[x], 
not:
A
Definitions : 
universe: Type, 
strong-subtype: strong-subtype(A;B), 
le: A 
 B, 
ge: i 
 j , 
assert:
b, 
less_than: a < b, 
uimplies: b supposing a, 
product: x:A 
 B[x], 
and: P 
 Q, 
uiff: uiff(P;Q), 
eq_atom: x =a y, 
eq_atom: eq_atom$n(x;y), 
infix_ap: x f y, 
apply: f a, 
record-select: r.x, 
dep-isect: Error :dep-isect, 
record+: record+, 
subtype_rel: A 
r B, 
prop:
, 
all:
x:A. B[x], 
uall:
[x:A]. B[x], 
isect:
x:A. B[x], 
equal: s = t, 
implies: P 
 Q, 
lambda:
x.A[x], 
es-locl: (e <loc e'), 
function: x:A 
 B[x], 
false: False, 
void: Void, 
member: t 
 T, 
es-E: E, 
event_ordering: EO, 
not:
A, 
Repeat: Error :Repeat, 
MaAuto: Error :MaAuto, 
Complete: Error :Complete, 
Try: Error :Try, 
CollapseTHEN: Error :CollapseTHEN, 
tactic: Error :tactic, 
subtract: n - m, 
less: if (a) < (b)  then c  else d, 
lt_int: i <z j, 
bnot: 
b, 
le_int: i 
z j, 
select: l[i], 
add: n + m, 
list_ind: list_ind def, 
ycomb: Y, 
length: ||as||, 
l_member: (x 
 l), 
list: type List, 
int:
, 
set: {x:A| B[x]} , 
nat:
, 
record: record(x.T[x]), 
top: Top, 
atom_eq: if a=b then c else d, 
decide: case b of inl(x) => s[x] | inr(y) => t[y], 
ifthenelse: if b then t else f fi , 
es-causl: (e < e'), 
token: "$token", 
es-loc: loc(e), 
atom: Atom$n, 
Id: Id, 
wellfounded: WellFnd{i}(A;x,y.R[x; y]), 
guard: {T}, 
so_lambda: 
x.t[x], 
CollapseTHENA: Error :CollapseTHENA
Lemmas : 
es-locl-wellfnd, 
event_ordering_wf, 
es-E_wf, 
not_wf, 
false_wf, 
es-locl_wf
\mforall{}[the$_{es}$:EO].  \mforall{}[e:E].    (\mneg{}(e  <loc  e))
Date html generated:
2011_08_16-AM-10_26_05
Last ObjectModification:
2011_06_18-AM-09_10_08
Home
Index