let to_json {name; use_reference_gtf}: Yojson.Basic.json =
    `Assoc [
      "name", `String name;
      "use-reference-gtf", `Bool use_reference_gtf;
    ]