   -> Int    -- ^ resulting height
    -> Tile
    -> [[Color]]  -- ^ pixels in row-major order
rasterize = undefined

data Color
--instance Eq Color

{-
two tiles
rasterize
    :: Int    -- ^ resulting width
    -> Int    -- ^ resulting height
    -> Tile
    -> [[Color]]
rasterize = undefined
rasterize = undefined