From 57f096247e3676086b92e2eaf3b59936139c3eb0 Mon Sep 17 00:00:00 2001 From: Leonidas Boulougaris Date: Thu, 14 Jul 2022 18:52:29 +0300 Subject: [PATCH] Corrected an issue in replaceVariable that was not adding padding in tokenized expression --- src/Numeric/MathExpr.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Numeric/MathExpr.hs b/src/Numeric/MathExpr.hs index 7db9765..ee80a32 100644 --- 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