module Stream = Cd_Stream.Stream