module Graphics.GL.Functions.F31 (
glVertexAttribs2svNV,
glVertexAttribs3dvNV,
glVertexAttribs3fvNV,
glVertexAttribs3hvNV,
glVertexAttribs3svNV,
glVertexAttribs4dvNV,
glVertexAttribs4fvNV,
glVertexAttribs4hvNV,
glVertexAttribs4svNV,
glVertexAttribs4ubvNV,
glVertexBindingDivisor,
glVertexBlendARB,
glVertexBlendEnvfATI,
glVertexBlendEnviATI,
glVertexFormatNV,
glVertexP2ui,
glVertexP2uiv,
glVertexP3ui,
glVertexP3uiv,
glVertexP4ui,
glVertexP4uiv,
glVertexPointer,
glVertexPointerEXT,
glVertexPointerListIBM,
glVertexPointervINTEL,
glVertexStream1dATI,
glVertexStream1dvATI,
glVertexStream1fATI,
glVertexStream1fvATI,
glVertexStream1iATI,
glVertexStream1ivATI,
glVertexStream1sATI,
glVertexStream1svATI,
glVertexStream2dATI,
glVertexStream2dvATI,
glVertexStream2fATI,
glVertexStream2fvATI,
glVertexStream2iATI,
glVertexStream2ivATI,
glVertexStream2sATI,
glVertexStream2svATI,
glVertexStream3dATI,
glVertexStream3dvATI,
glVertexStream3fATI,
glVertexStream3fvATI,
glVertexStream3iATI,
glVertexStream3ivATI,
glVertexStream3sATI,
glVertexStream3svATI,
glVertexStream4dATI,
glVertexStream4dvATI,
glVertexStream4fATI,
glVertexStream4fvATI,
glVertexStream4iATI,
glVertexStream4ivATI,
glVertexStream4sATI,
glVertexStream4svATI,
glVertexWeightPointerEXT,
glVertexWeightfEXT,
glVertexWeightfvEXT,
glVertexWeighthNV,
glVertexWeighthvNV,
glVideoCaptureNV,
glVideoCaptureStreamParameterdvNV,
glVideoCaptureStreamParameterfvNV,
glVideoCaptureStreamParameterivNV,
glViewport,
glViewportArrayv,
glViewportArrayvNV,
glViewportArrayvOES,
glViewportIndexedf,
glViewportIndexedfNV,
glViewportIndexedfOES,
glViewportIndexedfv,
glViewportIndexedfvNV,
glViewportIndexedfvOES,
glViewportPositionWScaleNV,
glViewportSwizzleNV,
glWaitSync,
glWaitSyncAPPLE,
glWeightPathsNV,
glWeightPointerARB,
glWeightPointerOES,
glWeightbvARB,
glWeightdvARB,
glWeightfvARB,
glWeightivARB,
glWeightsvARB,
glWeightubvARB,
glWeightuivARB,
glWeightusvARB,
glWindowPos2d,
glWindowPos2dARB,
glWindowPos2dMESA,
glWindowPos2dv,
glWindowPos2dvARB,
glWindowPos2dvMESA,
glWindowPos2f,
glWindowPos2fARB,
glWindowPos2fMESA
) where
import Control.Monad.IO.Class ( MonadIO(..) )
import Foreign.Ptr
import Graphics.GL.Foreign
import Graphics.GL.Types
import System.IO.Unsafe ( unsafePerformIO )
glVertexAttribs2svNV
:: MonadIO m
=> GLuint
-> GLsizei
-> Ptr GLshort
-> m ()
glVertexAttribs2svNV v1 v2 v3 = liftIO $ dyn877 ptr_glVertexAttribs2svNV v1 v2 v3
ptr_glVertexAttribs2svNV :: FunPtr (GLuint -> GLsizei -> Ptr GLshort -> IO ())
ptr_glVertexAttribs2svNV = unsafePerformIO $ getCommand "glVertexAttribs2svNV"
glVertexAttribs3dvNV
:: MonadIO m
=> GLuint
-> GLsizei
-> Ptr GLdouble
-> m ()
glVertexAttribs3dvNV v1 v2 v3 = liftIO $ dyn219 ptr_glVertexAttribs3dvNV v1 v2 v3
ptr_glVertexAttribs3dvNV :: FunPtr (GLuint -> GLsizei -> Ptr GLdouble -> IO ())
ptr_glVertexAttribs3dvNV = unsafePerformIO $ getCommand "glVertexAttribs3dvNV"
glVertexAttribs3fvNV
:: MonadIO m
=> GLuint
-> GLsizei
-> Ptr GLfloat
-> m ()
glVertexAttribs3fvNV v1 v2 v3 = liftIO $ dyn218 ptr_glVertexAttribs3fvNV v1 v2 v3
ptr_glVertexAttribs3fvNV :: FunPtr (GLuint -> GLsizei -> Ptr GLfloat -> IO ())
ptr_glVertexAttribs3fvNV = unsafePerformIO $ getCommand "glVertexAttribs3fvNV"
glVertexAttribs3hvNV
:: MonadIO m
=> GLuint
-> GLsizei
-> Ptr GLhalfNV
-> m ()
glVertexAttribs3hvNV v1 v2 v3 = liftIO $ dyn876 ptr_glVertexAttribs3hvNV v1 v2 v3
ptr_glVertexAttribs3hvNV :: FunPtr (GLuint -> GLsizei -> Ptr GLhalfNV -> IO ())
ptr_glVertexAttribs3hvNV = unsafePerformIO $ getCommand "glVertexAttribs3hvNV"
glVertexAttribs3svNV
:: MonadIO m
=> GLuint
-> GLsizei
-> Ptr GLshort
-> m ()
glVertexAttribs3svNV v1 v2 v3 = liftIO $ dyn877 ptr_glVertexAttribs3svNV v1 v2 v3
ptr_glVertexAttribs3svNV :: FunPtr (GLuint -> GLsizei -> Ptr GLshort -> IO ())
ptr_glVertexAttribs3svNV = unsafePerformIO $ getCommand "glVertexAttribs3svNV"
glVertexAttribs4dvNV
:: MonadIO m
=> GLuint
-> GLsizei
-> Ptr GLdouble
-> m ()
glVertexAttribs4dvNV v1 v2 v3 = liftIO $ dyn219 ptr_glVertexAttribs4dvNV v1 v2 v3
ptr_glVertexAttribs4dvNV :: FunPtr (GLuint -> GLsizei -> Ptr GLdouble -> IO ())
ptr_glVertexAttribs4dvNV = unsafePerformIO $ getCommand "glVertexAttribs4dvNV"
glVertexAttribs4fvNV
:: MonadIO m
=> GLuint
-> GLsizei
-> Ptr GLfloat
-> m ()
glVertexAttribs4fvNV v1 v2 v3 = liftIO $ dyn218 ptr_glVertexAttribs4fvNV v1 v2 v3
ptr_glVertexAttribs4fvNV :: FunPtr (GLuint -> GLsizei -> Ptr GLfloat -> IO ())
ptr_glVertexAttribs4fvNV = unsafePerformIO $ getCommand "glVertexAttribs4fvNV"
glVertexAttribs4hvNV
:: MonadIO m
=> GLuint
-> GLsizei
-> Ptr GLhalfNV
-> m ()
glVertexAttribs4hvNV v1 v2 v3 = liftIO $ dyn876 ptr_glVertexAttribs4hvNV v1 v2 v3
ptr_glVertexAttribs4hvNV :: FunPtr (GLuint -> GLsizei -> Ptr GLhalfNV -> IO ())
ptr_glVertexAttribs4hvNV = unsafePerformIO $ getCommand "glVertexAttribs4hvNV"
glVertexAttribs4svNV
:: MonadIO m
=> GLuint
-> GLsizei
-> Ptr GLshort
-> m ()
glVertexAttribs4svNV v1 v2 v3 = liftIO $ dyn877 ptr_glVertexAttribs4svNV v1 v2 v3
ptr_glVertexAttribs4svNV :: FunPtr (GLuint -> GLsizei -> Ptr GLshort -> IO ())
ptr_glVertexAttribs4svNV = unsafePerformIO $ getCommand "glVertexAttribs4svNV"
glVertexAttribs4ubvNV
:: MonadIO m
=> GLuint
-> GLsizei
-> Ptr GLubyte
-> m ()
glVertexAttribs4ubvNV v1 v2 v3 = liftIO $ dyn878 ptr_glVertexAttribs4ubvNV v1 v2 v3
ptr_glVertexAttribs4ubvNV :: FunPtr (GLuint -> GLsizei -> Ptr GLubyte -> IO ())
ptr_glVertexAttribs4ubvNV = unsafePerformIO $ getCommand "glVertexAttribs4ubvNV"
glVertexBindingDivisor
:: MonadIO m
=> GLuint
-> GLuint
-> m ()
glVertexBindingDivisor v1 v2 = liftIO $ dyn3 ptr_glVertexBindingDivisor v1 v2
ptr_glVertexBindingDivisor :: FunPtr (GLuint -> GLuint -> IO ())
ptr_glVertexBindingDivisor = unsafePerformIO $ getCommand "glVertexBindingDivisor"
glVertexBlendARB
:: MonadIO m
=> GLint
-> m ()
glVertexBlendARB v1 = liftIO $ dyn12 ptr_glVertexBlendARB v1
ptr_glVertexBlendARB :: FunPtr (GLint -> IO ())
ptr_glVertexBlendARB = unsafePerformIO $ getCommand "glVertexBlendARB"
glVertexBlendEnvfATI
:: MonadIO m
=> GLenum
-> GLfloat
-> m ()
glVertexBlendEnvfATI v1 v2 = liftIO $ dyn0 ptr_glVertexBlendEnvfATI v1 v2
ptr_glVertexBlendEnvfATI :: FunPtr (GLenum -> GLfloat -> IO ())
ptr_glVertexBlendEnvfATI = unsafePerformIO $ getCommand "glVertexBlendEnvfATI"
glVertexBlendEnviATI
:: MonadIO m
=> GLenum
-> GLint
-> m ()
glVertexBlendEnviATI v1 v2 = liftIO $ dyn55 ptr_glVertexBlendEnviATI v1 v2
ptr_glVertexBlendEnviATI :: FunPtr (GLenum -> GLint -> IO ())
ptr_glVertexBlendEnviATI = unsafePerformIO $ getCommand "glVertexBlendEnviATI"
glVertexFormatNV
:: MonadIO m
=> GLint
-> GLenum
-> GLsizei
-> m ()
glVertexFormatNV v1 v2 v3 = liftIO $ dyn119 ptr_glVertexFormatNV v1 v2 v3
ptr_glVertexFormatNV :: FunPtr (GLint -> GLenum -> GLsizei -> IO ())
ptr_glVertexFormatNV = unsafePerformIO $ getCommand "glVertexFormatNV"
glVertexP2ui
:: MonadIO m
=> GLenum
-> GLuint
-> m ()
glVertexP2ui v1 v2 = liftIO $ dyn16 ptr_glVertexP2ui v1 v2
ptr_glVertexP2ui :: FunPtr (GLenum -> GLuint -> IO ())
ptr_glVertexP2ui = unsafePerformIO $ getCommand "glVertexP2ui"
glVertexP2uiv
:: MonadIO m
=> GLenum
-> Ptr GLuint
-> m ()
glVertexP2uiv v1 v2 = liftIO $ dyn125 ptr_glVertexP2uiv v1 v2
ptr_glVertexP2uiv :: FunPtr (GLenum -> Ptr GLuint -> IO ())
ptr_glVertexP2uiv = unsafePerformIO $ getCommand "glVertexP2uiv"
glVertexP3ui
:: MonadIO m
=> GLenum
-> GLuint
-> m ()
glVertexP3ui v1 v2 = liftIO $ dyn16 ptr_glVertexP3ui v1 v2
ptr_glVertexP3ui :: FunPtr (GLenum -> GLuint -> IO ())
ptr_glVertexP3ui = unsafePerformIO $ getCommand "glVertexP3ui"
glVertexP3uiv
:: MonadIO m
=> GLenum
-> Ptr GLuint
-> m ()
glVertexP3uiv v1 v2 = liftIO $ dyn125 ptr_glVertexP3uiv v1 v2
ptr_glVertexP3uiv :: FunPtr (GLenum -> Ptr GLuint -> IO ())
ptr_glVertexP3uiv = unsafePerformIO $ getCommand "glVertexP3uiv"
glVertexP4ui
:: MonadIO m
=> GLenum
-> GLuint
-> m ()
glVertexP4ui v1 v2 = liftIO $ dyn16 ptr_glVertexP4ui v1 v2
ptr_glVertexP4ui :: FunPtr (GLenum -> GLuint -> IO ())
ptr_glVertexP4ui = unsafePerformIO $ getCommand "glVertexP4ui"
glVertexP4uiv
:: MonadIO m
=> GLenum
-> Ptr GLuint
-> m ()
glVertexP4uiv v1 v2 = liftIO $ dyn125 ptr_glVertexP4uiv v1 v2
ptr_glVertexP4uiv :: FunPtr (GLenum -> Ptr GLuint -> IO ())
ptr_glVertexP4uiv = unsafePerformIO $ getCommand "glVertexP4uiv"
glVertexPointer
:: MonadIO m
=> GLint
-> GLenum
-> GLsizei
-> Ptr a
-> m ()
glVertexPointer v1 v2 v3 v4 = liftIO $ dyn126 ptr_glVertexPointer v1 v2 v3 v4
ptr_glVertexPointer :: FunPtr (GLint -> GLenum -> GLsizei -> Ptr a -> IO ())
ptr_glVertexPointer = unsafePerformIO $ getCommand "glVertexPointer"
glVertexPointerEXT
:: MonadIO m
=> GLint
-> GLenum
-> GLsizei
-> GLsizei
-> Ptr a
-> m ()
glVertexPointerEXT v1 v2 v3 v4 v5 = liftIO $ dyn127 ptr_glVertexPointerEXT v1 v2 v3 v4 v5
ptr_glVertexPointerEXT :: FunPtr (GLint -> GLenum -> GLsizei -> GLsizei -> Ptr a -> IO ())
ptr_glVertexPointerEXT = unsafePerformIO $ getCommand "glVertexPointerEXT"
glVertexPointerListIBM
:: MonadIO m
=> GLint
-> GLenum
-> GLint
-> Ptr (Ptr a)
-> GLint
-> m ()
glVertexPointerListIBM v1 v2 v3 v4 v5 = liftIO $ dyn128 ptr_glVertexPointerListIBM v1 v2 v3 v4 v5
ptr_glVertexPointerListIBM :: FunPtr (GLint -> GLenum -> GLint -> Ptr (Ptr a) -> GLint -> IO ())
ptr_glVertexPointerListIBM = unsafePerformIO $ getCommand "glVertexPointerListIBM"
glVertexPointervINTEL
:: MonadIO m
=> GLint
-> GLenum
-> Ptr (Ptr a)
-> m ()
glVertexPointervINTEL v1 v2 v3 = liftIO $ dyn129 ptr_glVertexPointervINTEL v1 v2 v3
ptr_glVertexPointervINTEL :: FunPtr (GLint -> GLenum -> Ptr (Ptr a) -> IO ())
ptr_glVertexPointervINTEL = unsafePerformIO $ getCommand "glVertexPointervINTEL"
glVertexStream1dATI
:: MonadIO m
=> GLenum
-> GLdouble
-> m ()
glVertexStream1dATI v1 v2 = liftIO $ dyn541 ptr_glVertexStream1dATI v1 v2
ptr_glVertexStream1dATI :: FunPtr (GLenum -> GLdouble -> IO ())
ptr_glVertexStream1dATI = unsafePerformIO $ getCommand "glVertexStream1dATI"
glVertexStream1dvATI
:: MonadIO m
=> GLenum
-> Ptr GLdouble
-> m ()
glVertexStream1dvATI v1 v2 = liftIO $ dyn93 ptr_glVertexStream1dvATI v1 v2
ptr_glVertexStream1dvATI :: FunPtr (GLenum -> Ptr GLdouble -> IO ())
ptr_glVertexStream1dvATI = unsafePerformIO $ getCommand "glVertexStream1dvATI"
glVertexStream1fATI
:: MonadIO m
=> GLenum
-> GLfloat
-> m ()
glVertexStream1fATI v1 v2 = liftIO $ dyn0 ptr_glVertexStream1fATI v1 v2
ptr_glVertexStream1fATI :: FunPtr (GLenum -> GLfloat -> IO ())
ptr_glVertexStream1fATI = unsafePerformIO $ getCommand "glVertexStream1fATI"
glVertexStream1fvATI
:: MonadIO m
=> GLenum
-> Ptr GLfloat
-> m ()
glVertexStream1fvATI v1 v2 = liftIO $ dyn94 ptr_glVertexStream1fvATI v1 v2
ptr_glVertexStream1fvATI :: FunPtr (GLenum -> Ptr GLfloat -> IO ())
ptr_glVertexStream1fvATI = unsafePerformIO $ getCommand "glVertexStream1fvATI"
glVertexStream1iATI
:: MonadIO m
=> GLenum
-> GLint
-> m ()
glVertexStream1iATI v1 v2 = liftIO $ dyn55 ptr_glVertexStream1iATI v1 v2
ptr_glVertexStream1iATI :: FunPtr (GLenum -> GLint -> IO ())
ptr_glVertexStream1iATI = unsafePerformIO $ getCommand "glVertexStream1iATI"
glVertexStream1ivATI
:: MonadIO m
=> GLenum
-> Ptr GLint
-> m ()
glVertexStream1ivATI v1 v2 = liftIO $ dyn136 ptr_glVertexStream1ivATI v1 v2
ptr_glVertexStream1ivATI :: FunPtr (GLenum -> Ptr GLint -> IO ())
ptr_glVertexStream1ivATI = unsafePerformIO $ getCommand "glVertexStream1ivATI"
glVertexStream1sATI
:: MonadIO m
=> GLenum
-> GLshort
-> m ()
glVertexStream1sATI v1 v2 = liftIO $ dyn544 ptr_glVertexStream1sATI v1 v2
ptr_glVertexStream1sATI :: FunPtr (GLenum -> GLshort -> IO ())
ptr_glVertexStream1sATI = unsafePerformIO $ getCommand "glVertexStream1sATI"
glVertexStream1svATI
:: MonadIO m
=> GLenum
-> Ptr GLshort
-> m ()
glVertexStream1svATI v1 v2 = liftIO $ dyn545 ptr_glVertexStream1svATI v1 v2
ptr_glVertexStream1svATI :: FunPtr (GLenum -> Ptr GLshort -> IO ())
ptr_glVertexStream1svATI = unsafePerformIO $ getCommand "glVertexStream1svATI"
glVertexStream2dATI
:: MonadIO m
=> GLenum
-> GLdouble
-> GLdouble
-> m ()
glVertexStream2dATI v1 v2 v3 = liftIO $ dyn547 ptr_glVertexStream2dATI v1 v2 v3
ptr_glVertexStream2dATI :: FunPtr (GLenum -> GLdouble -> GLdouble -> IO ())
ptr_glVertexStream2dATI = unsafePerformIO $ getCommand "glVertexStream2dATI"
glVertexStream2dvATI
:: MonadIO m
=> GLenum
-> Ptr GLdouble
-> m ()
glVertexStream2dvATI v1 v2 = liftIO $ dyn93 ptr_glVertexStream2dvATI v1 v2
ptr_glVertexStream2dvATI :: FunPtr (GLenum -> Ptr GLdouble -> IO ())
ptr_glVertexStream2dvATI = unsafePerformIO $ getCommand "glVertexStream2dvATI"
glVertexStream2fATI
:: MonadIO m
=> GLenum
-> GLfloat
-> GLfloat
-> m ()
glVertexStream2fATI v1 v2 v3 = liftIO $ dyn548 ptr_glVertexStream2fATI v1 v2 v3
ptr_glVertexStream2fATI :: FunPtr (GLenum -> GLfloat -> GLfloat -> IO ())
ptr_glVertexStream2fATI = unsafePerformIO $ getCommand "glVertexStream2fATI"
glVertexStream2fvATI
:: MonadIO m
=> GLenum
-> Ptr GLfloat
-> m ()
glVertexStream2fvATI v1 v2 = liftIO $ dyn94 ptr_glVertexStream2fvATI v1 v2
ptr_glVertexStream2fvATI :: FunPtr (GLenum -> Ptr GLfloat -> IO ())
ptr_glVertexStream2fvATI = unsafePerformIO $ getCommand "glVertexStream2fvATI"
glVertexStream2iATI
:: MonadIO m
=> GLenum
-> GLint
-> GLint
-> m ()
glVertexStream2iATI v1 v2 v3 = liftIO $ dyn264 ptr_glVertexStream2iATI v1 v2 v3
ptr_glVertexStream2iATI :: FunPtr (GLenum -> GLint -> GLint -> IO ())
ptr_glVertexStream2iATI = unsafePerformIO $ getCommand "glVertexStream2iATI"
glVertexStream2ivATI
:: MonadIO m
=> GLenum
-> Ptr GLint
-> m ()
glVertexStream2ivATI v1 v2 = liftIO $ dyn136 ptr_glVertexStream2ivATI v1 v2
ptr_glVertexStream2ivATI :: FunPtr (GLenum -> Ptr GLint -> IO ())
ptr_glVertexStream2ivATI = unsafePerformIO $ getCommand "glVertexStream2ivATI"
glVertexStream2sATI
:: MonadIO m
=> GLenum
-> GLshort
-> GLshort
-> m ()
glVertexStream2sATI v1 v2 v3 = liftIO $ dyn550 ptr_glVertexStream2sATI v1 v2 v3
ptr_glVertexStream2sATI :: FunPtr (GLenum -> GLshort -> GLshort -> IO ())
ptr_glVertexStream2sATI = unsafePerformIO $ getCommand "glVertexStream2sATI"
glVertexStream2svATI
:: MonadIO m
=> GLenum
-> Ptr GLshort
-> m ()
glVertexStream2svATI v1 v2 = liftIO $ dyn545 ptr_glVertexStream2svATI v1 v2
ptr_glVertexStream2svATI :: FunPtr (GLenum -> Ptr GLshort -> IO ())
ptr_glVertexStream2svATI = unsafePerformIO $ getCommand "glVertexStream2svATI"
glVertexStream3dATI
:: MonadIO m
=> GLenum
-> GLdouble
-> GLdouble
-> GLdouble
-> m ()
glVertexStream3dATI v1 v2 v3 v4 = liftIO $ dyn522 ptr_glVertexStream3dATI v1 v2 v3 v4
ptr_glVertexStream3dATI :: FunPtr (GLenum -> GLdouble -> GLdouble -> GLdouble -> IO ())
ptr_glVertexStream3dATI = unsafePerformIO $ getCommand "glVertexStream3dATI"
glVertexStream3dvATI
:: MonadIO m
=> GLenum
-> Ptr GLdouble
-> m ()
glVertexStream3dvATI v1 v2 = liftIO $ dyn93 ptr_glVertexStream3dvATI v1 v2
ptr_glVertexStream3dvATI :: FunPtr (GLenum -> Ptr GLdouble -> IO ())
ptr_glVertexStream3dvATI = unsafePerformIO $ getCommand "glVertexStream3dvATI"
glVertexStream3fATI
:: MonadIO m
=> GLenum
-> GLfloat
-> GLfloat
-> GLfloat
-> m ()
glVertexStream3fATI v1 v2 v3 v4 = liftIO $ dyn523 ptr_glVertexStream3fATI v1 v2 v3 v4
ptr_glVertexStream3fATI :: FunPtr (GLenum -> GLfloat -> GLfloat -> GLfloat -> IO ())
ptr_glVertexStream3fATI = unsafePerformIO $ getCommand "glVertexStream3fATI"
glVertexStream3fvATI
:: MonadIO m
=> GLenum
-> Ptr GLfloat
-> m ()
glVertexStream3fvATI v1 v2 = liftIO $ dyn94 ptr_glVertexStream3fvATI v1 v2
ptr_glVertexStream3fvATI :: FunPtr (GLenum -> Ptr GLfloat -> IO ())
ptr_glVertexStream3fvATI = unsafePerformIO $ getCommand "glVertexStream3fvATI"
glVertexStream3iATI
:: MonadIO m
=> GLenum
-> GLint
-> GLint
-> GLint
-> m ()
glVertexStream3iATI v1 v2 v3 v4 = liftIO $ dyn554 ptr_glVertexStream3iATI v1 v2 v3 v4
ptr_glVertexStream3iATI :: FunPtr (GLenum -> GLint -> GLint -> GLint -> IO ())
ptr_glVertexStream3iATI = unsafePerformIO $ getCommand "glVertexStream3iATI"
glVertexStream3ivATI
:: MonadIO m
=> GLenum
-> Ptr GLint
-> m ()
glVertexStream3ivATI v1 v2 = liftIO $ dyn136 ptr_glVertexStream3ivATI v1 v2
ptr_glVertexStream3ivATI :: FunPtr (GLenum -> Ptr GLint -> IO ())
ptr_glVertexStream3ivATI = unsafePerformIO $ getCommand "glVertexStream3ivATI"
glVertexStream3sATI
:: MonadIO m
=> GLenum
-> GLshort
-> GLshort
-> GLshort
-> m ()
glVertexStream3sATI v1 v2 v3 v4 = liftIO $ dyn555 ptr_glVertexStream3sATI v1 v2 v3 v4
ptr_glVertexStream3sATI :: FunPtr (GLenum -> GLshort -> GLshort -> GLshort -> IO ())
ptr_glVertexStream3sATI = unsafePerformIO $ getCommand "glVertexStream3sATI"
glVertexStream3svATI
:: MonadIO m
=> GLenum
-> Ptr GLshort
-> m ()
glVertexStream3svATI v1 v2 = liftIO $ dyn545 ptr_glVertexStream3svATI v1 v2
ptr_glVertexStream3svATI :: FunPtr (GLenum -> Ptr GLshort -> IO ())
ptr_glVertexStream3svATI = unsafePerformIO $ getCommand "glVertexStream3svATI"
glVertexStream4dATI
:: MonadIO m
=> GLenum
-> GLdouble
-> GLdouble
-> GLdouble
-> GLdouble
-> m ()
glVertexStream4dATI v1 v2 v3 v4 v5 = liftIO $ dyn520 ptr_glVertexStream4dATI v1 v2 v3 v4 v5
ptr_glVertexStream4dATI :: FunPtr (GLenum -> GLdouble -> GLdouble -> GLdouble -> GLdouble -> IO ())
ptr_glVertexStream4dATI = unsafePerformIO $ getCommand "glVertexStream4dATI"
glVertexStream4dvATI
:: MonadIO m
=> GLenum
-> Ptr GLdouble
-> m ()
glVertexStream4dvATI v1 v2 = liftIO $ dyn93 ptr_glVertexStream4dvATI v1 v2
ptr_glVertexStream4dvATI :: FunPtr (GLenum -> Ptr GLdouble -> IO ())
ptr_glVertexStream4dvATI = unsafePerformIO $ getCommand "glVertexStream4dvATI"
glVertexStream4fATI
:: MonadIO m
=> GLenum
-> GLfloat
-> GLfloat
-> GLfloat
-> GLfloat
-> m ()
glVertexStream4fATI v1 v2 v3 v4 v5 = liftIO $ dyn521 ptr_glVertexStream4fATI v1 v2 v3 v4 v5
ptr_glVertexStream4fATI :: FunPtr (GLenum -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> IO ())
ptr_glVertexStream4fATI = unsafePerformIO $ getCommand "glVertexStream4fATI"
glVertexStream4fvATI
:: MonadIO m
=> GLenum
-> Ptr GLfloat
-> m ()
glVertexStream4fvATI v1 v2 = liftIO $ dyn94 ptr_glVertexStream4fvATI v1 v2
ptr_glVertexStream4fvATI :: FunPtr (GLenum -> Ptr GLfloat -> IO ())
ptr_glVertexStream4fvATI = unsafePerformIO $ getCommand "glVertexStream4fvATI"
glVertexStream4iATI
:: MonadIO m
=> GLenum
-> GLint
-> GLint
-> GLint
-> GLint
-> m ()
glVertexStream4iATI v1 v2 v3 v4 v5 = liftIO $ dyn265 ptr_glVertexStream4iATI v1 v2 v3 v4 v5
ptr_glVertexStream4iATI :: FunPtr (GLenum -> GLint -> GLint -> GLint -> GLint -> IO ())
ptr_glVertexStream4iATI = unsafePerformIO $ getCommand "glVertexStream4iATI"
glVertexStream4ivATI
:: MonadIO m
=> GLenum
-> Ptr GLint
-> m ()
glVertexStream4ivATI v1 v2 = liftIO $ dyn136 ptr_glVertexStream4ivATI v1 v2
ptr_glVertexStream4ivATI :: FunPtr (GLenum -> Ptr GLint -> IO ())
ptr_glVertexStream4ivATI = unsafePerformIO $ getCommand "glVertexStream4ivATI"
glVertexStream4sATI
:: MonadIO m
=> GLenum
-> GLshort
-> GLshort
-> GLshort
-> GLshort
-> m ()
glVertexStream4sATI v1 v2 v3 v4 v5 = liftIO $ dyn559 ptr_glVertexStream4sATI v1 v2 v3 v4 v5
ptr_glVertexStream4sATI :: FunPtr (GLenum -> GLshort -> GLshort -> GLshort -> GLshort -> IO ())
ptr_glVertexStream4sATI = unsafePerformIO $ getCommand "glVertexStream4sATI"
glVertexStream4svATI
:: MonadIO m
=> GLenum
-> Ptr GLshort
-> m ()
glVertexStream4svATI v1 v2 = liftIO $ dyn545 ptr_glVertexStream4svATI v1 v2
ptr_glVertexStream4svATI :: FunPtr (GLenum -> Ptr GLshort -> IO ())
ptr_glVertexStream4svATI = unsafePerformIO $ getCommand "glVertexStream4svATI"
glVertexWeightPointerEXT
:: MonadIO m
=> GLint
-> GLenum
-> GLsizei
-> Ptr a
-> m ()
glVertexWeightPointerEXT v1 v2 v3 v4 = liftIO $ dyn126 ptr_glVertexWeightPointerEXT v1 v2 v3 v4
ptr_glVertexWeightPointerEXT :: FunPtr (GLint -> GLenum -> GLsizei -> Ptr a -> IO ())
ptr_glVertexWeightPointerEXT = unsafePerformIO $ getCommand "glVertexWeightPointerEXT"
glVertexWeightfEXT
:: MonadIO m
=> GLfloat
-> m ()
glVertexWeightfEXT v1 = liftIO $ dyn79 ptr_glVertexWeightfEXT v1
ptr_glVertexWeightfEXT :: FunPtr (GLfloat -> IO ())
ptr_glVertexWeightfEXT = unsafePerformIO $ getCommand "glVertexWeightfEXT"
glVertexWeightfvEXT
:: MonadIO m
=> Ptr GLfloat
-> m ()
glVertexWeightfvEXT v1 = liftIO $ dyn41 ptr_glVertexWeightfvEXT v1
ptr_glVertexWeightfvEXT :: FunPtr (Ptr GLfloat -> IO ())
ptr_glVertexWeightfvEXT = unsafePerformIO $ getCommand "glVertexWeightfvEXT"
glVertexWeighthNV
:: MonadIO m
=> GLhalfNV
-> m ()
glVertexWeighthNV v1 = liftIO $ dyn281 ptr_glVertexWeighthNV v1
ptr_glVertexWeighthNV :: FunPtr (GLhalfNV -> IO ())
ptr_glVertexWeighthNV = unsafePerformIO $ getCommand "glVertexWeighthNV"
glVertexWeighthvNV
:: MonadIO m
=> Ptr GLhalfNV
-> m ()
glVertexWeighthvNV v1 = liftIO $ dyn99 ptr_glVertexWeighthvNV v1
ptr_glVertexWeighthvNV :: FunPtr (Ptr GLhalfNV -> IO ())
ptr_glVertexWeighthvNV = unsafePerformIO $ getCommand "glVertexWeighthvNV"
glVideoCaptureNV
:: MonadIO m
=> GLuint
-> Ptr GLuint
-> Ptr GLuint64EXT
-> m GLenum
glVideoCaptureNV v1 v2 v3 = liftIO $ dyn879 ptr_glVideoCaptureNV v1 v2 v3
ptr_glVideoCaptureNV :: FunPtr (GLuint -> Ptr GLuint -> Ptr GLuint64EXT -> IO GLenum)
ptr_glVideoCaptureNV = unsafePerformIO $ getCommand "glVideoCaptureNV"
glVideoCaptureStreamParameterdvNV
:: MonadIO m
=> GLuint
-> GLuint
-> GLenum
-> Ptr GLdouble
-> m ()
glVideoCaptureStreamParameterdvNV v1 v2 v3 v4 = liftIO $ dyn444 ptr_glVideoCaptureStreamParameterdvNV v1 v2 v3 v4
ptr_glVideoCaptureStreamParameterdvNV :: FunPtr (GLuint -> GLuint -> GLenum -> Ptr GLdouble -> IO ())
ptr_glVideoCaptureStreamParameterdvNV = unsafePerformIO $ getCommand "glVideoCaptureStreamParameterdvNV"
glVideoCaptureStreamParameterfvNV
:: MonadIO m
=> GLuint
-> GLuint
-> GLenum
-> Ptr GLfloat
-> m ()
glVideoCaptureStreamParameterfvNV v1 v2 v3 v4 = liftIO $ dyn445 ptr_glVideoCaptureStreamParameterfvNV v1 v2 v3 v4
ptr_glVideoCaptureStreamParameterfvNV :: FunPtr (GLuint -> GLuint -> GLenum -> Ptr GLfloat -> IO ())
ptr_glVideoCaptureStreamParameterfvNV = unsafePerformIO $ getCommand "glVideoCaptureStreamParameterfvNV"
glVideoCaptureStreamParameterivNV
:: MonadIO m
=> GLuint
-> GLuint
-> GLenum
-> Ptr GLint
-> m ()
glVideoCaptureStreamParameterivNV v1 v2 v3 v4 = liftIO $ dyn300 ptr_glVideoCaptureStreamParameterivNV v1 v2 v3 v4
ptr_glVideoCaptureStreamParameterivNV :: FunPtr (GLuint -> GLuint -> GLenum -> Ptr GLint -> IO ())
ptr_glVideoCaptureStreamParameterivNV = unsafePerformIO $ getCommand "glVideoCaptureStreamParameterivNV"
glViewport
:: MonadIO m
=> GLint
-> GLint
-> GLsizei
-> GLsizei
-> m ()
glViewport v1 v2 v3 v4 = liftIO $ dyn698 ptr_glViewport v1 v2 v3 v4
ptr_glViewport :: FunPtr (GLint -> GLint -> GLsizei -> GLsizei -> IO ())
ptr_glViewport = unsafePerformIO $ getCommand "glViewport"
glViewportArrayv
:: MonadIO m
=> GLuint
-> GLsizei
-> Ptr GLfloat
-> m ()
glViewportArrayv v1 v2 v3 = liftIO $ dyn218 ptr_glViewportArrayv v1 v2 v3
ptr_glViewportArrayv :: FunPtr (GLuint -> GLsizei -> Ptr GLfloat -> IO ())
ptr_glViewportArrayv = unsafePerformIO $ getCommand "glViewportArrayv"
glViewportArrayvNV
:: MonadIO m
=> GLuint
-> GLsizei
-> Ptr GLfloat
-> m ()
glViewportArrayvNV v1 v2 v3 = liftIO $ dyn218 ptr_glViewportArrayvNV v1 v2 v3
ptr_glViewportArrayvNV :: FunPtr (GLuint -> GLsizei -> Ptr GLfloat -> IO ())
ptr_glViewportArrayvNV = unsafePerformIO $ getCommand "glViewportArrayvNV"
glViewportArrayvOES
:: MonadIO m
=> GLuint
-> GLsizei
-> Ptr GLfloat
-> m ()
glViewportArrayvOES v1 v2 v3 = liftIO $ dyn218 ptr_glViewportArrayvOES v1 v2 v3
ptr_glViewportArrayvOES :: FunPtr (GLuint -> GLsizei -> Ptr GLfloat -> IO ())
ptr_glViewportArrayvOES = unsafePerformIO $ getCommand "glViewportArrayvOES"
glViewportIndexedf
:: MonadIO m
=> GLuint
-> GLfloat
-> GLfloat
-> GLfloat
-> GLfloat
-> m ()
glViewportIndexedf v1 v2 v3 v4 v5 = liftIO $ dyn853 ptr_glViewportIndexedf v1 v2 v3 v4 v5
ptr_glViewportIndexedf :: FunPtr (GLuint -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> IO ())
ptr_glViewportIndexedf = unsafePerformIO $ getCommand "glViewportIndexedf"
glViewportIndexedfNV
:: MonadIO m
=> GLuint
-> GLfloat
-> GLfloat
-> GLfloat
-> GLfloat
-> m ()
glViewportIndexedfNV v1 v2 v3 v4 v5 = liftIO $ dyn853 ptr_glViewportIndexedfNV v1 v2 v3 v4 v5
ptr_glViewportIndexedfNV :: FunPtr (GLuint -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> IO ())
ptr_glViewportIndexedfNV = unsafePerformIO $ getCommand "glViewportIndexedfNV"
glViewportIndexedfOES
:: MonadIO m
=> GLuint
-> GLfloat
-> GLfloat
-> GLfloat
-> GLfloat
-> m ()
glViewportIndexedfOES v1 v2 v3 v4 v5 = liftIO $ dyn853 ptr_glViewportIndexedfOES v1 v2 v3 v4 v5
ptr_glViewportIndexedfOES :: FunPtr (GLuint -> GLfloat -> GLfloat -> GLfloat -> GLfloat -> IO ())
ptr_glViewportIndexedfOES = unsafePerformIO $ getCommand "glViewportIndexedfOES"
glViewportIndexedfv
:: MonadIO m
=> GLuint
-> Ptr GLfloat
-> m ()
glViewportIndexedfv v1 v2 = liftIO $ dyn377 ptr_glViewportIndexedfv v1 v2
ptr_glViewportIndexedfv :: FunPtr (GLuint -> Ptr GLfloat -> IO ())
ptr_glViewportIndexedfv = unsafePerformIO $ getCommand "glViewportIndexedfv"
glViewportIndexedfvNV
:: MonadIO m
=> GLuint
-> Ptr GLfloat
-> m ()
glViewportIndexedfvNV v1 v2 = liftIO $ dyn377 ptr_glViewportIndexedfvNV v1 v2
ptr_glViewportIndexedfvNV :: FunPtr (GLuint -> Ptr GLfloat -> IO ())
ptr_glViewportIndexedfvNV = unsafePerformIO $ getCommand "glViewportIndexedfvNV"
glViewportIndexedfvOES
:: MonadIO m
=> GLuint
-> Ptr GLfloat
-> m ()
glViewportIndexedfvOES v1 v2 = liftIO $ dyn377 ptr_glViewportIndexedfvOES v1 v2
ptr_glViewportIndexedfvOES :: FunPtr (GLuint -> Ptr GLfloat -> IO ())
ptr_glViewportIndexedfvOES = unsafePerformIO $ getCommand "glViewportIndexedfvOES"
glViewportPositionWScaleNV
:: MonadIO m
=> GLuint
-> GLfloat
-> GLfloat
-> m ()
glViewportPositionWScaleNV v1 v2 v3 = liftIO $ dyn221 ptr_glViewportPositionWScaleNV v1 v2 v3
ptr_glViewportPositionWScaleNV :: FunPtr (GLuint -> GLfloat -> GLfloat -> IO ())
ptr_glViewportPositionWScaleNV = unsafePerformIO $ getCommand "glViewportPositionWScaleNV"
glViewportSwizzleNV
:: MonadIO m
=> GLuint
-> GLenum
-> GLenum
-> GLenum
-> GLenum
-> m ()
glViewportSwizzleNV v1 v2 v3 v4 v5 = liftIO $ dyn54 ptr_glViewportSwizzleNV v1 v2 v3 v4 v5
ptr_glViewportSwizzleNV :: FunPtr (GLuint -> GLenum -> GLenum -> GLenum -> GLenum -> IO ())
ptr_glViewportSwizzleNV = unsafePerformIO $ getCommand "glViewportSwizzleNV"
glWaitSync
:: MonadIO m
=> GLsync
-> GLbitfield
-> GLuint64
-> m ()
glWaitSync v1 v2 v3 = liftIO $ dyn880 ptr_glWaitSync v1 v2 v3
ptr_glWaitSync :: FunPtr (GLsync -> GLbitfield -> GLuint64 -> IO ())
ptr_glWaitSync = unsafePerformIO $ getCommand "glWaitSync"
glWaitSyncAPPLE
:: MonadIO m
=> GLsync
-> GLbitfield
-> GLuint64
-> m ()
glWaitSyncAPPLE v1 v2 v3 = liftIO $ dyn880 ptr_glWaitSyncAPPLE v1 v2 v3
ptr_glWaitSyncAPPLE :: FunPtr (GLsync -> GLbitfield -> GLuint64 -> IO ())
ptr_glWaitSyncAPPLE = unsafePerformIO $ getCommand "glWaitSyncAPPLE"
glWeightPathsNV
:: MonadIO m
=> GLuint
-> GLsizei
-> Ptr GLuint
-> Ptr GLfloat
-> m ()
glWeightPathsNV v1 v2 v3 v4 = liftIO $ dyn881 ptr_glWeightPathsNV v1 v2 v3 v4
ptr_glWeightPathsNV :: FunPtr (GLuint -> GLsizei -> Ptr GLuint -> Ptr GLfloat -> IO ())
ptr_glWeightPathsNV = unsafePerformIO $ getCommand "glWeightPathsNV"
glWeightPointerARB
:: MonadIO m
=> GLint
-> GLenum
-> GLsizei
-> Ptr a
-> m ()
glWeightPointerARB v1 v2 v3 v4 = liftIO $ dyn126 ptr_glWeightPointerARB v1 v2 v3 v4
ptr_glWeightPointerARB :: FunPtr (GLint -> GLenum -> GLsizei -> Ptr a -> IO ())
ptr_glWeightPointerARB = unsafePerformIO $ getCommand "glWeightPointerARB"
glWeightPointerOES
:: MonadIO m
=> GLint
-> GLenum
-> GLsizei
-> Ptr a
-> m ()
glWeightPointerOES v1 v2 v3 v4 = liftIO $ dyn126 ptr_glWeightPointerOES v1 v2 v3 v4
ptr_glWeightPointerOES :: FunPtr (GLint -> GLenum -> GLsizei -> Ptr a -> IO ())
ptr_glWeightPointerOES = unsafePerformIO $ getCommand "glWeightPointerOES"
glWeightbvARB
:: MonadIO m
=> GLint
-> Ptr GLbyte
-> m ()
glWeightbvARB v1 v2 = liftIO $ dyn882 ptr_glWeightbvARB v1 v2
ptr_glWeightbvARB :: FunPtr (GLint -> Ptr GLbyte -> IO ())
ptr_glWeightbvARB = unsafePerformIO $ getCommand "glWeightbvARB"
glWeightdvARB
:: MonadIO m
=> GLint
-> Ptr GLdouble
-> m ()
glWeightdvARB v1 v2 = liftIO $ dyn883 ptr_glWeightdvARB v1 v2
ptr_glWeightdvARB :: FunPtr (GLint -> Ptr GLdouble -> IO ())
ptr_glWeightdvARB = unsafePerformIO $ getCommand "glWeightdvARB"
glWeightfvARB
:: MonadIO m
=> GLint
-> Ptr GLfloat
-> m ()
glWeightfvARB v1 v2 = liftIO $ dyn884 ptr_glWeightfvARB v1 v2
ptr_glWeightfvARB :: FunPtr (GLint -> Ptr GLfloat -> IO ())
ptr_glWeightfvARB = unsafePerformIO $ getCommand "glWeightfvARB"
glWeightivARB
:: MonadIO m
=> GLint
-> Ptr GLint
-> m ()
glWeightivARB v1 v2 = liftIO $ dyn885 ptr_glWeightivARB v1 v2
ptr_glWeightivARB :: FunPtr (GLint -> Ptr GLint -> IO ())
ptr_glWeightivARB = unsafePerformIO $ getCommand "glWeightivARB"
glWeightsvARB
:: MonadIO m
=> GLint
-> Ptr GLshort
-> m ()
glWeightsvARB v1 v2 = liftIO $ dyn886 ptr_glWeightsvARB v1 v2
ptr_glWeightsvARB :: FunPtr (GLint -> Ptr GLshort -> IO ())
ptr_glWeightsvARB = unsafePerformIO $ getCommand "glWeightsvARB"
glWeightubvARB
:: MonadIO m
=> GLint
-> Ptr GLubyte
-> m ()
glWeightubvARB v1 v2 = liftIO $ dyn517 ptr_glWeightubvARB v1 v2
ptr_glWeightubvARB :: FunPtr (GLint -> Ptr GLubyte -> IO ())
ptr_glWeightubvARB = unsafePerformIO $ getCommand "glWeightubvARB"
glWeightuivARB
:: MonadIO m
=> GLint
-> Ptr GLuint
-> m ()
glWeightuivARB v1 v2 = liftIO $ dyn518 ptr_glWeightuivARB v1 v2
ptr_glWeightuivARB :: FunPtr (GLint -> Ptr GLuint -> IO ())
ptr_glWeightuivARB = unsafePerformIO $ getCommand "glWeightuivARB"
glWeightusvARB
:: MonadIO m
=> GLint
-> Ptr GLushort
-> m ()
glWeightusvARB v1 v2 = liftIO $ dyn519 ptr_glWeightusvARB v1 v2
ptr_glWeightusvARB :: FunPtr (GLint -> Ptr GLushort -> IO ())
ptr_glWeightusvARB = unsafePerformIO $ getCommand "glWeightusvARB"
glWindowPos2d
:: MonadIO m
=> GLdouble
-> GLdouble
-> m ()
glWindowPos2d v1 v2 = liftIO $ dyn217 ptr_glWindowPos2d v1 v2
ptr_glWindowPos2d :: FunPtr (GLdouble -> GLdouble -> IO ())
ptr_glWindowPos2d = unsafePerformIO $ getCommand "glWindowPos2d"
glWindowPos2dARB
:: MonadIO m
=> GLdouble
-> GLdouble
-> m ()
glWindowPos2dARB v1 v2 = liftIO $ dyn217 ptr_glWindowPos2dARB v1 v2
ptr_glWindowPos2dARB :: FunPtr (GLdouble -> GLdouble -> IO ())
ptr_glWindowPos2dARB = unsafePerformIO $ getCommand "glWindowPos2dARB"
glWindowPos2dMESA
:: MonadIO m
=> GLdouble
-> GLdouble
-> m ()
glWindowPos2dMESA v1 v2 = liftIO $ dyn217 ptr_glWindowPos2dMESA v1 v2
ptr_glWindowPos2dMESA :: FunPtr (GLdouble -> GLdouble -> IO ())
ptr_glWindowPos2dMESA = unsafePerformIO $ getCommand "glWindowPos2dMESA"
glWindowPos2dv
:: MonadIO m
=> Ptr GLdouble
-> m ()
glWindowPos2dv v1 = liftIO $ dyn39 ptr_glWindowPos2dv v1
ptr_glWindowPos2dv :: FunPtr (Ptr GLdouble -> IO ())
ptr_glWindowPos2dv = unsafePerformIO $ getCommand "glWindowPos2dv"
glWindowPos2dvARB
:: MonadIO m
=> Ptr GLdouble
-> m ()
glWindowPos2dvARB v1 = liftIO $ dyn39 ptr_glWindowPos2dvARB v1
ptr_glWindowPos2dvARB :: FunPtr (Ptr GLdouble -> IO ())
ptr_glWindowPos2dvARB = unsafePerformIO $ getCommand "glWindowPos2dvARB"
glWindowPos2dvMESA
:: MonadIO m
=> Ptr GLdouble
-> m ()
glWindowPos2dvMESA v1 = liftIO $ dyn39 ptr_glWindowPos2dvMESA v1
ptr_glWindowPos2dvMESA :: FunPtr (Ptr GLdouble -> IO ())
ptr_glWindowPos2dvMESA = unsafePerformIO $ getCommand "glWindowPos2dvMESA"
glWindowPos2f
:: MonadIO m
=> GLfloat
-> GLfloat
-> m ()
glWindowPos2f v1 v2 = liftIO $ dyn222 ptr_glWindowPos2f v1 v2
ptr_glWindowPos2f :: FunPtr (GLfloat -> GLfloat -> IO ())
ptr_glWindowPos2f = unsafePerformIO $ getCommand "glWindowPos2f"
glWindowPos2fARB
:: MonadIO m
=> GLfloat
-> GLfloat
-> m ()
glWindowPos2fARB v1 v2 = liftIO $ dyn222 ptr_glWindowPos2fARB v1 v2
ptr_glWindowPos2fARB :: FunPtr (GLfloat -> GLfloat -> IO ())
ptr_glWindowPos2fARB = unsafePerformIO $ getCommand "glWindowPos2fARB"
glWindowPos2fMESA
:: MonadIO m
=> GLfloat
-> GLfloat
-> m ()
glWindowPos2fMESA v1 v2 = liftIO $ dyn222 ptr_glWindowPos2fMESA v1 v2
ptr_glWindowPos2fMESA :: FunPtr (GLfloat -> GLfloat -> IO ())
ptr_glWindowPos2fMESA = unsafePerformIO $ getCommand "glWindowPos2fMESA"