Control.Concurrent.STM.TChan.WriteOnly
data WriteOnlyTChan a
toWriteOnlyTChan
writeTChan
dupWriteOnlyTChan
unGetTChan
isEmptyTChan