module String: sig .. end
sig
end
include String
val init : int -> (int -> char) -> t
int -> (int -> char) -> t