{ [A,B:Type]. [eq1:EqDecider(A)]. [eq2:EqDecider(B)]. [L:(A  B) List].
    no_repeats(A;fpf-domain(fpf(L))) }

{ Proof }



Definitions occuring in Statement :  pairs-fpf: fpf(L),  fpf-domain: fpf-domain(f),  uall: [x:A]. B[x],  product: x:A  B[x],  list: type List,  universe: Type,  no_repeats: no_repeats(T;l),  deq: EqDecider(T)
Definitions :  uall: [x:A]. B[x],  no_repeats: no_repeats(T;l),  all: x:A. B[x],  member: t  T,  implies: P  Q,  not: A,  false: False,  le: A  B,  so_lambda: x.t[x],  prop: ,  and: P  Q,  nat: ,  uimplies: b supposing a,  so_apply: x[s]
Lemmas :  pairs-fpf_property,  select_wf,  fpf-domain_wf,  pairs-fpf_wf,  fpf-trivial-subtype-top,  fpf_wf,  top_wf,  not_wf,  nat_wf,  length_wf1,  deq_wf

\mforall{}[A,B:Type].  \mforall{}[eq1:EqDecider(A)].  \mforall{}[eq2:EqDecider(B)].  \mforall{}[L:(A  \mtimes{}  B)  List].
    no\_repeats(A;fpf-domain(fpf(L)))


Date html generated: 2011_08_10-AM-08_11_37
Last ObjectModification: 2011_06_18-AM-08_26_58

Home Index