let group ?id ?(title="") ?(items=[]) ?(groups=[]) () = let g = Tdl_types.group () in g.group_title <- title; g.group_items <- items; g.group_groups <- groups; g.group_id <- id; g