ARC

Appearance

On this page

1b2d62fb ​

arc
let g1: OList OList Color
let g2: OList OList Color

let input = hcat [g1, fill 5 (fill 1 blue), g2]

let output = zip (zip (λa. λb. if (a == black && b == black) teal black)) g1 g2
composer
input = #0
output = #1
(OList OList Color, OList OList Color)
([[black, brown, brown, blue, brown, brown, brown], [black, black, brown, blue, brown, brown, black], [brown, black, brown, blue, brown, brown, black], [black, black, black, blue, brown, black, black], [black, brown, brown, blue, brown, brown, brown]], [[black, black, black], [black, black, black], [black, black, black], [black, teal, teal], [black, black, black]])
([[black, black, black, blue, brown, black, black], [brown, black, brown, blue, brown, brown, brown], [black, brown, brown, blue, brown, brown, brown], [black, black, black, blue, brown, brown, brown], [black, brown, brown, blue, brown, brown, brown]], [[black, teal, teal], [black, black, black], [black, black, black], [black, black, black], [black, black, black]])
([[brown, black, black, blue, brown, black, brown], [brown, black, black, blue, black, brown, black], [brown, black, black, blue, brown, black, black], [black, brown, brown, blue, black, brown, brown], [black, black, brown, blue, black, brown, black]], [[black, teal, black], [black, black, teal], [black, teal, teal], [teal, black, black], [teal, black, black]])
([[black, brown, brown, blue, brown, black, brown], [brown, black, black, blue, brown, black, black], [brown, brown, brown, blue, brown, brown, brown], [black, brown, black, blue, black, black, black], [brown, black, black, blue, brown, black, black]], [[black, black, black], [black, teal, teal], [black, black, black], [teal, black, teal], [black, teal, teal]])
([[black, brown, brown, blue, brown, black, brown], [brown, black, brown, blue, brown, brown, brown], [brown, brown, brown, blue, black, black, brown], [brown, black, black, blue, brown, black, black], [brown, brown, brown, blue, black, black, brown]], [[black, black, black], [black, black, black], [black, black, black], [black, teal, teal], [black, black, black]])
([[brown, brown, black, blue, black, brown, black], [black, brown, brown, blue, black, black, black], [brown, brown, black, blue, black, brown, black], [brown, brown, brown, blue, brown, black, brown], [black, brown, brown, blue, black, brown, brown]], ?)