val compose : ('b -> 'c) -> ('a -> 'b) -> 'a -> 'cval (@*) : ('a -> 'b) -> ('c -> 'a) -> 'c -> 'bval default : 'a -> 'a option -> 'aval string_split : char -> String.t -> string listval string_split_chars : string -> String.t -> string listval count_leading_spaces : String.t -> intval shorten_string : int -> String.t -> string