Control.Monad.Trans.Push
data
Res
a
data
PushT
v p m a
liftST
runPushT
runPushTU
runPushTB
runPushTS