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