{ [A:Type]. [eq:EqDecider(A)]. [L1,L2:A List].
    (l_intersection(eq;L1;L2)  A List) }

{ Proof }



Definitions occuring in Statement :  l_intersection: l_intersection(eq;L1;L2),  uall: [x:A]. B[x],  member: t  T,  list: type List,  universe: Type,  deq: EqDecider(T)
Definitions :  uall: [x:A]. B[x],  member: t  T,  l_intersection: l_intersection(eq;L1;L2)
Lemmas :  filter_wf,  deq-member_wf,  deq_wf

\mforall{}[A:Type].  \mforall{}[eq:EqDecider(A)].  \mforall{}[L1,L2:A  List].    (l\_intersection(eq;L1;L2)  \mmember{}  A  List)


Date html generated: 2011_08_10-AM-07_48_53
Last ObjectModification: 2011_06_18-AM-08_13_15

Home Index