ARC

Appearance

On this page

00576224 ​

arc
let g: OList OList Color

let input = g

let output = g
  |> (λg. flat [g, map rev g, g])
  |> (λg. hcat [g, g, g])
composer
input = [[#0, #1], [#2, #3]]
output = #4
(Color, Color, Color, Color, OList OList Color)
(teal, fuschia, fuschia, yellow, [[teal, fuschia, teal, fuschia, teal, fuschia], [fuschia, yellow, fuschia, yellow, fuschia, yellow], [fuschia, teal, fuschia, teal, fuschia, teal], [yellow, fuschia, yellow, fuschia, yellow, fuschia], [teal, fuschia, teal, fuschia, teal, fuschia], [fuschia, yellow, fuschia, yellow, fuschia, yellow]])
(orange, brown, yellow, green, [[orange, brown, orange, brown, orange, brown], [yellow, green, yellow, green, yellow, green], [brown, orange, brown, orange, brown, orange], [green, yellow, green, yellow, green, yellow], [orange, brown, orange, brown, orange, brown], [yellow, green, yellow, green, yellow, green]])
(green, red, orange, teal, ?)