cdecee7f ​

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