sig type 'a t val create : (string -> 'a) -> 'a Command.Flag.Type.t val bool : bool Command.Flag.Type.t val int : int Command.Flag.Type.t val float : float Command.Flag.Type.t end