sig
  val add : 'a -> 'a list -> 'a list
  val adds : 'a list -> 'a list -> 'a list
  val add_if : bool -> 'a -> 'a list -> 'a list
  val adds_if : bool -> 'a list -> 'a list -> 'a list
  val fadd_if : bool -> ('b -> 'a) -> 'b -> 'a list -> 'a list
  val fadds_if : bool -> ('b -> 'a list) -> 'b -> 'a list -> 'a list
  val path_arg : ?opt:string -> As_path.t -> string list -> string list
  val path_args : ?opt:string -> As_path.t list -> string list -> string list
  val path : As_path.t -> ext:As_path.ext -> As_path.t
end