ARC

Appearance

On this page

dae9d2b5 ​

arc
let g1: OList OList Bool
let g2: OList OList Bool

let input = hcat [map (map (λb. if b yellow black)) g1, map (map (λb. if b green black)) g2]

let output = zip (zip (λa. λb. if (a || b) fuschia black)) g1 g2
composer
input = [#0, #1, #2]
output = [[#3, fuschia, #4], [#5, #6, #7], [#8, #9, #10]]
(OList Color, OList Color, OList Color, Color, Color, Color, Color, Color, Color, Color, Color)
([yellow, yellow, black, green, green, black], [yellow, black, black, green, black, black], [black, black, black, black, black, green], fuschia, black, fuschia, black, black, black, black, fuschia)
([yellow, black, yellow, green, green, black], [yellow, black, black, green, black, black], [black, black, yellow, green, black, black], fuschia, fuschia, fuschia, black, black, fuschia, black, fuschia)
([black, black, yellow, black, green, black], [black, yellow, yellow, green, black, green], [yellow, yellow, black, black, black, green], black, fuschia, fuschia, fuschia, fuschia, fuschia, fuschia, fuschia)
([yellow, yellow, black, green, black, black], [black, black, black, black, black, green], [yellow, black, black, black, black, black], fuschia, black, black, black, fuschia, fuschia, black, black)
([black, black, black, black, green, black], [yellow, black, black, black, black, black], [black, black, yellow, green, green, black], black, black, fuschia, black, black, fuschia, fuschia, fuschia)
([black, yellow, yellow, green, black, black], [yellow, black, black, green, green, black], [black, yellow, black, green, black, black], ?, ?, ?, ?, ?, ?, ?, ?)
([black, black, yellow, black, green, black], [black, yellow, black, green, green, green], [yellow, black, black, green, black, black], ?, ?, ?, ?, ?, ?, ?, ?)