{ [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