data Drawable = MyWindow | Pixmap PixmapId instance Eq Drawable instance Ord Drawable instance Show Drawable data BitmapData = BitmapData Size (Maybe Point) [Int] instance Eq BitmapData instance Ord BitmapData instance Show BitmapData data PropertyMode = PropertyMode Int instance Eq PropertyMode instance Ord PropertyMode instance Show PropertyMode