From 96299cbf09bdb75e4d6c6849c9c4c3ce000a6fc5 Mon Sep 17 00:00:00 2001 From: Anhgelus Morhtuuzh Date: Mon, 10 Nov 2025 12:27:21 +0100 Subject: feat(parser): supports literal decimal numbers --- lib/elixir_math_parser.ex | 5 +++++ lib/math/Calc.ex | 28 ---------------------------- lib/math/calc.ex | 28 ++++++++++++++++++++++++++++ lib/math/conversion.ex | 18 ++++++++++++++++++ 4 files changed, 51 insertions(+), 28 deletions(-) delete mode 100644 lib/math/Calc.ex create mode 100644 lib/math/calc.ex create mode 100644 lib/math/conversion.ex (limited to 'lib') diff --git a/lib/elixir_math_parser.ex b/lib/elixir_math_parser.ex index 4a96daf..286829e 100644 --- a/lib/elixir_math_parser.ex +++ b/lib/elixir_math_parser.ex @@ -4,11 +4,16 @@ defmodule ElixirMathParser do """ alias ElixirMathParser.Math.Rational alias ElixirMathParser.Math.Calc + alias ElixirMathParser.Math.Conversion defp reduce_to_value({:int, _line, value}, _state) do {:ok, Rational.new(value)} end + defp reduce_to_value({:float, _line, value}, _state) do + {:ok, to_string(value) |> Conversion.literal_float_to_rational()} + end + defp reduce_to_value({:var, line, var}, state) do if !Map.has_key?(state, var) do {:error, line, "value not found for " <> to_string(var)} diff --git a/lib/math/Calc.ex b/lib/math/Calc.ex deleted file mode 100644 index 7dc5fcc..0000000 --- a/lib/math/Calc.ex +++ /dev/null @@ -1,28 +0,0 @@ -defmodule ElixirMathParser.Math.Calc do - alias ElixirMathParser.Math.Rational - def factorial(n), do: factorial_rec(n, 1) - defp factorial_rec(n, acc) when n > 0, do: factorial_rec(n - 1, acc * n) - defp factorial_rec(0, acc), do: acc - - def pow(value, exponent), do: pow_rec(value, exponent, Rational.new(1)) - - defp pow_rec(value, exponent, acc) when is_integer(exponent) do - case exponent do - 0 -> - acc - - _ when exponent < 0 -> - pow_rec(Rational.new(1, value), -exponent, acc) - - _ when Kernel.rem(exponent, 2) == 0 -> - pow_rec(Rational.mult(value, value), Kernel.div(exponent, 2), acc) - - _ -> - pow_rec( - Rational.mult(value, value), - Kernel.div(exponent - 1, 2), - Rational.mult(acc, value) - ) - end - end -end diff --git a/lib/math/calc.ex b/lib/math/calc.ex new file mode 100644 index 0000000..7dc5fcc --- /dev/null +++ b/lib/math/calc.ex @@ -0,0 +1,28 @@ +defmodule ElixirMathParser.Math.Calc do + alias ElixirMathParser.Math.Rational + def factorial(n), do: factorial_rec(n, 1) + defp factorial_rec(n, acc) when n > 0, do: factorial_rec(n - 1, acc * n) + defp factorial_rec(0, acc), do: acc + + def pow(value, exponent), do: pow_rec(value, exponent, Rational.new(1)) + + defp pow_rec(value, exponent, acc) when is_integer(exponent) do + case exponent do + 0 -> + acc + + _ when exponent < 0 -> + pow_rec(Rational.new(1, value), -exponent, acc) + + _ when Kernel.rem(exponent, 2) == 0 -> + pow_rec(Rational.mult(value, value), Kernel.div(exponent, 2), acc) + + _ -> + pow_rec( + Rational.mult(value, value), + Kernel.div(exponent - 1, 2), + Rational.mult(acc, value) + ) + end + end +end diff --git a/lib/math/conversion.ex b/lib/math/conversion.ex new file mode 100644 index 0000000..65ddf8f --- /dev/null +++ b/lib/math/conversion.ex @@ -0,0 +1,18 @@ +defmodule ElixirMathParser.Math.Conversion do + alias ElixirMathParser.Math.Rational + + def literal_float_to_rational(value) do + {int, dec} = Integer.parse(value) + + String.graphemes(dec) + |> Enum.reduce(Rational.new(int), fn v, acc -> + if v != "." do + num = Rational.numerator(acc) * 10 + den = Rational.denominator(acc) * 10 + Rational.new(num + String.to_integer(v), den) + else + acc + end + end) + end +end -- cgit v1.2.3