module RGB:sig
..end
type
t = {
|
red : |
|
green : |
|
blue : |
}
val is_valid : t -> bool
val make : red:float -> green:float -> blue:float -> t
val black : t
val white : t
val distance : t -> t -> float