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

{ Proof }



Definitions occuring in Statement :  concat-lifting-loc-2: f@Loc,  Id: Id,  uall: [x:A]. B[x],  member: t  T,  function: x:A  B[x],  universe: Type,  bag: bag(T)
Definitions :  Id: Id,  function: x:A  B[x],  equal: s = t,  axiom: Ax,  concat-lifting-loc-2: f@Loc,  bag: bag(T),  member: t  T,  isect: x:A. B[x],  uall: [x:A]. B[x],  universe: Type,  all: x:A. B[x],  lambda: x.A[x],  concat-lifting2-loc: concat-lifting2-loc(f;abag;bbag;loc)
Lemmas :  bag_wf,  concat-lifting2-loc_wf,  Id_wf

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


Date html generated: 2011_08_17-PM-06_15_30
Last ObjectModification: 2011_06_02-PM-04_44_37

Home Index