Control.Concurrent.STM.Split.MVar
data T dir a
type In
type Out
newEmptyIO
newEmpty
newIO
new
take
tryTake
put
tryPut