module type REDUCER = sig .. end
sig
end
val find_nearest : Color.rgb Color.map -> Color.rgb -> int
Color.rgb Color.map -> Color.rgb -> int