sig
  type t
  val rank : Ranked_alphabet.Symbol.t -> int
  val compare : Ranked_alphabet.Symbol.t -> Ranked_alphabet.Symbol.t -> int
  val to_string : Ranked_alphabet.Symbol.t -> string
end