We write a fast bytecode VM for arithmetic in Haskell.