Control.Monad.State.Extended