{ [Info:Type]. [es:EO+(Info)]. [X:EClass(Top)]. [e:E].
    ((X)(e)
    = (if e  prior(X) then (X)(prior(X)(e)) else [] fi 
      @ if e  X then [e] else [] fi )) }

{ Proof }



Definitions occuring in Statement :  es-prior-interface: prior(X),  es-interface-predecessors: (X)(e),  es-E-interface: E(X),  eclass-val: X(e),  in-eclass: e  X,  eclass: EClass(A[eo; e]),  event-ordering+: EO+(Info),  es-loc: loc(e),  es-E: E,  Id: Id,  append: as @ bs,  ifthenelse: if b then t else f fi ,  uall: [x:A]. B[x],  top: Top,  set: {x:A| B[x]} ,  cons: [car / cdr],  nil: [],  list: type List,  universe: Type,  equal: s = t
Definitions :  member: t  T,  so_lambda: x y.t[x; y],  all: x:A. B[x],  top: Top,  false: False,  implies: P  Q,  so_apply: x[s],  l_all: (xL.P[x]),  not: A,  prop: ,  cand: A c B,  and: P  Q,  exists: x:A. B[x],  uall: [x:A]. B[x],  so_apply: x[s1;s2],  uimplies: b supposing a,  iff: P  Q,  rev_implies: P  Q,  subtype: S  T
Lemmas :  es-interface-predecessors-loc,  top_wf,  event-ordering+_wf,  event-ordering+_inc,  es-E_wf,  es-E-interface_wf,  es-interface-subtype_rel2,  es-prior-interface_wf,  in-eclass_wf,  es-is-prior-interface-pred,  es-before_wf,  filter_is_nil,  l_member_wf,  assert_wf,  is-prior-interface,  es-locl_wf,  member-es-before

\mforall{}[Info:Type].  \mforall{}[es:EO+(Info)].  \mforall{}[X:EClass(Top)].  \mforall{}[e:E].
    (\mleq{}(X)(e)  =  (if  e  \mmember{}\msubb{}  prior(X)  then  \mleq{}(X)(prior(X)(e))  else  []  fi    @  if  e  \mmember{}\msubb{}  X  then  [e]  else  []  fi  ))


Date html generated: 2011_08_16-PM-05_16_11
Last ObjectModification: 2011_06_20-AM-01_18_27

Home Index