module Main where

import qualified Lexer
import qualified Parser

main :: IO ()
main = do
  source <- readFile "arithmetic.txt"
  putStr $ show (Parser.parse $ Lexer.lex source)