import Base
import Simple
import SimpleParse
-- 3 - -2 - -7
t1 = Subtract (Subtract (Number 3) (Number (-2))) (Number (-7))
testDBZ = evaluate (parseExp "8 / 0")
main'2 = do
putStrLn "Evaluating the following expression:"
putStr " "
print t1
putStrLn "Produces the following result:"
putStr " "
print (evaluate t1)
execute script = show (evaluate (parseExp script))
main = do
tagged "Eval7" main'2