{ [Info:Type]. [es:EO+(Info)]. [X:EClass(Top)]. [f:sys-antecedent(es;X)].
  [s,s':FSet{E(X)}].
    cut(X;f;s)  cut(X;f;s') supposing s  cut(X;f;s') }

{ Proof }



Definitions occuring in Statement :  cut-of: cut(X;f;s),  sys-antecedent: sys-antecedent(es;Sys),  es-E-interface: E(X),  eclass: EClass(A[eo; e]),  event-ordering+: EO+(Info),  es-eq: es-eq(es),  uimplies: b supposing a,  uall: [x:A]. B[x],  top: Top,  universe: Type,  fset: FSet{s},  f-subset: xs  ys
Definitions :  es-causle: e c e',  nil: [],  es-interface-pred: X-pred,  cons: [car / cdr],  fset-closed: (s closed under fs),  fpf-cap: f(x)?z,  filter: filter(P;l),  fset-union: x  y,  implies: P  Q,  void: Void,  false: False,  true: True,  decide: case b of inl(x) => s[x] | inr(y) => t[y],  assert: b,  fset-member: a  s,  strong-subtype: strong-subtype(A;B),  le: A  B,  ge: i  j ,  not: A,  less_than: a < b,  product: x:A  B[x],  and: P  Q,  uiff: uiff(P;Q),  fpf: a:A fp-> B[a],  set-equal: set-equal(T;x;y),  list: type List,  es-cut: Cut(X;f),  cut-of: cut(X;f;s),  es-eq: es-eq(es),  prop: ,  f-subset: xs  ys,  uimplies: b supposing a,  quotient: x,y:A//B[x; y],  set: {x:A| B[x]} ,  es-E-interface: E(X),  fset: FSet{T},  union: left + right,  sys-antecedent: sys-antecedent(es;Sys),  subtype: S  T,  subtype_rel: A r B,  atom: Atom,  apply: f a,  es-base-E: es-base-E(es),  token: "$token",  ifthenelse: if b then t else f fi ,  record-select: r.x,  top: Top,  event_ordering: EO,  es-E: E,  lambda: x.A[x],  dep-isect: Error :dep-isect,  eq_atom: x =a y,  eq_atom: eq_atom$n(x;y),  record+: record+,  all: x:A. B[x],  function: x:A  B[x],  isect: x:A. B[x],  uall: [x:A]. B[x],  eclass: EClass(A[eo; e]),  so_lambda: x y.t[x; y],  universe: Type,  member: t  T,  event-ordering+: EO+(Info),  equal: s = t,  tactic: Error :tactic,  so_apply: x[s],  or: P  Q,  guard: {T},  l_member: (x  l)
Lemmas :  cut-of-property,  uiff_inversion,  es-E-interface_wf,  f-subset_wf,  cut-of_wf,  subtype_rel_wf,  es-cut_wf,  fset_wf,  member_wf,  es-eq_wf-interface,  set-equal_wf,  sys-antecedent_wf,  event-ordering+_wf,  event-ordering+_inc,  subtype_rel_self,  es-base-E_wf,  es-E_wf,  top_wf,  eclass_wf,  fset-member_wf,  fset-member_wf-cut,  fset-member_witness,  fset-closed_wf,  es-interface-pred_wf2

\mforall{}[Info:Type].  \mforall{}[es:EO+(Info)].  \mforall{}[X:EClass(Top)].  \mforall{}[f:sys-antecedent(es;X)].  \mforall{}[s,s':FSet\{E(X)\}].
    cut(X;f;s)  \msubseteq{}  cut(X;f;s')  supposing  s  \msubseteq{}  cut(X;f;s')


Date html generated: 2011_08_16-PM-05_50_04
Last ObjectModification: 2011_06_20-AM-01_35_50

Home Index