sig
  type t
  type shader_type = VERTEX | FRAGMENT | UNDEFINED
  external create : Osg.Shader.shader_type -> string -> Osg.Shader.t
    = "shader_create"
end