Module Graphv_webgl_impl

type t = Js_of_ocaml.WebGL.renderingContext Js_of_ocaml.Js.t
type arg = Js_of_ocaml.WebGL.renderingContext Js_of_ocaml.Js.t
val create : t -> t
module Buffer : sig ... end
module Dyn : sig ... end
val max : int -> int -> int
module VertexBuffer : sig ... end
module Path : sig ... end
type enum = int
type blending_factor = Js_of_ocaml.WebGL.blendingFactor
type texture_target = Js_of_ocaml.WebGL.texTarget
type pixel_format = Js_of_ocaml.WebGL.pixelFormat
type pixel_type = Js_of_ocaml.WebGL.pixelType
type tex_filter = Js_of_ocaml.WebGL.texFilter
type tex_param_filter = Js_of_ocaml.WebGL.texFilter Js_of_ocaml.WebGL.texParam
type tex_param_wrap = Js_of_ocaml.WebGL.wrapMode Js_of_ocaml.WebGL.texParam
type tex_param_filter_param = Js_of_ocaml.WebGL.texFilter
type tex_param_wrap_param = Js_of_ocaml.WebGL.wrapMode
type wrap_mode = Js_of_ocaml.WebGL.wrapMode
type pixel_store_param = int Js_of_ocaml.WebGL.pixelStoreParam
type enable_cap = Js_of_ocaml.WebGL.enableCap
type depth_function = Js_of_ocaml.WebGL.depthFunction
type stencil_op = Js_of_ocaml.WebGL.stencilOp
type begin_mode = Js_of_ocaml.WebGL.beginMode
type cull_face_mode = Js_of_ocaml.WebGL.cullFaceMode
type front_face_dir = Js_of_ocaml.WebGL.frontFaceDir
type uniform_type = Js_of_ocaml.WebGL.uniformType
type buffer_target = Js_of_ocaml.WebGL.bufferTarget
type buffer_usage = Js_of_ocaml.WebGL.bufferUsage
type error_code = Js_of_ocaml.WebGL.errorCode
type texture = Js_of_ocaml.WebGL.texture Js_of_ocaml.Js.t
type data_type = Js_of_ocaml.WebGL.dataType
type buffer = Buffer.Float.t
type 'a uniform_location = 'a Js_of_ocaml.WebGL.uniformLocation Js_of_ocaml.Js.t
type buffer_id = Js_of_ocaml.WebGL.buffer Js_of_ocaml.Js.t
val zero : blending_factor
val zero_ : stencil_op
val one : blending_factor
val src_color : blending_factor
val dst_color : blending_factor
val one_minus_src_color : blending_factor
val one_minus_dst_color : blending_factor
val one_minus_src_alpha : blending_factor
val one_minus_dst_alpha : blending_factor
val src_alpha_saturate : blending_factor
val src_alpha : blending_factor
val dst_alpha : blending_factor
val texture_2d : texture_target
val rgba : pixel_format
val luminance : pixel_format
val unsigned_byte : pixel_type
val nearest_mipmap_nearest : tex_param_filter_param
val linear_mipmap_linear : tex_param_filter_param
val nearest : tex_param_filter_param
val linear : tex_param_filter_param
val texture_min_filter : tex_param_filter
val texture_mag_filter : tex_param_filter
val clamp_to_edge : tex_param_wrap_param
val texture_wrap_s : tex_param_wrap
val texture_wrap_t : tex_param_wrap
val repeat : tex_param_wrap_param
val unpack_alignment : pixel_store_param
val stencil_test : enable_cap
val equal : depth_function
val keep : stencil_op
val incr : stencil_op
val triangle_strip : begin_mode
val triangle_fan : begin_mode
val always : depth_function
val notequal : depth_function
val cull_face_enum : enable_cap
val back : cull_face_mode
val ccw : front_face_dir
val blend : enable_cap
val depth_test : enable_cap
val front : cull_face_mode
val incr_wrap : stencil_op
val decr_wrap : stencil_op
val scissor_test : enable_cap
val texture0 : enum
val float : data_type
val array_buffer : buffer_target
val triangles : begin_mode
val stream_draw : buffer_usage
val invalid_enum : error_code
val texture_equal : t -> texture option -> texture option -> bool
val cull_face : t -> Js_of_ocaml.WebGL.cullFaceMode -> unit
val front_face : t -> Js_of_ocaml.WebGL.frontFaceDir -> unit
val bind_texture : t -> Js_of_ocaml.WebGL.texTarget -> Js_of_ocaml.WebGL.texture Js_of_ocaml__.Js.t option -> unit
val active_texture : t -> Js_of_ocaml.WebGL.textureUnit -> unit
val enable : t -> Js_of_ocaml.WebGL.enableCap -> unit
val disable : t -> Js_of_ocaml.WebGL.enableCap -> unit
val stencil_mask : t -> Js_of_ocaml.WebGL.uint -> unit
val stencil_func : t -> Js_of_ocaml.WebGL.depthFunction -> int -> Js_of_ocaml.WebGL.uint -> unit
val stencil_op : t -> Js_of_ocaml.WebGL.stencilOp -> Js_of_ocaml.WebGL.stencilOp -> Js_of_ocaml.WebGL.stencilOp -> unit
val stencil_op_separate : t -> Js_of_ocaml.WebGL.cullFaceMode -> Js_of_ocaml.WebGL.stencilOp -> Js_of_ocaml.WebGL.stencilOp -> Js_of_ocaml.WebGL.stencilOp -> unit
val blend_func_separate : t -> Js_of_ocaml.WebGL.blendingFactor -> Js_of_ocaml.WebGL.blendingFactor -> Js_of_ocaml.WebGL.blendingFactor -> Js_of_ocaml.WebGL.blendingFactor -> unit
val pixel_storei : t -> 't43 Js_of_ocaml.WebGL.pixelStoreParam -> 't43 -> unit
val enable_vertex_attrib_array : t -> Js_of_ocaml.WebGL.uint -> unit
val disable_vertex_attrib_array : t -> Js_of_ocaml.WebGL.uint -> unit
val vertex_attrib_pointer : t -> Js_of_ocaml.WebGL.uint -> int -> Js_of_ocaml.WebGL.dataType -> bool -> Js_of_ocaml.WebGL.sizei -> Js_of_ocaml.WebGL.intptr -> unit
val tex_parameteri_1 : t -> Js_of_ocaml.WebGL.texTarget -> 't58 Js_of_ocaml.WebGL.texParam -> 't58 -> unit
val tex_parameteri_2 : t -> Js_of_ocaml.WebGL.texTarget -> 't62 Js_of_ocaml.WebGL.texParam -> 't62 -> unit
val buffer_data : t -> Js_of_ocaml.WebGL.bufferTarget -> buffer -> Js_of_ocaml.WebGL.bufferUsage -> unit
val tex_image2d : t -> Js_of_ocaml.WebGL.texTarget -> int -> Js_of_ocaml.WebGL.pixelFormat -> Js_of_ocaml.WebGL.sizei -> Js_of_ocaml.WebGL.sizei -> int -> Js_of_ocaml.WebGL.pixelFormat -> Js_of_ocaml.WebGL.pixelType -> Js_of_ocaml__.Typed_array.arrayBufferView Js_of_ocaml__.Js.t -> unit
val tex_sub_image2d : t -> Js_of_ocaml.WebGL.texTarget -> int -> int -> int -> Js_of_ocaml.WebGL.sizei -> Js_of_ocaml.WebGL.sizei -> Js_of_ocaml.WebGL.pixelFormat -> Js_of_ocaml.WebGL.pixelType -> Js_of_ocaml__.Typed_array.arrayBufferView Js_of_ocaml__.Js.t -> unit
val debug : bool
val check_error : t -> 'a -> unit
val gen_textures : t -> int -> Js_of_ocaml.WebGL.texture Js_of_ocaml__.Js.t array
val delete_textures : t -> Js_of_ocaml.WebGL.texture Js_of_ocaml__.Js.t array -> unit
val uniform4fv : t -> [ `vec4 ] Js_of_ocaml.WebGL.uniformLocation Js_of_ocaml__.Js.t -> Buffer.Float.t -> unit
val temp_array : float Js_of_ocaml.Js.js_array Js_of_ocaml.Js.t
val uniform2fv : t -> [ `vec2 ] Js_of_ocaml.WebGL.uniformLocation Js_of_ocaml__.Js.t -> Buffer.Float.t -> unit
val bind_buffer : t -> Js_of_ocaml.WebGL.bufferTarget -> buffer_id -> unit
val draw_arrays : t -> Js_of_ocaml.WebGL.beginMode -> int -> Js_of_ocaml.WebGL.sizei -> unit
val generate_mipmap : t -> Js_of_ocaml.WebGL.texTarget -> unit
val color_mask : t -> bool -> bool -> bool -> bool -> unit
type program = Js_of_ocaml.WebGL.program Js_of_ocaml.Js.t
val use_program : t -> Js_of_ocaml.WebGL.program Js_of_ocaml__.Js.t -> unit
val uniform1i : t -> int Js_of_ocaml.WebGL.uniformLocation Js_of_ocaml__.Js.t -> int -> unit
val get_uniform_location : t -> Js_of_ocaml.WebGL.program Js_of_ocaml__.Js.t -> string -> 'a Js_of_ocaml.WebGL.uniformLocation Js_of_ocaml__.Js.t
val finish : t -> unit
type locs = {
frag : [ `vec4 ] uniform_location;
tex : int uniform_location;
view_size : [ `vec2 ] uniform_location;
vert_buf : buffer_id;
}
val create_shader : t -> string -> string -> Js_of_ocaml.WebGL.program Js_of_ocaml__.Js.t option
val create_program : t -> (Js_of_ocaml.WebGL.program Js_of_ocaml__.Js.t * locs) option