sig
  type a
  val distance : Knn.KnnParams.a -> Knn.KnnParams.a -> float
  val max_degree : int
end