module String: sig .. end
sig
end
include String
val map_to_list : (char -> 'b) -> string -> 'b list
(char -> 'b) -> string -> 'b list