Regardless of stream fusion, it will always be one pass in Haskell because of laziness.