sig
  val user : < ps : Line.present; .. > Line.t -> string
  val set_user :
    string -> (< ps : Line.present; .. > as 'a) Line.t -> 'Line.t
  val pid : < ps : Line.present; .. > Line.t -> int
  val set_pid : int -> (< ps : Line.present; .. > as 'a) Line.t -> 'Line.t
  val pcpu : < ps : Line.present; .. > Line.t -> float
  val set_pcpu :
    float -> (< ps : Line.present; .. > as 'a) Line.t -> 'Line.t
  val pmem : < ps : Line.present; .. > Line.t -> float
  val set_pmem :
    float -> (< ps : Line.present; .. > as 'a) Line.t -> 'Line.t
  val vsz : < ps : Line.present; .. > Line.t -> int
  val set_vsz : int -> (< ps : Line.present; .. > as 'a) Line.t -> 'Line.t
  val rss : < ps : Line.present; .. > Line.t -> int
  val set_rss : int -> (< ps : Line.present; .. > as 'a) Line.t -> 'Line.t
  val tt : < ps : Line.present; .. > Line.t -> string
  val set_tt :
    string -> (< ps : Line.present; .. > as 'a) Line.t -> 'Line.t
  val stat : < ps : Line.present; .. > Line.t -> string
  val set_stat :
    string -> (< ps : Line.present; .. > as 'a) Line.t -> 'Line.t
  val started : < ps : Line.present; .. > Line.t -> string
  val set_started :
    string -> (< ps : Line.present; .. > as 'a) Line.t -> 'Line.t
  val time : < ps : Line.present; .. > Line.t -> string
  val set_time :
    string -> (< ps : Line.present; .. > as 'a) Line.t -> 'Line.t
  val command : < ps : Line.present; .. > Line.t -> string
  val set_command :
    string -> (< ps : Line.present; .. > as 'a) Line.t -> 'Line.t
  val create :
    user:string ->
    pid:int ->
    pcpu:float ->
    pmem:float ->
    vsz:int ->
    rss:int ->
    tt:string ->
    stat:string ->
    started:string ->
    time:string ->
    command:string ->
    < delim : 'a; fstab : 'b; group : 'c; key_value : 'd; mailcap : 'e;
      passwd : 'f; ps : Line.absent; seq : 'g; source : 'h; stat : 'i >
    Line.t ->
    < delim : 'a; fstab : 'b; group : 'c; key_value : 'd; mailcap : 'e;
      passwd : 'f; ps : Line.present; seq : 'g; source : 'h; stat : 'i >
    Line.t
end