Control.Concurrent.BroadcastChan
data BroadcastChan d a
type In
type Out
newBroadcastChan
writeBChan
readBChan
newBChanListener