defmodule Main do def main do 1..3 |> Enum.map(fn _ -> IO.read(:line) |> String.trim() end) |> solve |> IO.puts() end def solve(s) do cond do 2 * (s |> Enum.count(fn x -> x == "RED" end)) < s |> length -> "BLUE" true -> "RED" end end end