(string * 'a) list -> ?group:Cam_plug.Cam_files.O.group -> string list -> ?short_name:string -> 'a -> string -> ['a] Cam_plug.Cam_files.O.cp