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