[Haskell] definition of intersperse