sig
  type author = string * string
  type t = Sebib.AuthorList.author list
  type style = [ `acm | `bibtex | `comas | `comas_and | `et_al ]
  val initials : string -> string option
  val to_string :
    ?style:Sebib.AuthorList.style -> Sebib.AuthorList.t -> string
end