type buffer = [ `accum | `color | `depth | `stencil ] val clear : buffer list -> unit val accum : ?alpha:float -> Gl.rgb -> unit val color : ?alpha:float -> Gl.rgb -> unit val depth : Gl.clampf -> unit val index : float -> unit val stencil : int -> unit