val normalize_dir: string -> string (** add trailing "/" if missing *)
val strip_suffix: suffix:string -> string -> string
-val list_uniq: 'a list -> 'a list (* uniq unix filter on lists *)
-
(** @return tl tail of a list starting at a given element
* @param eq equality to be used, defaults to physical equality (==)
* @raise Not_found *)