-- This file was automatically generated.
{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.IBM.VertexArrayLists (
  -- * Extension Support
    gl_IBM_vertex_array_lists

  -- * GL_IBM_vertex_array_lists
  , glColorPointerListIBM
  , glEdgeFlagPointerListIBM
  , glFogCoordPointerListIBM
  , glIndexPointerListIBM
  , glNormalPointerListIBM
  , glSecondaryColorPointerListIBM
  , glTexCoordPointerListIBM
  , glVertexPointerListIBM
  , pattern GL_COLOR_ARRAY_LIST_IBM
  , pattern GL_COLOR_ARRAY_LIST_STRIDE_IBM
  , pattern GL_EDGE_FLAG_ARRAY_LIST_IBM
  , pattern GL_EDGE_FLAG_ARRAY_LIST_STRIDE_IBM
  , pattern GL_FOG_COORDINATE_ARRAY_LIST_IBM
  , pattern GL_FOG_COORDINATE_ARRAY_LIST_STRIDE_IBM
  , pattern GL_INDEX_ARRAY_LIST_IBM
  , pattern GL_INDEX_ARRAY_LIST_STRIDE_IBM
  , pattern GL_NORMAL_ARRAY_LIST_IBM
  , pattern GL_NORMAL_ARRAY_LIST_STRIDE_IBM
  , pattern GL_SECONDARY_COLOR_ARRAY_LIST_IBM
  , pattern GL_SECONDARY_COLOR_ARRAY_LIST_STRIDE_IBM
  , pattern GL_TEXTURE_COORD_ARRAY_LIST_IBM
  , pattern GL_TEXTURE_COORD_ARRAY_LIST_STRIDE_IBM
  , pattern GL_VERTEX_ARRAY_LIST_IBM
  , pattern GL_VERTEX_ARRAY_LIST_STRIDE_IBM
) 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://cvs.khronos.org/svn/repos/ogl/trunk/doc/registry/public/specs/IBM/vertex_array_lists.txt GL_IBM_vertex_array_lists> extension is available.

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

-- | Usage: @'glColorPointerListIBM' size type stride pointer ptrstride@
--
-- The parameter @type@ is a @ColorPointerType@, one of: 'Graphics.GL.Internal.Shared.GL_BYTE', 'Graphics.GL.Internal.Shared.GL_DOUBLE', 'Graphics.GL.Internal.Shared.GL_FLOAT', 'Graphics.GL.Internal.Shared.GL_INT', 'Graphics.GL.Internal.Shared.GL_SHORT', 'Graphics.GL.Internal.Shared.GL_UNSIGNED_BYTE', 'Graphics.GL.Internal.Shared.GL_UNSIGNED_INT', 'Graphics.GL.Internal.Shared.GL_UNSIGNED_SHORT'.
--
-- The length of @pointer@ should be @COMPSIZE(size,type,stride)@.


glColorPointerListIBM :: MonadIO m => GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
glColorPointerListIBM :: GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
glColorPointerListIBM = FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
-> GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
-> GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
ffiintenumintPtrPtrVintIOV FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glColorPointerListIBMFunPtr

glColorPointerListIBMFunPtr :: FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glColorPointerListIBMFunPtr :: FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glColorPointerListIBMFunPtr = IO
  (FunPtr
     (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ()))
-> FunPtr
     (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
forall a. IO a -> a
unsafePerformIO ([Char]
-> IO
     (FunPtr
        (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glColorPointerListIBM")

{-# NOINLINE glColorPointerListIBMFunPtr #-}

-- | Usage: @'glEdgeFlagPointerListIBM' stride pointer ptrstride@
--
-- The parameter @pointer@ is a @BooleanPointer@.
--
-- The length of @pointer@ should be @COMPSIZE(stride)@.


glEdgeFlagPointerListIBM :: MonadIO m => GLint -> Ptr (Ptr GLboolean) -> GLint -> m ()
glEdgeFlagPointerListIBM :: GLint -> Ptr (Ptr GLboolean) -> GLint -> m ()
glEdgeFlagPointerListIBM = FunPtr (GLint -> Ptr (Ptr GLboolean) -> GLint -> IO ())
-> GLint -> Ptr (Ptr GLboolean) -> GLint -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLint -> Ptr (Ptr GLboolean) -> GLint -> IO ())
-> GLint -> Ptr (Ptr GLboolean) -> GLint -> m ()
ffiintPtrPtrbooleanintIOV FunPtr (GLint -> Ptr (Ptr GLboolean) -> GLint -> IO ())
glEdgeFlagPointerListIBMFunPtr

glEdgeFlagPointerListIBMFunPtr :: FunPtr (GLint -> Ptr (Ptr GLboolean) -> GLint -> IO ())
glEdgeFlagPointerListIBMFunPtr :: FunPtr (GLint -> Ptr (Ptr GLboolean) -> GLint -> IO ())
glEdgeFlagPointerListIBMFunPtr = IO (FunPtr (GLint -> Ptr (Ptr GLboolean) -> GLint -> IO ()))
-> FunPtr (GLint -> Ptr (Ptr GLboolean) -> GLint -> IO ())
forall a. IO a -> a
unsafePerformIO ([Char]
-> IO (FunPtr (GLint -> Ptr (Ptr GLboolean) -> GLint -> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glEdgeFlagPointerListIBM")

{-# NOINLINE glEdgeFlagPointerListIBMFunPtr #-}

-- | Usage: @'glFogCoordPointerListIBM' type stride pointer ptrstride@
--
-- The parameter @type@ is a @FogPointerTypeIBM@, one of: 'Graphics.GL.Internal.Shared.GL_FLOAT', 'Graphics.GL.Internal.Shared.GL_DOUBLE'.
--
-- The length of @pointer@ should be @COMPSIZE(type,stride)@.


glFogCoordPointerListIBM :: MonadIO m => GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
glFogCoordPointerListIBM :: GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
glFogCoordPointerListIBM = FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
-> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
-> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
ffienumintPtrPtrVintIOV FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glFogCoordPointerListIBMFunPtr

glFogCoordPointerListIBMFunPtr :: FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glFogCoordPointerListIBMFunPtr :: FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glFogCoordPointerListIBMFunPtr = IO (FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ()))
-> FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
forall a. IO a -> a
unsafePerformIO ([Char]
-> IO (FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glFogCoordPointerListIBM")

{-# NOINLINE glFogCoordPointerListIBMFunPtr #-}

-- | Usage: @'glIndexPointerListIBM' type stride pointer ptrstride@
--
-- The parameter @type@ is a @IndexPointerType@, one of: 'Graphics.GL.Internal.Shared.GL_DOUBLE', 'Graphics.GL.Internal.Shared.GL_FLOAT', 'Graphics.GL.Internal.Shared.GL_INT', 'Graphics.GL.Internal.Shared.GL_SHORT'.
--
-- The length of @pointer@ should be @COMPSIZE(type,stride)@.


glIndexPointerListIBM :: MonadIO m => GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
glIndexPointerListIBM :: GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
glIndexPointerListIBM = FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
-> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
-> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
ffienumintPtrPtrVintIOV FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glIndexPointerListIBMFunPtr

glIndexPointerListIBMFunPtr :: FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glIndexPointerListIBMFunPtr :: FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glIndexPointerListIBMFunPtr = IO (FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ()))
-> FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
forall a. IO a -> a
unsafePerformIO ([Char]
-> IO (FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glIndexPointerListIBM")

{-# NOINLINE glIndexPointerListIBMFunPtr #-}

-- | Usage: @'glNormalPointerListIBM' type stride pointer ptrstride@
--
-- The parameter @type@ is a @NormalPointerType@, one of: 'Graphics.GL.Internal.Shared.GL_BYTE', 'Graphics.GL.Internal.Shared.GL_DOUBLE', 'Graphics.GL.Internal.Shared.GL_FLOAT', 'Graphics.GL.Internal.Shared.GL_INT', 'Graphics.GL.Internal.Shared.GL_SHORT'.
--
-- The length of @pointer@ should be @COMPSIZE(type,stride)@.


glNormalPointerListIBM :: MonadIO m => GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
glNormalPointerListIBM :: GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
glNormalPointerListIBM = FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
-> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
-> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
ffienumintPtrPtrVintIOV FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glNormalPointerListIBMFunPtr

glNormalPointerListIBMFunPtr :: FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glNormalPointerListIBMFunPtr :: FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glNormalPointerListIBMFunPtr = IO (FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ()))
-> FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
forall a. IO a -> a
unsafePerformIO ([Char]
-> IO (FunPtr (GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glNormalPointerListIBM")

{-# NOINLINE glNormalPointerListIBMFunPtr #-}

-- | Usage: @'glSecondaryColorPointerListIBM' size type stride pointer ptrstride@
--
-- The parameter @type@ is a @SecondaryColorPointerTypeIBM@.
--
-- The length of @pointer@ should be @COMPSIZE(size,type,stride)@.


glSecondaryColorPointerListIBM :: MonadIO m => GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
glSecondaryColorPointerListIBM :: GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
glSecondaryColorPointerListIBM = FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
-> GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
-> GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
ffiintenumintPtrPtrVintIOV FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glSecondaryColorPointerListIBMFunPtr

glSecondaryColorPointerListIBMFunPtr :: FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glSecondaryColorPointerListIBMFunPtr :: FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glSecondaryColorPointerListIBMFunPtr = IO
  (FunPtr
     (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ()))
-> FunPtr
     (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
forall a. IO a -> a
unsafePerformIO ([Char]
-> IO
     (FunPtr
        (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glSecondaryColorPointerListIBM")

{-# NOINLINE glSecondaryColorPointerListIBMFunPtr #-}

-- | Usage: @'glTexCoordPointerListIBM' size type stride pointer ptrstride@
--
-- The parameter @type@ is a @TexCoordPointerType@, one of: 'Graphics.GL.Internal.Shared.GL_DOUBLE', 'Graphics.GL.Internal.Shared.GL_FLOAT', 'Graphics.GL.Internal.Shared.GL_INT', 'Graphics.GL.Internal.Shared.GL_SHORT'.
--
-- The length of @pointer@ should be @COMPSIZE(size,type,stride)@.


glTexCoordPointerListIBM :: MonadIO m => GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
glTexCoordPointerListIBM :: GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
glTexCoordPointerListIBM = FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
-> GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
-> GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
ffiintenumintPtrPtrVintIOV FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glTexCoordPointerListIBMFunPtr

glTexCoordPointerListIBMFunPtr :: FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glTexCoordPointerListIBMFunPtr :: FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glTexCoordPointerListIBMFunPtr = IO
  (FunPtr
     (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ()))
-> FunPtr
     (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
forall a. IO a -> a
unsafePerformIO ([Char]
-> IO
     (FunPtr
        (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glTexCoordPointerListIBM")

{-# NOINLINE glTexCoordPointerListIBMFunPtr #-}

-- | Usage: @'glVertexPointerListIBM' size type stride pointer ptrstride@
--
-- The parameter @type@ is a @VertexPointerType@, one of: 'Graphics.GL.Internal.Shared.GL_DOUBLE', 'Graphics.GL.Internal.Shared.GL_FLOAT', 'Graphics.GL.Internal.Shared.GL_INT', 'Graphics.GL.Internal.Shared.GL_SHORT'.
--
-- The length of @pointer@ should be @COMPSIZE(size,type,stride)@.


glVertexPointerListIBM :: MonadIO m => GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
glVertexPointerListIBM :: GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
glVertexPointerListIBM = FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
-> GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
-> GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> m ()
ffiintenumintPtrPtrVintIOV FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glVertexPointerListIBMFunPtr

glVertexPointerListIBMFunPtr :: FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glVertexPointerListIBMFunPtr :: FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
glVertexPointerListIBMFunPtr = IO
  (FunPtr
     (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ()))
-> FunPtr
     (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ())
forall a. IO a -> a
unsafePerformIO ([Char]
-> IO
     (FunPtr
        (GLint -> GLenum -> GLint -> Ptr (Ptr ()) -> GLint -> IO ()))
forall a. [Char] -> IO (FunPtr a)
getProcAddress "glVertexPointerListIBM")

{-# NOINLINE glVertexPointerListIBMFunPtr #-}

pattern $bGL_COLOR_ARRAY_LIST_IBM :: a
$mGL_COLOR_ARRAY_LIST_IBM :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_COLOR_ARRAY_LIST_IBM = 103072

pattern $bGL_COLOR_ARRAY_LIST_STRIDE_IBM :: a
$mGL_COLOR_ARRAY_LIST_STRIDE_IBM :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_COLOR_ARRAY_LIST_STRIDE_IBM = 103082

pattern $bGL_EDGE_FLAG_ARRAY_LIST_IBM :: a
$mGL_EDGE_FLAG_ARRAY_LIST_IBM :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_EDGE_FLAG_ARRAY_LIST_IBM = 103075

pattern $bGL_EDGE_FLAG_ARRAY_LIST_STRIDE_IBM :: a
$mGL_EDGE_FLAG_ARRAY_LIST_STRIDE_IBM :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_EDGE_FLAG_ARRAY_LIST_STRIDE_IBM = 103085

pattern $bGL_FOG_COORDINATE_ARRAY_LIST_IBM :: a
$mGL_FOG_COORDINATE_ARRAY_LIST_IBM :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_FOG_COORDINATE_ARRAY_LIST_IBM = 103076

pattern $bGL_FOG_COORDINATE_ARRAY_LIST_STRIDE_IBM :: a
$mGL_FOG_COORDINATE_ARRAY_LIST_STRIDE_IBM :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_FOG_COORDINATE_ARRAY_LIST_STRIDE_IBM = 103086

pattern $bGL_INDEX_ARRAY_LIST_IBM :: a
$mGL_INDEX_ARRAY_LIST_IBM :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_INDEX_ARRAY_LIST_IBM = 103073

pattern $bGL_INDEX_ARRAY_LIST_STRIDE_IBM :: a
$mGL_INDEX_ARRAY_LIST_STRIDE_IBM :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_INDEX_ARRAY_LIST_STRIDE_IBM = 103083

pattern $bGL_NORMAL_ARRAY_LIST_IBM :: a
$mGL_NORMAL_ARRAY_LIST_IBM :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_NORMAL_ARRAY_LIST_IBM = 103071

pattern $bGL_NORMAL_ARRAY_LIST_STRIDE_IBM :: a
$mGL_NORMAL_ARRAY_LIST_STRIDE_IBM :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_NORMAL_ARRAY_LIST_STRIDE_IBM = 103081

pattern $bGL_SECONDARY_COLOR_ARRAY_LIST_IBM :: a
$mGL_SECONDARY_COLOR_ARRAY_LIST_IBM :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_SECONDARY_COLOR_ARRAY_LIST_IBM = 103077

pattern $bGL_SECONDARY_COLOR_ARRAY_LIST_STRIDE_IBM :: a
$mGL_SECONDARY_COLOR_ARRAY_LIST_STRIDE_IBM :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_SECONDARY_COLOR_ARRAY_LIST_STRIDE_IBM = 103087

pattern $bGL_TEXTURE_COORD_ARRAY_LIST_IBM :: a
$mGL_TEXTURE_COORD_ARRAY_LIST_IBM :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_TEXTURE_COORD_ARRAY_LIST_IBM = 103074

pattern $bGL_TEXTURE_COORD_ARRAY_LIST_STRIDE_IBM :: a
$mGL_TEXTURE_COORD_ARRAY_LIST_STRIDE_IBM :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_TEXTURE_COORD_ARRAY_LIST_STRIDE_IBM = 103084

pattern $bGL_VERTEX_ARRAY_LIST_IBM :: a
$mGL_VERTEX_ARRAY_LIST_IBM :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_VERTEX_ARRAY_LIST_IBM = 103070

pattern $bGL_VERTEX_ARRAY_LIST_STRIDE_IBM :: a
$mGL_VERTEX_ARRAY_LIST_STRIDE_IBM :: forall r a. (Eq a, Num a) => a -> (Void# -> r) -> (Void# -> r) -> r
GL_VERTEX_ARRAY_LIST_STRIDE_IBM = 103080