added set in haskell