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