[don't float outward to the top level
John Meacham <john@repetae.net>**20060430061044] hunk ./E/LetFloat.hs 284
-                n' = maximum (top_level:[ lup t | t <- fvs ])
+                n' = maximum (Level 1:[ lup t | t <- fvs ])