{ [Info,A:Type]. [X:EClass(A)].  (inr-class(X)  EClass(Void + A)) }

{ Proof }



Definitions occuring in Statement :  inr-class: inr-class(X) eclass: EClass(A[eo; e]) uall: [x:A]. B[x] member: t  T union: left + right void: Void universe: Type
Definitions :  inr: inr x  bag-map: bag-map(f;bs) bag: bag(T) eclass-compose1: f o X subtype: S  T event_ordering: EO es-E: E event-ordering+: EO+(Info) lambda: x.A[x] function: x:A  B[x] all: x:A. B[x] so_lambda: x y.t[x; y] union: left + right void: Void inr-class: inr-class(X) eclass: EClass(A[eo; e]) equal: s = t axiom: Ax member: t  T universe: Type uall: [x:A]. B[x] isect: x:A. B[x]
Lemmas :  eclass_wf es-E_wf event-ordering+_inc event-ordering+_wf eclass-compose1_wf bag-map_wf bag_wf

\mforall{}[Info,A:Type].  \mforall{}[X:EClass(A)].    (inr-class(X)  \mmember{}  EClass(Void  +  A))


Date html generated: 2011_08_16-PM-04_21_20
Last ObjectModification: 2011_01_20-PM-01_04_57

Home Index