module Graphics.GL.Raw.Extension.SGIS.DetailTexture (
gl_SGIS_detail_texture
, glDetailTexFuncSGIS
, glGetDetailTexFuncSGIS
, pattern GL_DETAIL_TEXTURE_2D_BINDING_SGIS
, pattern GL_DETAIL_TEXTURE_2D_SGIS
, pattern GL_DETAIL_TEXTURE_FUNC_POINTS_SGIS
, pattern GL_DETAIL_TEXTURE_LEVEL_SGIS
, pattern GL_DETAIL_TEXTURE_MODE_SGIS
, pattern GL_LINEAR_DETAIL_ALPHA_SGIS
, pattern GL_LINEAR_DETAIL_COLOR_SGIS
, pattern GL_LINEAR_DETAIL_SGIS
) where
import Control.Monad.IO.Class
import Data.Set
import Foreign.Ptr
import Graphics.GL.Raw.Internal.FFI
import Graphics.GL.Raw.Internal.Proc
import Graphics.GL.Raw.Types
import System.IO.Unsafe
gl_SGIS_detail_texture :: Bool
gl_SGIS_detail_texture = member "GL_SGIS_detail_texture" extensions
glDetailTexFuncSGIS :: MonadIO m => GLenum -> GLsizei -> Ptr GLfloat -> m ()
glDetailTexFuncSGIS = ffienumsizeiPtrfloatIOV glDetailTexFuncSGISFunPtr
glDetailTexFuncSGISFunPtr :: FunPtr (GLenum -> GLsizei -> Ptr GLfloat -> IO ())
glDetailTexFuncSGISFunPtr = unsafePerformIO (getProcAddress "glDetailTexFuncSGIS")
glGetDetailTexFuncSGIS :: MonadIO m => GLenum -> Ptr GLfloat -> m ()
glGetDetailTexFuncSGIS = ffienumPtrfloatIOV glGetDetailTexFuncSGISFunPtr
glGetDetailTexFuncSGISFunPtr :: FunPtr (GLenum -> Ptr GLfloat -> IO ())
glGetDetailTexFuncSGISFunPtr = unsafePerformIO (getProcAddress "glGetDetailTexFuncSGIS")
pattern GL_DETAIL_TEXTURE_2D_BINDING_SGIS = 0x8096 :: GLenum
pattern GL_DETAIL_TEXTURE_2D_SGIS = 0x8095 :: GLenum
pattern GL_DETAIL_TEXTURE_FUNC_POINTS_SGIS = 0x809C :: GLenum
pattern GL_DETAIL_TEXTURE_LEVEL_SGIS = 0x809A :: GLenum
pattern GL_DETAIL_TEXTURE_MODE_SGIS = 0x809B :: GLenum
pattern GL_LINEAR_DETAIL_ALPHA_SGIS = 0x8098 :: GLenum
pattern GL_LINEAR_DETAIL_COLOR_SGIS = 0x8099 :: GLenum
pattern GL_LINEAR_DETAIL_SGIS = 0x8097 :: GLenum