ARC

Appearance

On this page

6e02f1e3 ​

arc
let g: OList OList Color

let input = g

let output = (λn. null
  |> if (n == 1) [[grey, grey, grey], [black, black, black], [black, black, black]]
  |> if (n == 2) [[grey, black, black], [black, grey, black], [black, black, grey]]
  |> if (n == 3) [[black, black, grey], [black, grey, black], [grey, black, black]]
) (len (group id (flat g)))
composer
input = [[#0, #0, #0], [#1, #2, #3], [#4, #5, #6]]
output = [[#7, #8, #9], [black, #10, black], [#11, black, #12]]
(Color, Color, Color, Color, Color, Color, Color, Color, Color, Color, Color, Color, Color)
(red, green, red, green, green, green, green, grey, black, black, grey, black, grey)
(green, yellow, red, red, yellow, yellow, red, black, black, grey, grey, grey, black)
(yellow, yellow, yellow, yellow, yellow, yellow, yellow, grey, grey, grey, black, black, black)
(green, green, green, green, green, green, green, grey, grey, grey, black, black, black)
(yellow, yellow, yellow, yellow, green, green, green, grey, black, black, grey, black, grey)
(yellow, red, green, red, green, red, green, ?, ?, ?, ?, ?, ?)