Automata Implimentation in Haskell with GUI