Channel = Ringpuffer, Queue; ohne Kapazitätsschranke
newChan :: IO (Chan a)
writeChan :: Chan a -> a -> IO ()
(blockiert nicht)
readChan :: Chan a -> IO a
blockiert, solange Puffer leer ist