let
to_string dsc =
let
dsc_id = string_of_int (
Dscr
.dsc_id dsc)
in
"McastDscr(id:"
^dsc_id^
")"