a61ba2ce ​

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