[fp] brainfuck in haskell