Haskell Data.list.split