Improve Haskell snip.