Control.Concurrent.Chan split into sending and receiving halves.