Rebase.Control.Monad.STM