{ [Info:Type]. [es:EO+(Info)]. [X:EClass(Top  )]. [e:E].
    ((Tagged_tt(X))(e) ~ filter(e.(snd(X(e)));(X)(e))) }

{ Proof }



Definitions occuring in Statement :  es-interface-predecessors: (X)(e),  es-tagged-true-class: Tagged_tt(X),  eclass-val: X(e),  eclass: EClass(A[eo; e]),  event-ordering+: EO+(Info),  es-E: E,  bool: ,  uall: [x:A]. B[x],  top: Top,  pi2: snd(t),  lambda: x.A[x],  product: x:A  B[x],  universe: Type,  sqequal: s ~ t,  filter: filter(P;l)
Definitions :  top: Top,  es-tagged-true-class: Tagged_tt(X),  member: t  T,  so_lambda: x.t[x],  all: x:A. B[x],  subtype: S  T,  so_lambda: x y.t[x; y],  can-apply: can-apply(f;x),  ifthenelse: if b then t else f fi ,  pi2: snd(t),  pi1: fst(t),  assert: b,  prop: ,  implies: P  Q,  squash: T,  true: True,  btrue: tt,  false: False,  isl: isl(x),  bfalse: ff,  iff: P  Q,  and: P  Q,  rev_implies: P  Q,  uall: [x:A]. B[x],  so_apply: x[s],  so_apply: x[s1;s2],  bool: ,  uimplies: b supposing a,  es-E-interface: E(X),  sq_stable: SqStable(P),  sq_type: SQType(T),  guard: {T},  unit: Unit,  it:
Lemmas :  interface-predecessors-filter-image,  top_wf,  bool_wf,  ifthenelse_wf,  pi2_wf,  pi1_wf_top,  es-E_wf,  event-ordering+_inc,  eclass_wf,  event-ordering+_wf,  filter-sq,  es-E-interface_wf,  es-interface-top,  Id_wf,  es-loc_wf,  es-interface-predecessors_wf,  can-apply_wf,  eclass-val_wf,  l_member_wf,  sq_stable__assert,  in-eclass_wf,  subtype_base_sq,  bool_subtype_base,  assert_elim,  es-interface-val_wf2,  iff_weakening_uiff,  assert_wf,  eqtt_to_assert,  true_wf,  not_wf,  uiff_transitivity,  bnot_wf,  eqff_to_assert,  assert_of_bnot,  false_wf

\mforall{}[Info:Type].  \mforall{}[es:EO+(Info)].  \mforall{}[X:EClass(Top  \mtimes{}  \mBbbB{})].  \mforall{}[e:E].
    (\mleq{}(Tagged\_tt(X))(e)  \msim{}  filter(\mlambda{}e.(snd(X(e)));\mleq{}(X)(e)))


Date html generated: 2011_08_16-PM-05_22_46
Last ObjectModification: 2011_06_20-AM-01_22_07

Home Index