let string ?(default = string "") ~doc switches =       Opt_string {switches; doc; default}