data Size = Size {
  sizeWidth  :: Integer,
  sizeHeight :: Integer
} deriving Eq
