let print_string_list = List.print String.print