math_exp_FSM/Main.hs

module Main where

import qualified LexAn as LA
import qualified Lan_1 as L

firstFSM = LA.FSM
  { LA.symbols = L.symbols_1
  , LA.start_state = L.s_q
  , LA.eos = L.eos
  , LA.delta = L.delta_1
  }

test = LA.execFSM firstFSM "Var1 = Var2 + (14 * 1.12)"

main :: IO()
main = do putStr("")