summaryrefslogtreecommitdiff
path: root/rpn.hs
diff options
context:
space:
mode:
Diffstat (limited to 'rpn.hs')
-rwxr-xr-xrpn.hs2
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
69 69
70isKnownSymbol :: String -> Bool 70isKnownSymbol :: String -> Bool
71isKnownSymbol s = or [ 71isKnownSymbol 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