# Module GluMisc

    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