{ [x:Top]. [f:a:Top fp-> Top]. [g,eq:Top].  (g o f(x) ~ g f(x)) }

{ Proof }



Definitions occuring in Statement :  fpf-compose: g o f,  fpf-ap: f(x),  fpf: a:A fp-> B[a],  uall: [x:A]. B[x],  top: Top,  apply: f a,  sqequal: s ~ t
Definitions :  uall: [x:A]. B[x],  member: t  T,  so_lambda: x.t[x],  so_apply: x[s]
Lemmas :  top_wf,  fpf_wf

\mforall{}[x:Top].  \mforall{}[f:a:Top  fp->  Top].  \mforall{}[g,eq:Top].    (g  o  f(x)  \msim{}  g  f(x))


Date html generated: 2011_08_10-AM-08_05_02
Last ObjectModification: 2011_06_18-AM-08_22_59

Home Index