Small Interpreter on Haskell