Control.Concurrent.STM.TVar
data TVar a
newTVar
readTVar
writeTVar
newTVarIO
readTVarIO
registerDelay