sig
  val name : Line.t -> string
  val set_name : string -> Line.t -> Line.t
  val passwd : Line.t -> string
  val set_passwd : string -> Line.t -> Line.t
  val uid : Line.t -> int
  val set_uid : int -> Line.t -> Line.t
  val gid : Line.t -> int
  val set_gid : int -> Line.t -> Line.t
  val gecos : Line.t -> string
  val set_gecos : string -> Line.t -> Line.t
  val home : Line.t -> string
  val set_home : string -> Line.t -> Line.t
  val shell : Line.t -> string
  val set_shell : string -> Line.t -> Line.t
  val create :
    name:string ->
    passwd:string ->
    uid:int ->
    gid:int ->
    gecos:string -> home:string -> shell:string -> Line.t -> Line.t
end