sig
type t = { color : Color.rgb; mutable alpha : int; }
val square_distance : Color.Rgba.t -> Color.Rgba.t -> int
val plus : Color.Rgba.t -> Color.Rgba.t -> Color.Rgba.t
val minus : Color.Rgba.t -> Color.Rgba.t -> Color.Rgba.t
val merge : Color.Rgba.t -> Color.Rgba.t -> Color.Rgba.t
val size : Color.Rgba.t Color.map -> int
val find_exact : Color.Rgba.t Color.map -> Color.Rgba.t -> int
val add_color : Color.Rgba.t Color.map -> Color.Rgba.t -> int
val add_colors : Color.Rgba.t Color.map -> Color.Rgba.t list -> int list
val find_nearest : Color.Rgba.t Color.map -> Color.Rgba.t -> int
end