sizeRep :: PF.PixelFlame -> Size
sizeRep (PF.PixelFlame {size = (S.Size width height)}) =
  let w = fromIntegral width
      h = fromIntegral height
  in Size w h
sizeRep :: PF.PixelFlame -> Size
sizeRep (PF.PixelFlame {size = (S.Size width height)}) =
  let w = fromIntegral width
      h = fromIntegral height
  in Size w h
sizeRep (PF.PixelFlame {size = (S.Size width height)}) =
  let w = fromIntegral width
      h = fromIntegral height
  in Size w h