let string_concat_list l = String_concat l