main :: IO ()
main = do
  res <- startEval (parseLisp code) initEnv
  putStrLn res
main :: IO ()
main = do
  res <- startEval (parseLisp code) initEnv
  putStrLn res
main = do
  res <- startEval (parseLisp code) initEnv
  putStrLn res