{ [locs:Id List]. [T:Type]. [f:{x:Id| (x  locs)}   Message  bag(T)].
    (general-base-class(locs;f)  EClass'(T)) }

{ Proof }



Definitions occuring in Statement :  general-base-class: general-base-class(locs;f) Message: Message eclass: EClass(A[eo; e]) Id: Id uall: [x:A]. B[x] member: t  T set: {x:A| B[x]}  function: x:A  B[x] list: type List universe: Type l_member: (x  l) bag: bag(T)
Definitions :  void: Void cons: [car / cdr] nil: [] false: False lt_int: i <z j le_int: i z j deq: EqDecider(T) limited-type: LimitedType pair: <a, b> bfalse: ff btrue: tt iff: P  Q deq-disjoint: deq-disjoint(eq;as;bs) deq-all-disjoint: deq-all-disjoint(eq;ass;bs) eq_id: a = b eq_lnk: a = b es-eq-E: e = e' es-bless: e <loc e' es-ble: e loc e' bimplies: p  q band: p  q bor: p q bnot: b int: unit: Unit empty-bag: {} es-info: info(e) so_apply: x[s] implies: P  Q union: left + right or: P  Q guard: {T} atom: Atom$n decide: case b of inl(x) =s[x] | inr(y) =t[y] assert: b strong-subtype: strong-subtype(A;B) le: A  B ge: i  j  not: A uimplies: b supposing a and: P  Q uiff: uiff(P;Q) nat: less_than: a < b cand: A c B product: x:A  B[x] exists: x:A. B[x] subtype: S  T subtype_rel: A r B eq_atom: eq_atom$n(x;y) atom: Atom apply: f a top: Top es-base-E: es-base-E(es) token: "$token" eq_atom: x =a y record-select: r.x dep-isect: Error :dep-isect,  record+: record+ id-deq: IdDeq es-loc: loc(e) deq-member: deq-member(eq;x;L) ifthenelse: if b then t else f fi  event_ordering: EO lambda: x.A[x] bool: prop: all: x:A. B[x] eclass: EClass(A[eo; e]) list: type List uall: [x:A]. B[x] set: {x:A| B[x]}  l_member: (x  l) Id: Id isect: x:A. B[x] axiom: Ax event-ordering+: EO+(Info) Message: Message es-E: E bag: bag(T) general-base-class: general-base-class(locs;f) function: x:A  B[x] member: t  T equal: s = t universe: Type Unfold: Error :Unfold,  CollapseTHEN: Error :CollapseTHEN,  tactic: Error :tactic
Lemmas :  bag_wf Message_wf event-ordering+_inc es-base-E_wf subtype_rel_self es-loc_wf id-deq_wf Id_wf deq-member_wf ifthenelse_wf es-E_wf event-ordering+_wf l_member_wf nat_wf bool_wf iff_transitivity assert_wf iff_weakening_uiff eqtt_to_assert assert-deq-member not_wf eqff_to_assert assert_of_bnot not_functionality_wrt_iff bnot_wf es-info_wf empty-bag_wf

\mforall{}[locs:Id  List].  \mforall{}[T:Type].  \mforall{}[f:\{x:Id|  (x  \mmember{}  locs)\}    {}\mrightarrow{}  Message  {}\mrightarrow{}  bag(T)].
    (general-base-class(locs;f)  \mmember{}  EClass'(T))


Date html generated: 2011_08_17-PM-04_16_48
Last ObjectModification: 2011_03_22-AM-11_51_48

Home Index