Added RWS monad.