005 in haskell