Practice your TDDing in Haskell