sig
  type uint = int
  type t = {
    r : CL_Color.uint;
    g : CL_Color.uint;
    b : CL_Color.uint;
    a : CL_Color.uint;
  }
  val init :
    r:CL_Color.uint ->
    g:CL_Color.uint ->
    b:CL_Color.uint -> ?a:CL_Color.uint -> unit -> CL_Color.t
  val rgb : CL_Color.uint * CL_Color.uint * CL_Color.uint -> CL_Color.t
  val rgba :
    CL_Color.uint * CL_Color.uint * CL_Color.uint * CL_Color.uint ->
    CL_Color.t
  val aliceblue : CL_Color.t
  val antiquewhite : CL_Color.t
  val aqua : CL_Color.t
  val aquamarine : CL_Color.t
  val azure : CL_Color.t
  val beige : CL_Color.t
  val bisque : CL_Color.t
  val black : CL_Color.t
  val blanchedalmond : CL_Color.t
  val blue : CL_Color.t
  val blueviolet : CL_Color.t
  val brown : CL_Color.t
  val burlywood : CL_Color.t
  val cadetblue : CL_Color.t
  val chartreuse : CL_Color.t
  val chocolate : CL_Color.t
  val coral : CL_Color.t
  val cornflowerblue : CL_Color.t
  val cornsilk : CL_Color.t
  val crimson : CL_Color.t
  val cyan : CL_Color.t
  val darkblue : CL_Color.t
  val darkcyan : CL_Color.t
  val darkgoldenrod : CL_Color.t
  val darkgray : CL_Color.t
  val darkgreen : CL_Color.t
  val darkgrey : CL_Color.t
  val darkkhaki : CL_Color.t
  val darkmagenta : CL_Color.t
  val darkolivegreen : CL_Color.t
  val darkorange : CL_Color.t
  val darkorchid : CL_Color.t
  val darkred : CL_Color.t
  val darksalmon : CL_Color.t
  val darkseagreen : CL_Color.t
  val darkslateblue : CL_Color.t
  val darkslategray : CL_Color.t
  val darkslategrey : CL_Color.t
  val darkturquoise : CL_Color.t
  val darkviolet : CL_Color.t
  val deeppink : CL_Color.t
  val deepskyblue : CL_Color.t
  val dimgray : CL_Color.t
  val dimgrey : CL_Color.t
  val dodgerblue : CL_Color.t
  val firebrick : CL_Color.t
  val floralwhite : CL_Color.t
  val forestgreen : CL_Color.t
  val fuchsia : CL_Color.t
  val gainsboro : CL_Color.t
  val ghostwhite : CL_Color.t
  val gold : CL_Color.t
  val goldenrod : CL_Color.t
  val gray : CL_Color.t
  val grey : CL_Color.t
  val green : CL_Color.t
  val greenyellow : CL_Color.t
  val honeydew : CL_Color.t
  val hotpink : CL_Color.t
  val indianred : CL_Color.t
  val indigo : CL_Color.t
  val ivory : CL_Color.t
  val khaki : CL_Color.t
  val lavender : CL_Color.t
  val lavenderblush : CL_Color.t
  val lawngreen : CL_Color.t
  val lemonchiffon : CL_Color.t
  val lightblue : CL_Color.t
  val lightcoral : CL_Color.t
  val lightcyan : CL_Color.t
  val lightgoldenrodyellow : CL_Color.t
  val lightgray : CL_Color.t
  val lightgreen : CL_Color.t
  val lightgrey : CL_Color.t
  val lightpink : CL_Color.t
  val lightsalmon : CL_Color.t
  val lightseagreen : CL_Color.t
  val lightskyblue : CL_Color.t
  val lightslategray : CL_Color.t
  val lightslategrey : CL_Color.t
  val lightsteelblue : CL_Color.t
  val lightyellow : CL_Color.t
  val lime : CL_Color.t
  val limegreen : CL_Color.t
  val linen : CL_Color.t
  val magenta : CL_Color.t
  val maroon : CL_Color.t
  val mediumaquamarine : CL_Color.t
  val mediumblue : CL_Color.t
  val mediumorchid : CL_Color.t
  val mediumpurple : CL_Color.t
  val mediumseagreen : CL_Color.t
  val mediumslateblue : CL_Color.t
  val mediumspringgreen : CL_Color.t
  val mediumturquoise : CL_Color.t
  val mediumvioletred : CL_Color.t
  val midnightblue : CL_Color.t
  val mintcream : CL_Color.t
  val mistyrose : CL_Color.t
  val moccasin : CL_Color.t
  val navajowhite : CL_Color.t
  val navy : CL_Color.t
  val oldlace : CL_Color.t
  val olive : CL_Color.t
  val olivedrab : CL_Color.t
  val orange : CL_Color.t
  val orangered : CL_Color.t
  val orchid : CL_Color.t
  val palegoldenrod : CL_Color.t
  val palegreen : CL_Color.t
  val paleturquoise : CL_Color.t
  val palevioletred : CL_Color.t
  val papayawhip : CL_Color.t
  val peachpuff : CL_Color.t
  val peru : CL_Color.t
  val pink : CL_Color.t
  val plum : CL_Color.t
  val powderblue : CL_Color.t
  val purple : CL_Color.t
  val red : CL_Color.t
  val rosybrown : CL_Color.t
  val royalblue : CL_Color.t
  val saddlebrown : CL_Color.t
  val salmon : CL_Color.t
  val sandybrown : CL_Color.t
  val seagreen : CL_Color.t
  val seashell : CL_Color.t
  val sienna : CL_Color.t
  val silver : CL_Color.t
  val skyblue : CL_Color.t
  val slateblue : CL_Color.t
  val slategray : CL_Color.t
  val slategrey : CL_Color.t
  val snow : CL_Color.t
  val springgreen : CL_Color.t
  val steelblue : CL_Color.t
  val tan : CL_Color.t
  val teal : CL_Color.t
  val thistle : CL_Color.t
  val tomato : CL_Color.t
  val transparent : CL_Color.t
  val turquoise : CL_Color.t
  val violet : CL_Color.t
  val wheat : CL_Color.t
  val white : CL_Color.t
  val whitesmoke : CL_Color.t
  val yellow : CL_Color.t
  val yellowgreen : CL_Color.t
  val gray10 : CL_Color.t
  val gray20 : CL_Color.t
  val gray30 : CL_Color.t
  val gray40 : CL_Color.t
  val gray50 : CL_Color.t
  val gray60 : CL_Color.t
  val gray70 : CL_Color.t
  val gray80 : CL_Color.t
  val gray90 : CL_Color.t
end