struct   type t = {     name : string;     use_reference_gtf : bool;   }   let to_json {name; use_reference_gtf}: Yojson.Basic.json =     `Assoc [       "name", `String name;       "use-reference-gtf", `Bool use_reference_gtf;     ]   let default = {name = "default"; use_reference_gtf = true} end