sig
  type command
  val command : ?doc:string -> string -> Arg.spec -> BatArg.command
  val handle : ?usage:string -> BatArg.command list -> string list
end