sig
val
list_to_string :
(
'
a
->
string)
->
string
->
string
->
string
->
'
a list
->
string
end