{ 
[Info:Type]. [es:EO+(Info)]. [e1,e2:E].
es-hist(es;e1;e2) = (es-hist(es;e1;pred(e2)) @ [info(e2)])
supposing (e1 <loc e2) }
{ Proof }
Definitions occuring in Statement :
es-hist: es-hist(es;e1;e2),
es-info: info(e),
event-ordering+: EO+(Info),
es-locl: (e <loc e'),
es-pred: pred(e),
es-E: E,
append: as @ bs,
uimplies: b supposing a,
uall: [x:A]. B[x],
cons: [car / cdr],
nil: [],
list: type List,
universe: Type,
equal: s = t
Definitions :
uall: [x:A]. B[x],
uimplies: b supposing a,
member: t 
T,
es-le: e 
loc e' ,
or: P 
Q,
guard: {T},
es-hist: es-hist(es;e1;e2),
map: map(f;as),
ycomb: Y,
all: x:A. B[x],
prop: 
,
subtype: S 
T
Lemmas :
es-locl_wf,
event-ordering+_inc,
es-E_wf,
event-ordering+_wf,
es-le_wf,
es-hist-partition,
es-interval-eq
\mforall{}[Info:Type]. \mforall{}[es:EO+(Info)]. \mforall{}[e1,e2:E].
es-hist(es;e1;e2) = (es-hist(es;e1;pred(e2)) @ [info(e2)]) supposing (e1 <loc e2)
Date html generated:
2011_08_16-AM-11_27_09
Last ObjectModification:
2011_06_20-AM-00_27_18
Home
Index