sig
  val name : < group : Line.present; .. > Line.t -> string
  val set_name :
    string -> (< group : Line.present; .. > as 'a) Line.t -> 'a Line.t
  val passwd : < group : Line.present; .. > Line.t -> string
  val set_passwd :
    string -> (< group : Line.present; .. > as 'a) Line.t -> 'a Line.t
  val gid : < group : Line.present; .. > Line.t -> int
  val set_gid :
    int -> (< group : Line.present; .. > as 'a) Line.t -> 'a Line.t
  val users : < group : Line.present; .. > Line.t -> string list
  val set_users :
    string list -> (< group : Line.present; .. > as 'a) Line.t -> 'a Line.t
  val create :
    name:string ->
    passwd:string ->
    gid:int ->
    users:string list ->
    < delim : 'a; fstab : 'b; group : Line.absent; key_value : 'c;
      mailcap : 'd; passwd : 'e; ps : 'f; seq : 'g; source : 'h; stat : 'i >
    Line.t ->
    < delim : 'a; fstab : 'b; group : Line.present; key_value : 'c;
      mailcap : 'd; passwd : 'e; ps : 'f; seq : 'g; source : 'h; stat : 'i >
    Line.t
end