sig
module type REDUCER =
sig val find_nearest : Color.rgb Color.map -> Color.rgb -> int end
module ErrorDiffuse :
functor (R : REDUCER) ->
sig val f : Rgb24.t -> Color.rgb Color.map -> Index8.t end
val error_diffuse : Rgb24.t -> Color.rgb Color.map -> Index8.t
end