package lablgl

  1. Overview
  2. Docs
val coord : s:float -> ?t:float -> ?r:float -> ?q:float -> unit -> unit
val coord2 : (float * float) -> unit
val coord3 : (float * float * float) -> unit
val coord4 : (float * float * float * float) -> unit
type env_param = [
  1. | `color of Gl.rgba
  2. | `mode of [ `blend | `decal | `modulate | `replace ]
]
val env : env_param -> unit
type coord = [
  1. | `q
  2. | `r
  3. | `s
  4. | `t
]
type gen_param = [
  1. | `eye_plane of Gl.point4
  2. | `mode of [ `eye_linear | `object_linear | `sphere_map ]
  3. | `object_plane of Gl.point4
]
val gen : coord:coord -> gen_param -> unit
type format = [
  1. | `alpha
  2. | `bgr
  3. | `bgra
  4. | `blue
  5. | `color_index
  6. | `green
  7. | `luminance
  8. | `luminance_alpha
  9. | `red
  10. | `rgb
  11. | `rgba
]
val image1d : ?proxy:bool -> ?level:int -> ?internal:int -> ?border:bool -> ([< format ], [< Gl.kind ]) GlPix.t -> unit
val image2d : ?proxy:bool -> ?level:int -> ?internal:int -> ?border:bool -> ([< format ], [< Gl.kind ]) GlPix.t -> unit
type filter = [
  1. | `linear
  2. | `linear_mipmap_linear
  3. | `linear_mipmap_nearest
  4. | `nearest
  5. | `nearest_mipmap_linear
  6. | `nearest_mipmap_nearest
]
type wrap = [
  1. | `clamp
  2. | `repeat
]
type parameter = [
  1. | `border_color of Gl.rgba
  2. | `generate_mipmap of bool
  3. | `mag_filter of [ `linear | `nearest ]
  4. | `min_filter of filter
  5. | `priority of Gl.clampf
  6. | `wrap_s of wrap
  7. | `wrap_t of wrap
]
val parameter : target:[ `texture_1d | `texture_2d ] -> parameter -> unit
type texture_id
val gen_texture : unit -> texture_id
val gen_textures : len:int -> texture_id array
val bind_texture : target:[ `texture_1d | `texture_2d ] -> texture_id -> unit
val delete_texture : texture_id -> unit
val delete_textures : texture_id array -> unit