module Main where

import qualified Lexer

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