{ [B,A:Type]. [f:A  bag(B)].  (f@  bag(A)  bag(B)) }

{ Proof }



Definitions occuring in Statement :  concat-lifting-1: f@ uall: [x:A]. B[x] member: t  T function: x:A  B[x] universe: Type bag: bag(T)
Definitions :  uall: [x:A]. B[x] universe: Type isect: x:A. B[x] member: t  T axiom: Ax equal: s = t function: x:A  B[x] concat-lifting-1: f@ bag: bag(T) all: x:A. B[x] lambda: x.A[x] concat-lifting1: concat-lifting1(f;bag)
Lemmas :  bag_wf concat-lifting1_wf

\mforall{}[B,A:Type].  \mforall{}[f:A  {}\mrightarrow{}  bag(B)].    (f@  \mmember{}  bag(A)  {}\mrightarrow{}  bag(B))


Date html generated: 2011_08_17-PM-06_10_36
Last ObjectModification: 2011_06_02-PM-04_41_44

Home Index