1{-# LANGUAGE CPP #-}
2module Set ( Set, member, empty, insert ) where
3
4import Data.Set
5
6#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ < 603
7member :: Ord a => a -> Set a -> Bool
8member = elementOf
9
10empty  :: Set a
11empty = emptySet
12
13insert :: Ord a => a -> Set a -> Set a
14insert = flip addToSet
15#endif
16