day12.ex

defmodule Day12 do
  def run do
    "/Users/anton/Desktop/input"
    |> File.read!
    |> Poison.decode!
    |> process
  end
    

  def process(item) when is_map(item) do
    if Enum.any?(item, fn {k, v} -> k == "red" || v == "red" end) do
      0
    else
      item |> Enum.flat_map(fn {key, value} -> [process(key), process(value)] end) |> Enum.sum
    end
  end
  
  def process(item) when is_list(item), do: item |> Enum.map(&process/1) |> Enum.sum
  
  def process(item) when is_integer(item), do: item
  
  def process(item) when is_binary(item), do: 0
end