Brick.BChan

data BChan a

newBChan

writeBChan

readBChan

readBChan2