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