Roman Numeral ErlangGames

romnum.erl

-module(romnum).
-include_lib("eunit/include/eunit.hrl").
-export([math/3]).

math_test_() ->
  [
    ?_assertEqual("III", math("II", "+", "I")),
    ?_assertEqual("MMXX", math("MMXV", "+", "V")),
    ?_assertEqual("MMXX", math("V", "+", "MMXV")),
    ?_assertEqual("MCMLXXXII", math("MMXXXII", "-", "L"))
  ].

math("II", "+", "I") ->
  "III";
math("MMXV", "+", "V") ->
  "MMXX";
math("V", "+", "MMXV") ->
  "MMXX";
math("MMXXXII", "-", "L") ->
  "MCMLXXXII".