1 files changed, 1 insertions, 1 deletions
diff --git a/rpn.hs b/rpn.hs
index ff7dd6c..64fdb89 100755
--- a/rpn.hs
+++ b/rpn.hs
@@ -69,7 +69,7 @@ clarifySymbol s = do
 isKnownSymbol :: String -> Bool
 isKnownSymbol s = or [
-  s `elem` ["+", "-", "*", "/", "±", "pm", "e"],
+  s `elem` ["+", "-", "*", "/", "±", "+-", "e"],
  isJust $ (maybeRead s :: Maybe Double)
                     ]

diff --git a/rpn.hs b/rpn.hs index ff7dd6c..64fdb89 100755 --- a/rpn.hs +++ b/rpn.hs
@@ -69,7 +69,7 @@ clarifySymbol s = do
69		69
70	isKnownSymbol :: String -> Bool	70	isKnownSymbol :: String -> Bool
71	isKnownSymbol s = or [	71	isKnownSymbol s = or [
72	s `elem` ["+", "-", "*", "/", "±", "pm", "e"],	72	s `elem` ["+", "-", "*", "/", "±", "+-", "e"],
73	isJust $ (maybeRead s :: Maybe Double)	73	isJust $ (maybeRead s :: Maybe Double)
74	]	74	]
75		75