sig
  val store_const : ?default:'a -> 'a -> 'a BatOptParse.Opt.t
  val store_true : unit -> bool BatOptParse.Opt.t
  val store_false : unit -> bool BatOptParse.Opt.t
  val count_option :
    ?dest:int Pervasives.ref ->
    ?increment:int -> unit -> int BatOptParse.Opt.t
  val incr_option : ?dest:int Pervasives.ref -> unit -> int BatOptParse.Opt.t
  val decr_option : ?dest:int Pervasives.ref -> unit -> int BatOptParse.Opt.t
  val int_option :
    ?default:int -> ?metavar:string -> unit -> int BatOptParse.Opt.t
  val float_option :
    ?default:float -> ?metavar:string -> unit -> float BatOptParse.Opt.t
  val str_option :
    ?default:string -> ?metavar:string -> unit -> string BatOptParse.Opt.t
  val int_callback :
    ?metavar:string -> (int -> unit) -> unit BatOptParse.Opt.t
  val float_callback :
    ?metavar:string -> (float -> unit) -> unit BatOptParse.Opt.t
  val str_callback :
    ?metavar:string -> (string -> unit) -> unit BatOptParse.Opt.t
  val help_option : unit -> 'a BatOptParse.Opt.t
  val version_option : (unit -> string) -> 'a BatOptParse.Opt.t
end