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