module String:sig
..end
include String
val starts_with : string -> string -> bool
val join : string -> string list -> string
val implode : char list -> string
val fold_left : ('a -> char -> 'a) -> 'a -> string -> 'a
val init : int -> (int -> char) -> string