Kappa_generic_toolset.Color
type color
=
|
Red
Grey
Lightblue
Black
val triple_of_color : color -> int * int * int