Unit test example for Haskell