module GluMisc:sig
..end
val get_string : [ `extensions | `version ] -> string
val build_1d_mipmaps : ?internal:int -> ([< GlTex.format ], [< Gl.kind ]) GlPix.t -> unit
val build_2d_mipmaps : ?internal:int -> ([< GlTex.format ], [< Gl.kind ]) GlPix.t -> unit
val scale_image : width:int ->
height:int ->
([< Gl.format ] as 'a, [< Gl.kind ] as 'b) GlPix.t -> ('a, 'b) GlPix.t