-- This file was automatically generated.
{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.OES.MatrixPalette (
  -- * Extension Support
    gl_OES_matrix_palette

  -- * GL_OES_matrix_palette
  , glCurrentPaletteMatrixOES
  , glLoadPaletteFromModelViewMatrixOES
  , glMatrixIndexPointerOES
  , glWeightPointerOES
  , pattern GL_CURRENT_PALETTE_MATRIX_OES
  , pattern GL_MATRIX_INDEX_ARRAY_BUFFER_BINDING_OES
  , pattern GL_MATRIX_INDEX_ARRAY_OES
  , pattern GL_MATRIX_INDEX_ARRAY_POINTER_OES
  , pattern GL_MATRIX_INDEX_ARRAY_SIZE_OES
  , pattern GL_MATRIX_INDEX_ARRAY_STRIDE_OES
  , pattern GL_MATRIX_INDEX_ARRAY_TYPE_OES
  , pattern GL_MATRIX_PALETTE_OES
  , pattern GL_MAX_PALETTE_MATRICES_OES
  , pattern GL_MAX_VERTEX_UNITS_OES
  , pattern GL_WEIGHT_ARRAY_BUFFER_BINDING_OES
  , pattern GL_WEIGHT_ARRAY_OES
  , pattern GL_WEIGHT_ARRAY_POINTER_OES
  , pattern GL_WEIGHT_ARRAY_SIZE_OES
  , pattern GL_WEIGHT_ARRAY_STRIDE_OES
  , pattern GL_WEIGHT_ARRAY_TYPE_OES
) where

import Control.Monad.IO.Class
import Data.Set
import Foreign.Ptr
import Graphics.GL.Internal.FFI
import Graphics.GL.Internal.Proc
import Graphics.GL.Types
import System.IO.Unsafe

-- | Checks that the <https://www.khronos.org/registry/gles/extensions/OES/OES_matrix_palette.txt GL_OES_matrix_palette> extension is available.

gl_OES_matrix_palette :: Bool
gl_OES_matrix_palette :: Bool
gl_OES_matrix_palette = [Char] -> Set [Char] -> Bool
forall a. Ord a => a -> Set a -> Bool
member "GL_OES_matrix_palette" Set [Char]
extensions
{-# NOINLINE gl_OES_matrix_palette #-}

-- | Usage: @'glCurrentPaletteMatrixOES' matrixpaletteindex@


glCurrentPaletteMatrixOES :: MonadIO m => GLuint -> m ()
glCurrentPaletteMatrixOES :: GLuint -> m ()
glCurrentPaletteMatrixOES = FunPtr (GLuint -> IO ()) -> GLuint -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLuint -> IO ()) -> GLuint -> m ()
ffiuintIOV FunPtr (GLuint -> IO ())
glCurrentPaletteMatrixOESFunPtr

glCurrentPaletteMatrixOESFunPtr :: FunPtr (GLuint -> IO ())
glCurrentPaletteMatrixOESFunPtr :: FunPtr (GLuint -> IO ())
glCurrentPaletteMatrixOESFunPtr = IO (FunPtr (GLuint -> IO ())) -> FunPtr (GLuint -> IO ())
forall a. IO a -> a
unsafePerformIO ([Char] -> IO (FunPtr (GLuint -> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glCurrentPaletteMatrixOES")

{-# NOINLINE glCurrentPaletteMatrixOESFunPtr #-}

-- | Usage: @'glLoadPaletteFromModelViewMatrixOES'@


glLoadPaletteFromModelViewMatrixOES :: MonadIO m => m ()
glLoadPaletteFromModelViewMatrixOES :: m ()
glLoadPaletteFromModelViewMatrixOES = FunPtr (IO ()) -> m ()
forall (m :: * -> *). MonadIO m => FunPtr (IO ()) -> m ()
ffiIOV FunPtr (IO ())
glLoadPaletteFromModelViewMatrixOESFunPtr

glLoadPaletteFromModelViewMatrixOESFunPtr :: FunPtr (IO ())
glLoadPaletteFromModelViewMatrixOESFunPtr :: FunPtr (IO ())
glLoadPaletteFromModelViewMatrixOESFunPtr = IO (FunPtr (IO ())) -> FunPtr (IO ())
forall a. IO a -> a
unsafePerformIO ([Char] -> IO (FunPtr (IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glLoadPaletteFromModelViewMatrixOES")

{-# NOINLINE glLoadPaletteFromModelViewMatrixOESFunPtr #-}

-- | Usage: @'glMatrixIndexPointerOES' size type stride pointer@
--
-- The length of @pointer@ should be @COMPSIZE(size,type,stride)@.


glMatrixIndexPointerOES :: MonadIO m => GLint -> GLenum -> GLsizei -> Ptr () -> m ()
glMatrixIndexPointerOES :: GLint -> GLuint -> GLint -> Ptr () -> m ()
glMatrixIndexPointerOES = FunPtr (GLint -> GLuint -> GLint -> Ptr () -> IO ())
-> GLint -> GLuint -> GLint -> Ptr () -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLint -> GLuint -> GLint -> Ptr () -> IO ())
-> GLint -> GLuint -> GLint -> Ptr () -> m ()
ffiintenumsizeiPtrVIOV FunPtr (GLint -> GLuint -> GLint -> Ptr () -> IO ())
glMatrixIndexPointerOESFunPtr

glMatrixIndexPointerOESFunPtr :: FunPtr (GLint -> GLenum -> GLsizei -> Ptr () -> IO ())
glMatrixIndexPointerOESFunPtr :: FunPtr (GLint -> GLuint -> GLint -> Ptr () -> IO ())
glMatrixIndexPointerOESFunPtr = IO (FunPtr (GLint -> GLuint -> GLint -> Ptr () -> IO ()))
-> FunPtr (GLint -> GLuint -> GLint -> Ptr () -> IO ())
forall a. IO a -> a
unsafePerformIO ([Char] -> IO (FunPtr (GLint -> GLuint -> GLint -> Ptr () -> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glMatrixIndexPointerOES")

{-# NOINLINE glMatrixIndexPointerOESFunPtr #-}

-- | Usage: @'glWeightPointerOES' size type stride pointer@
--
-- The length of @pointer@ should be @COMPSIZE(type,stride)@.


glWeightPointerOES :: MonadIO m => GLint -> GLenum -> GLsizei -> Ptr () -> m ()
glWeightPointerOES :: GLint -> GLuint -> GLint -> Ptr () -> m ()
glWeightPointerOES = FunPtr (GLint -> GLuint -> GLint -> Ptr () -> IO ())
-> GLint -> GLuint -> GLint -> Ptr () -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLint -> GLuint -> GLint -> Ptr () -> IO ())
-> GLint -> GLuint -> GLint -> Ptr () -> m ()
ffiintenumsizeiPtrVIOV FunPtr (GLint -> GLuint -> GLint -> Ptr () -> IO ())
glWeightPointerOESFunPtr

glWeightPointerOESFunPtr :: FunPtr (GLint -> GLenum -> GLsizei -> Ptr () -> IO ())
glWeightPointerOESFunPtr :: FunPtr (GLint -> GLuint -> GLint -> Ptr () -> IO ())
glWeightPointerOESFunPtr = IO (FunPtr (GLint -> GLuint -> GLint -> Ptr () -> IO ()))
-> FunPtr (GLint -> GLuint -> GLint -> Ptr () -> IO ())
forall a. IO a -> a
unsafePerformIO ([Char] -> IO (FunPtr (GLint -> GLuint -> GLint -> Ptr () -> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glWeightPointerOES")

{-# NOINLINE glWeightPointerOESFunPtr #-}

pattern $bGL_CURRENT_PALETTE_MATRIX_OES :: a
$mGL_CURRENT_PALETTE_MATRIX_OES :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_CURRENT_PALETTE_MATRIX_OES = 0x8843

pattern $bGL_MATRIX_INDEX_ARRAY_BUFFER_BINDING_OES :: a
$mGL_MATRIX_INDEX_ARRAY_BUFFER_BINDING_OES :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_MATRIX_INDEX_ARRAY_BUFFER_BINDING_OES = 0x8B9E

pattern $bGL_MATRIX_INDEX_ARRAY_OES :: a
$mGL_MATRIX_INDEX_ARRAY_OES :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_MATRIX_INDEX_ARRAY_OES = 0x8844

pattern $bGL_MATRIX_INDEX_ARRAY_POINTER_OES :: a
$mGL_MATRIX_INDEX_ARRAY_POINTER_OES :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_MATRIX_INDEX_ARRAY_POINTER_OES = 0x8849

pattern $bGL_MATRIX_INDEX_ARRAY_SIZE_OES :: a
$mGL_MATRIX_INDEX_ARRAY_SIZE_OES :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_MATRIX_INDEX_ARRAY_SIZE_OES = 0x8846

pattern $bGL_MATRIX_INDEX_ARRAY_STRIDE_OES :: a
$mGL_MATRIX_INDEX_ARRAY_STRIDE_OES :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_MATRIX_INDEX_ARRAY_STRIDE_OES = 0x8848

pattern $bGL_MATRIX_INDEX_ARRAY_TYPE_OES :: a
$mGL_MATRIX_INDEX_ARRAY_TYPE_OES :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_MATRIX_INDEX_ARRAY_TYPE_OES = 0x8847

pattern $bGL_MATRIX_PALETTE_OES :: a
$mGL_MATRIX_PALETTE_OES :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_MATRIX_PALETTE_OES = 0x8840

pattern $bGL_MAX_PALETTE_MATRICES_OES :: a
$mGL_MAX_PALETTE_MATRICES_OES :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_MAX_PALETTE_MATRICES_OES = 0x8842

pattern $bGL_MAX_VERTEX_UNITS_OES :: a
$mGL_MAX_VERTEX_UNITS_OES :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_MAX_VERTEX_UNITS_OES = 0x86A4

pattern $bGL_WEIGHT_ARRAY_BUFFER_BINDING_OES :: a
$mGL_WEIGHT_ARRAY_BUFFER_BINDING_OES :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_WEIGHT_ARRAY_BUFFER_BINDING_OES = 0x889E

pattern $bGL_WEIGHT_ARRAY_OES :: a
$mGL_WEIGHT_ARRAY_OES :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_WEIGHT_ARRAY_OES = 0x86AD

pattern $bGL_WEIGHT_ARRAY_POINTER_OES :: a
$mGL_WEIGHT_ARRAY_POINTER_OES :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_WEIGHT_ARRAY_POINTER_OES = 0x86AC

pattern $bGL_WEIGHT_ARRAY_SIZE_OES :: a
$mGL_WEIGHT_ARRAY_SIZE_OES :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_WEIGHT_ARRAY_SIZE_OES = 0x86AB

pattern $bGL_WEIGHT_ARRAY_STRIDE_OES :: a
$mGL_WEIGHT_ARRAY_STRIDE_OES :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_WEIGHT_ARRAY_STRIDE_OES = 0x86AA

pattern $bGL_WEIGHT_ARRAY_TYPE_OES :: a
$mGL_WEIGHT_ARRAY_TYPE_OES :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_WEIGHT_ARRAY_TYPE_OES = 0x86A9