{ [Info:Type]. [es:EO+(Info)]. [A:Type]. [X:EClass(A List)]. [e:E(X)].
    (es-interface-history(es;X;e)
    = if e  prior(X)
      then es-interface-history(es;X;prior(X)(e)) @ X(e)
      else X(e)
      fi ) }

{ Proof }



Definitions occuring in Statement :  es-prior-interface: prior(X),  es-interface-history: es-interface-history(es;X;e),  es-E-interface: E(X),  eclass-val: X(e),  in-eclass: e  X,  eclass: EClass(A[eo; e]),  event-ordering+: EO+(Info),  append: as @ bs,  ifthenelse: if b then t else f fi ,  uall: [x:A]. B[x],  list: type List,  universe: Type,  equal: s = t
Definitions :  uall: [x:A]. B[x],  es-interface-history: es-interface-history(es;X;e),  member: t  T,  top: Top,  so_lambda: x y.t[x; y],  all: x:A. B[x],  implies: P  Q,  prop: ,  ifthenelse: if b then t else f fi ,  btrue: tt,  bfalse: ff,  es-E-interface: E(X),  exists: x:A. B[x],  cand: A c B,  not: A,  and: P  Q,  false: False,  assert: b,  subtype: S  T,  true: True,  squash: T,  mapfilter: mapfilter(f;P;L),  map: map(f;as),  ycomb: Y,  es-le: e loc e' ,  or: P  Q,  guard: {T},  l_all: (xL.P[x]),  so_apply: x[s],  rev_implies: P  Q,  iff: P  Q,  so_lambda: x.t[x],  append: as @ bs,  filter: filter(P;l),  reduce: reduce(f;k;as),  concat: concat(ll),  es-le-before: loc(e),  so_apply: x[s1;s2],  uimplies: b supposing a,  bool: ,  unit: Unit,  sq_type: SQType(T),  it: ,  es-interface-sublist: es-interface-sublist(X;z)
Lemmas :  es-E-interface_wf,  eclass_wf,  es-E_wf,  event-ordering+_wf,  event-ordering+_inc,  in-eclass_wf,  es-prior-interface_wf,  es-interface-subtype_rel2,  top_wf,  bool_wf,  assert_wf,  not_wf,  bnot_wf,  iff_weakening_uiff,  eqtt_to_assert,  uiff_transitivity,  eqff_to_assert,  assert_of_bnot,  es-next,  es-interface-top,  eclass-val_wf2,  es-prior-interface-locl,  es-first_wf,  es-le_wf,  es-pred_wf,  es-le-before-partition2,  length_wf_nat,  es-le-before_wf,  Id_wf,  es-loc_wf,  nat_wf,  concat_wf,  mapfilter_wf,  eclass-val_wf,  subtype_base_sq,  bool_subtype_base,  append_wf,  member_wf,  assert_elim,  mapfilter-append,  es-interval_wf2,  l_member_wf,  concat_append,  es-interval_wf,  squash_wf,  true_wf,  map_wf,  es-locl_wf,  es-interval-partition,  filter_append,  false_wf,  es-locl-first,  filter_is_nil,  all_functionality_wrt_iff,  implies_functionality_wrt_iff,  member-es-interval,  es-prior-interface-val,  es-pred-locl,  es-locl_transitivity1,  es-locl-iff,  not_assert_elim,  es-locl_transitivity2,  es-interval-eq,  ifthenelse_wf,  es-interface-sublist_wf,  es-interval-eq2,  append-nil,  es-before_wf,  member-es-before,  es-is-prior-interface,  btrue_neq_bfalse

\mforall{}[Info:Type].  \mforall{}[es:EO+(Info)].  \mforall{}[A:Type].  \mforall{}[X:EClass(A  List)].  \mforall{}[e:E(X)].
    (es-interface-history(es;X;e)
    =  if  e  \mmember{}\msubb{}  prior(X)  then  es-interface-history(es;X;prior(X)(e))  @  X(e)  else  X(e)  fi  )


Date html generated: 2011_08_16-PM-05_15_47
Last ObjectModification: 2011_06_20-AM-01_18_04

Home Index