An Interpreter of Brainfuck in Haskell