Show (Set a)

[Serge D. Mechveliani]

Dear GHC developers,

In my user program I define

  instance Show a => Show (Set a) 
    where
    showsPrec x = showsPrec x . setToList

  instance (Show a, Show b) => Show (FiniteMap a b)
    where
    showsPrec x = showsPrec x . fmToList


On the other hand, is not this natural for the GHC library to 
provide such instances?

(add, please,  mechvel at botik.ru  to the respond list)

-----------------
Serge Mechveliani
mechvel at botik.ru