Messing around with Haskell.