3 ms·

Or you can use do notation inside the state monad and keep everything pure. Then you get the best of both worlds.