let convert_int_list_to_string (l:int list) = 
  String.concat ";" (List.map string_of_int l)