sig
  val concat : Gedcom.gedcom_line list -> Gedcom.gedcom_line list
  val trim_xref : string -> string
  val parse_name : string -> string option * string option * string option
  val name_first : string option * string option * string option -> string
  val name_last : string option * string option * string option -> string
  val name_title : string option * string option * string option -> string
end