`sig
val ( ~: ) : string list -> string
val ( ~% ) : ('a, unit, string) Pervasives.format -> 'a
val print : string -> unit
val eprint : string -> unit
val fprint : Pervasives.out_channel -> string -> unit
val printl : string -> unit
val eprintl : string -> unit
val fprintl : Pervasives.out_channel -> string -> unit
val lpad : ?fill:Char.t -> int -> string -> string
val rpad : ?fill:Char.t -> int -> string -> string
val i2s : int -> string
val f2s : float -> string
end`