{ [Info,A,B,C:Type]. [f:bag(A)  bag(B)  bag(C)]. [X:EClass(A)].
  [Y:EClass(B)].
    (eclass-compose2(f;X;Y)  EClass(C)) }

{ Proof }



Definitions occuring in Statement :  eclass-compose2: eclass-compose2(f;X;Y) eclass: EClass(A[eo; e]) uall: [x:A]. B[x] member: t  T function: x:A  B[x] universe: Type bag: bag(T)
Definitions :  apply: f a lambda: x.A[x] subtype: S  T all: x:A. B[x] axiom: Ax eclass-compose2: eclass-compose2(f;X;Y) event-ordering+: EO+(Info) event_ordering: EO es-E: E eclass: EClass(A[eo; e]) equal: s = t universe: Type uall: [x:A]. B[x] bag: bag(T) function: x:A  B[x] member: t  T isect: x:A. B[x] Unfold: Error :Unfold,  CollapseTHEN: Error :CollapseTHEN
Lemmas :  bag_wf event-ordering+_wf es-E_wf event-ordering+_inc

\mforall{}[Info,A,B,C:Type].  \mforall{}[f:bag(A)  {}\mrightarrow{}  bag(B)  {}\mrightarrow{}  bag(C)].  \mforall{}[X:EClass(A)].  \mforall{}[Y:EClass(B)].
    (eclass-compose2(f;X;Y)  \mmember{}  EClass(C))


Date html generated: 2011_08_16-AM-11_32_12
Last ObjectModification: 2011_01_14-PM-04_54_54

Home Index