sig
  exception Format
  val out_option :
    ?default:string -> ?metavar:string -> unit -> string OptParse.Opt.t
  val verbose : int OptParse.Opt.t
  val src : string OptParse.Opt.t
  val dst : string OptParse.Opt.t
  val cone : string OptParse.Opt.t
  val extract : string OptParse.Opt.t
  val reverse_cone : string OptParse.Opt.t
  val cone_maxdepth : int OptParse.Opt.t
  val output_ty : string OptParse.Opt.t
  val out_ch : string OptParse.Opt.t
  val output_ch : unit -> Pervasives.out_channel
  val description : string
  val options : OptParse.OptParser.t
end