sig
  val red : Gdk.color -> int
  val blue : Gdk.color -> int
  val green : Gdk.color -> int
  val pixel : Gdk.color -> int
  val color_parse : string -> Gdk.color
  val color_to_string : Gdk.color -> string
end