Module type Reduce.REDUCER

module type REDUCER = sig .. end

val find_nearest : Color.rgb Color.map -> Color.rgb -> int