{ [A:Type]. [a:A List]. [b:a:{a@0:A| (a@0  a)}   Top].
    (mkfpf(a;b)  a:A fp-Top) }

{ Proof }



Definitions occuring in Statement :  mkfpf: mkfpf(a;b) fpf: a:A fp-B[a] uall: [x:A]. B[x] top: Top member: t  T set: {x:A| B[x]}  function: x:A  B[x] list: type List universe: Type l_member: (x  l)
Definitions :  uall: [x:A]. B[x] member: t  T fpf: a:A fp-B[a] mkfpf: mkfpf(a;b) prop:
Lemmas :  l_member_wf top_wf

\mforall{}[A:Type].  \mforall{}[a:A  List].  \mforall{}[b:a:\{a@0:A|  (a@0  \mmember{}  a)\}    {}\mrightarrow{}  Top].    (mkfpf(a;b)  \mmember{}  a:A  fp->  Top)


Date html generated: 2011_08_10-AM-08_05_17
Last ObjectModification: 2011_06_18-AM-08_23_10

Home Index