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

{ Proof }



Definitions occuring in Statement :  fpf-compose: g o f fpf-dom: x  dom(f) fpf: a:A fp-B[a] uall: [x:A]. B[x] top: Top 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].    (x  \mmember{}  dom(g  o  f)  \msim{}  x  \mmember{}  dom(f))


Date html generated: 2011_08_10-AM-08_05_00
Last ObjectModification: 2011_06_18-AM-08_22_56

Home Index