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