module N: sig .. end
sig
end
type t = string
string
val simple : t -> t
t -> t
val concat : t -> t -> t
t -> t -> t
val depth : t -> int
t -> int
val get_relative : t -> t -> t
val father : t -> t