MonadTrans instance for StateT