{ 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]  e1 loc e2 ) }

{ Proof }



Definitions occuring in Statement :  es-pstar-q: [e1;e2]~([a,b].p[a; b])*[a,b].q[a; b],  es-le: e loc e' ,  es-loc: loc(e),  es-E: E,  event_ordering: EO,  Id: Id,  uall: [x:A]. B[x],  prop: ,  so_apply: x[s1;s2],  all: x:A. B[x],  implies: P  Q,  set: {x:A| B[x]} ,  function: x:A  B[x],  equal: s = t
Definitions :  all: x:A. B[x],  uall: [x:A]. B[x],  prop: ,  implies: P  Q,  so_apply: x[s1;s2],  member: t  T,  so_lambda: x y.t[x; y],  ge: i  j ,  le: A  B,  not: A,  false: False,  es-le: e loc e' ,  or: P  Q,  guard: {T},  int_seg: {i..j},  lelt: i  j < k,  and: P  Q,  squash: T,  true: True,  nat: ,  es-pstar-q: [e1;e2]~([a,b].p[a; b])*[a,b].q[a; b],  exists: x:A. B[x],  nat_plus: ,  trans: Trans(T;x,y.E[x; y])
Lemmas :  es-pstar-q_wf,  es-E_wf,  Id_wf,  es-loc_wf,  event_ordering_wf,  nat_wf,  nat_properties,  ge_wf,  es-locl_wf,  es-le_wf,  le_wf,  es-le-trans,  nat_plus_properties,  squash_wf,  true_wf

\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]  {}\mRightarrow{}  e1  \mleq{}loc  e2  )


Date html generated: 2011_08_16-AM-10_57_08
Last ObjectModification: 2011_06_18-AM-09_30_07

Home Index