ARC

Appearance

On this page

d631b094 ​

arc
let c: Color
let ps: OList (Int, Int)

let input = fill 3 (fill 3 black)
  |> fold (λp. point p c) ps

let output = fill 1 (fill (len ps) c)
composer
input = [[#4, #0, black], [#1, #2, #4], [#2, #3, #4]]
output = fill 1v (fill #5 #6)
(Color, Color, Color, Color, Color, HInt, Color)
(black, blue, black, blue, black, 2h, blue)
(red, red, black, red, black, 3h, red)
(orange, black, black, black, black, 1h, orange)
(teal, teal, teal, black, black, 4h, teal)
(yellow, yellow, black, black, yellow, ?, ?)