easy 160 haskell