sig
  val content_type : Line.t -> string
  val set_content_type : string -> Line.t -> Line.t
  val command : Line.t -> string
  val set_command : string -> Line.t -> Line.t
  val flags : Line.t -> string list
  val set_flags : string list -> Line.t -> Line.t
  val fields : Line.t -> (string * string) list
  val set_fields : (string * string) list -> Line.t -> Line.t
  val create :
    content_type:string ->
    command:string ->
    flags:string list -> fields:(string * string) list -> Line.t -> Line.t
end