sig
  val equal : string -> string -> bool
  val compare : string -> string -> int
  type version_analysis =
    Debian_version.version_analysis =
      Native of string * string * string
    | NonNative of string * string * string * string
  val decompose : string -> version_analysis
  val compose : version_analysis -> string
  val strip_epoch_binnmu : string -> version_analysis
  val strip_epoch : string -> version_analysis
  val extract_epoch : string -> string
end