{ [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