[Haskell-beginners] Stack space overflow with foldl'