08573cc6 ​

input = fill #0 (fill #1 black) |> rect ((1v, 2h, 1v, 2h), #2) |> rect ((1v, 1h, 1v, 1h), #3) |> rect ((#4, #5, #4, #5), blue)
output = fill #0 (fill #1 black) |> fold (fold rect) #6
(VInt, HInt, Color, Color, VInt, HInt, OList UList ((VInt, HInt, VInt, HInt), Color))
(11v, 11h, fuschia, grey, 5v, 4h, [{((3v, 1h, 3v, 5h), grey), ((8v, 3h, 8v, 6h), grey), ((6v, 2h, 8v, 2h), fuschia), ((5v, 4h, 5v, 4h), blue), ((5v, 2h, 5v, 3h), grey), ((3v, 6h, 7v, 6h), fuschia)}])
(11v, 11h, red, green, 7v, 7h, [{((6v, 3h, 11v, 3h), red), ((10v, 6h, 10v, 9h), green), ((8v, 5h, 10v, 5h), red), ((7v, 7h, 7v, 7h), blue), ((7v, 5h, 7v, 6h), green), ((5v, 9h, 9v, 9h), red), ((5v, 3h, 5v, 8h), green)}])
(12v, 12h, green, grey, 7v, 6h, [{((4v, 1h, 12v, 9h), black)}, {((12v, 3h, 12v, 10h), grey), ((6v, 2h, 12v, 2h), green), ((3v, 1h, 3v, 9h), grey), ((10v, 5h, 10v, 8h), grey), ((8v, 4h, 10v, 4h), green), ((7v, 6h, 7v, 6h), blue), ((7v, 4h, 7v, 5h), grey), ((5v, 8h, 9v, 8h), green), ((5v, 2h, 5v, 7h), grey), ((3v, 10h, 11v, 10h), green)}])
(13v, 13h, teal, red, 6v, 7h, ?)