sig   type t = Gg.color   type stops = (float * Gg.color) list   val v : float -> float -> float -> float -> Gg.color   val v_srgb : ?a:float -> float -> float -> float -> Gg.color   val v_srgbi : ?a:float -> int -> int -> int -> Gg.color   val r : Gg.color -> float   val g : Gg.color -> float   val b : Gg.color -> float   val a : Gg.color -> float   val void : Gg.color   val black : Gg.color   val gray : ?a:float -> float -> Gg.color   val white : Gg.color   val red : Gg.color   val green : Gg.color   val blue : Gg.color   val blend : Gg.color -> Gg.color -> Gg.color   val clamp : Gg.color -> Gg.color   val with_a : Gg.color -> float -> Gg.color   type srgb = Gg.v4   val of_srgb : Gg.Color.srgb -> Gg.color   val to_srgb : Gg.color -> Gg.Color.srgb   val to_srgbi : Gg.color -> int * int * int * float   type luv = Gg.v4   val of_luv : Gg.Color.luv -> Gg.color   val to_luv : Gg.color -> Gg.Color.luv   type lch_uv = Gg.v4   val of_lch_uv : Gg.Color.lch_uv -> Gg.color   val to_lch_uv : Gg.color -> Gg.Color.lch_uv   type lab = Gg.v4   val of_lab : Gg.v4 -> Gg.color   val to_lab : Gg.color -> Gg.v4   type lch_ab = Gg.v4   val of_lch_ab : Gg.Color.lch_ab -> Gg.color   val to_lch_ab : Gg.color -> Gg.Color.lch_ab   type space =       [ `CLR2       | `CLR3       | `CLR4       | `CLR5       | `CLR6       | `CLR7       | `CLR8       | `CLR9       | `CLRA       | `CLRB       | `CLRC       | `CLRD       | `CLRE       | `CLRF       | `CMY       | `CMYK       | `Gray       | `HLS       | `HSV       | `Lab       | `Luv       | `RGB       | `XYZ       | `YCbr       | `Yxy ]   val space_dim : Gg.Color.space -> int   val pp_space : Format.formatter -> Gg.Color.space -> unit   type profile   val profile_of_icc : string -> Gg.Color.profile option   val profile_to_icc : Gg.Color.profile -> string   val profile_space : Gg.Color.profile -> Gg.Color.space   val profile_dim : Gg.Color.profile -> int   val p_gray_l : Gg.Color.profile   val p_rgb_l : Gg.Color.profile end