Added Pure Sets in haskell