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

{ Proof }



Definitions occuring in Statement :  cut-of: cut(X;f;s) es-cut: Cut(X;f) 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 and: P  Q universe: Type fset: FSet{s} f-subset: xs  ys
Definitions :  es-causle: e c e' nil: [] es-interface-pred: X-pred cons: [car / cdr] fpf-cap: f(x)?z fpf: a:A fp-B[a] set-equal: set-equal(T;x;y) list: type List so_apply: x[s] or: P  Q guard: {T} l_member: (x  l) so_lambda: x.t[x] fset-union: x  y cand: A c B tl: tl(l) hd: hd(l) l_all: (xL.P[x]) fset-closed: (s closed under fs) es-eq: es-eq(es) strong-subtype: strong-subtype(A;B) quotient: x,y:A//B[x; y] le: A  B ge: i  j  not: A less_than: a < b uiff: uiff(P;Q) es-cut: Cut(X;f) cut-of: cut(X;f;s) implies: P  Q prop: pair: <a, b> void: Void false: False true: True decide: case b of inl(x) =s[x] | inr(y) =t[y] assert: b fset-member: a  s uimplies: b supposing a f-subset: xs  ys product: x:A  B[x] and: P  Q 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,  es-cut-exists exists: x:A. B[x] limited-type: LimitedType
Lemmas :  es-cut-exists fset-member_wf es-E-interface_wf cut-of_wf f-subset_wf fset-member_witness es-cut_wf fset_wf sys-antecedent_wf event-ordering+_wf event-ordering+_inc subtype_rel_self es-base-E_wf es-E_wf top_wf eclass_wf es-eq_wf-interface member_wf fset-member_wf-cut uall_wf uiff_inversion set-equal_wf subtype_rel_wf 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:FSet\{E(X)\}].
    (s  \msubseteq{}  cut(X;f;s)  \mwedge{}  (\mforall{}[c':Cut(X;f)].  cut(X;f;s)  \msubseteq{}  c'  supposing  s  \msubseteq{}  c'))


Date html generated: 2011_08_16-PM-05_49_27
Last ObjectModification: 2011_06_20-AM-01_35_33

Home Index