Faster Haskell lists using stream fusion