module Color: sig
.. end
module RGB: sig
.. end
type
rgb_t = RGB.t
val is_valid_rgb : rgb_t -> bool
module SRGB: sig
.. end
type
srgb_t = SRGB.t
val is_valid_srgb : srgb_t -> bool
val srgb_of_rgb : rgb_t -> srgb_t
val rgb_of_srgb : srgb_t -> rgb_t
module type SRGB_IntS = sig
.. end
module SRGB_Int:
module SRGB24: Color__SRGB24
module HSV: sig
.. end
type
hsv_t = HSV.t
val is_valid_hsv : hsv_t -> bool
val hsv_of_rgb : rgb_t -> hsv_t
val rgb_of_hsv : hsv_t -> rgb_t
module HSL: sig
.. end
type
hsl_t = HSL.t
val is_valid_hsl : hsl_t -> bool
val hsl_of_rgb : rgb_t -> hsl_t
val rgb_of_hsl : hsl_t -> rgb_t
module type HSYS = sig
.. end
module HSY: functor (
*
:
sig
end
) ->
HSYS
module HSI: Color__HSI