{ [Info,A:Type]. [X:EClass(A)]. [Y:EClass(Top)].  ((X until Y)  EClass(A)) }

{ Proof }



Definitions occuring in Statement :  until-class: (X until Y) eclass: EClass(A[eo; e]) uall: [x:A]. B[x] top: Top member: t  T universe: Type
Definitions :  inr: inr x  bag: bag(T) apply: f a fpf: a:A fp-B[a] strong-subtype: strong-subtype(A;B) le: A  B ge: i  j  not: A less_than: a < b uimplies: b supposing a product: x:A  B[x] and: P  Q uiff: uiff(P;Q) subtype_rel: A r B decide: case b of inl(x) =s[x] | inr(y) =t[y] empty-bag: {} union: left + right class-pred: class-pred(X;es;e) subtype: S  T top: Top event_ordering: EO es-E: E event-ordering+: EO+(Info) lambda: x.A[x] function: x:A  B[x] all: x:A. B[x] uall: [x:A]. B[x] so_lambda: x y.t[x; y] isect: x:A. B[x] axiom: Ax until-class: (X until Y) eclass: EClass(A[eo; e]) universe: Type member: t  T equal: s = t Auto: Error :Auto,  Unfold: Error :Unfold,  CollapseTHEN: Error :CollapseTHEN
Lemmas :  top_wf eclass_wf class-pred_wf empty-bag_wf event-ordering+_inc member_wf bag_wf es-E_wf event-ordering+_wf

\mforall{}[Info,A:Type].  \mforall{}[X:EClass(A)].  \mforall{}[Y:EClass(Top)].    ((X  until  Y)  \mmember{}  EClass(A))


Date html generated: 2011_08_16-PM-04_41_01
Last ObjectModification: 2011_06_15-PM-04_46_41

Home Index