在使用Cmdliner时，有没有办法对记录中的参数进行分组？

open Cmdliner

type options = {
  group1 : string;
  group2 : int;
  group3 : bool;
}

let options =
  let group1 =
    let doc = "Group 1 options" in
    Arg.(value & opt string "default" & info ["group1"] ~doc)
  in
  let group2 =
    let doc = "Group 2 options" in
    Arg.(value & opt int 0 & info ["group2"] ~doc)
  in
  let group3 =
    let doc = "Group 3 options" in
    Arg.(value & flag & info ["group3"] ~doc)
  in
  let all_opts = Arg.(group [group1; group2; group3]) in
  Term.(const (fun g1 g2 g3 -> { group1 = g1; group2 = g2; group3 = g3 }) $ group1 $ group2 $ group3),
  Term.info "my_program" ~version:"1.0" ~doc:"My program" ~exits:Term.default_exits

let () =
  match Term.eval options with
  | `Ok opt ->
    (* 处理参数 *)
    (* 这里可以访问 opt.group1, opt.group2, opt.group3 等分组参数 *)
  | _ -> ()