sig
  val ( / ) : Dir.t -> string -> Dir.t
  val ( // ) : Dir.t -> string -> t
end