{ [Info:Type]. [n:]. [A:n  Type]. [X:i:n  EClass(A i)]. [T:Type].
  [f:i:n  bag(A i)  bag(T)  bag(T)].
    (f|X,(self)'|  EClass(T)) }

{ Proof }



Definitions occuring in Statement :  rec-combined-class: f|X,(self)'|,  eclass: EClass(A[eo; e]),  int_seg: {i..j},  nat: ,  uall: [x:A]. B[x],  member: t  T,  apply: f a,  function: x:A  B[x],  natural_number: $n,  universe: Type,  bag: bag(T)
Definitions :  function: x:A  B[x],  top: Top,  uall: [x:A]. B[x],  member: t  T,  isect: x:A. B[x],  universe: Type,  int_seg: {i..j},  so_lambda: x y.t[x; y],  eclass: EClass(A[eo; e]),  nat: ,  equal: s = t,  bag: bag(T),  apply: f a,  rec-combined-class: f|X,(self)'|,  axiom: Ax,  set: {x:A| B[x]} ,  int: ,  le: A  B,  not: A,  false: False,  implies: P  Q,  all: x:A. B[x],  subtype_rel: A r B,  uiff: uiff(P;Q),  and: P  Q,  product: x:A  B[x],  uimplies: b supposing a,  less_than: a < b,  ge: i  j ,  strong-subtype: strong-subtype(A;B),  fpf: a:A fp-> B[a],  natural_number: $n,  subtype: S  T,  grp_car: |g|,  real: ,  lambda: x.A[x],  event-ordering+: EO+(Info),  es-E: E,  event_ordering: EO,  ycomb: Y,  void: Void,  record+: record+,  dep-isect: Error :dep-isect,  eq_atom: eq_atom$n(x;y),  eq_atom: x =a y,  primed-class: Prior(X),  assert: b,  ifthenelse: if b then t else f fi ,  decide: case b of inl(x) => s[x] | inr(y) => t[y],  record-select: r.x,  strongwellfounded: SWellFounded(R[x; y]),  exists: x:A. B[x],  prop: ,  subtract: n - m,  add: n + m,  minus: -n,  limited-type: LimitedType,  es-causl: (e < e'),  squash: T,  true: True,  es-local-pred: last(P),  tactic: Error :tactic,  CollapseTHENA: Error :CollapseTHENA,  es-locl: (e <loc e'),  sq_exists: x:{A| B[x]},  union: left + right,  or: P  Q,  lt_int: i <z j,  bag-size: bag-size(bs),  bool: ,  infix_ap: x f y,  MaAuto: Error :MaAuto,  CollapseTHEN: Error :CollapseTHEN,  Auto: Error :Auto,  es-E-interface: E(X),  l_member: (x  l),  guard: {T},  so_apply: x[s],  Id: Id,  es-loc: loc(e),  pair: <a, b>,  token: "$token",  es-base-E: es-base-E(es),  atom: Atom,  cand: A c B,  intensional-universe: IType,  inl: inl x ,  empty-bag: {},  inr: inr x 
Lemmas :  empty-bag_wf,  false_wf,  intensional-universe_wf,  subtype_rel_self,  es-base-E_wf,  es-local-pred_wf2,  bool_wf,  es-local-pred_wf,  subtype_rel_wf,  bag-size_wf,  lt_int_wf,  not_wf,  assert_wf,  es-locl_wf,  es-causl_wf,  le_wf,  ge_wf,  nat_properties,  es-causl-swellfnd,  eclass_wf,  event-ordering+_inc,  int_seg_wf,  nat_wf,  event-ordering+_wf,  top_wf,  es-E_wf,  member_wf,  bag_wf

\mforall{}[Info:Type].  \mforall{}[n:\mBbbN{}].  \mforall{}[A:\mBbbN{}n  {}\mrightarrow{}  Type].  \mforall{}[X:i:\mBbbN{}n  {}\mrightarrow{}  EClass(A  i)].  \mforall{}[T:Type].  \mforall{}[f:i:\mBbbN{}n  {}\mrightarrow{}  bag(A  i)
                                                                                                                                                                {}\mrightarrow{}  bag(T)
                                                                                                                                                                {}\mrightarrow{}  bag(T)].
    (f|X,(self)'|  \mmember{}  EClass(T))


Date html generated: 2011_08_16-PM-04_51_18
Last ObjectModification: 2011_06_20-AM-01_08_49

Home Index