Elixir opposite day

opposite_day.ex

defmodule OppositeDay do
   defmacro opposite_day(do: block) do
     do_opposite(block)
   end
 
   def do_opposite({:==, c, a}), do: {:!=, c, a}
   def do_opposite({:!=, c, a}), do: {:==, c, a}
   def do_opposite({:-,  c, a}), do: {:+,  c, a}
   def do_opposite({:+,  c, a}), do: {:-,  c, a}
   def do_opposite({:*,  c, a}), do: {:/,  c, a}
   def do_opposite({:/,  c, a}), do: {:*,  c, a}
   def do_opposite({:<,  c, a}), do: {:>,  c, a}
   def do_opposite({:>,  c, a}), do: {:<,  c, a}

   def do_opposite({function, context, arguments}) do
    {function, context, do_opposite(arguments)}
   end

   def do_opposite(arguments) when is_list arguments do
    for statement <- arguments, do: do_opposite(statement)
   end

   def do_opposite(x), do: x

 end