Corrected an issue in replaceVariable that was not adding padding in tokenized expression

2022-07-14 18:52:29 +03:00 · 2022-07-14 18:52:29 +03:00 · 57f096247e
commit 57f096247e
parent ff4a3662e7
1 changed files with 1 additions and 1 deletions
--- a/src/Numeric/MathExpr.hs
+++ b/src/Numeric/MathExpr.hs
@ -73,7 +73,7 @@ module Numeric.MathExpr
        where
          replace c
            | isVariable c = pad $ show $ fromJust $ c `lookup` vars
-            | otherwise = c
+            | otherwise = pad c

          isVariable c = isJust $ c `lookup` vars