{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.NV.NonSquareMatrices (
gl_NV_non_square_matrices
, glUniformMatrix2x3fvNV
, glUniformMatrix2x4fvNV
, glUniformMatrix3x2fvNV
, glUniformMatrix3x4fvNV
, glUniformMatrix4x2fvNV
, glUniformMatrix4x3fvNV
, pattern GL_FLOAT_MAT2x3_NV
, pattern GL_FLOAT_MAT2x4_NV
, pattern GL_FLOAT_MAT3x2_NV
, pattern GL_FLOAT_MAT3x4_NV
, pattern GL_FLOAT_MAT4x2_NV
, pattern GL_FLOAT_MAT4x3_NV
) 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
gl_NV_non_square_matrices :: Bool
gl_NV_non_square_matrices :: Bool
gl_NV_non_square_matrices = String -> Set String -> Bool
forall a. Ord a => a -> Set a -> Bool
member String
"GL_NV_non_square_matrices" Set String
extensions
{-# NOINLINE gl_NV_non_square_matrices #-}
glUniformMatrix2x3fvNV :: MonadIO m => GLint -> GLsizei -> GLboolean -> Ptr GLfloat -> m ()
glUniformMatrix2x3fvNV :: forall (m :: * -> *).
MonadIO m =>
GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
glUniformMatrix2x3fvNV = FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
-> GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
-> GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
ffiintsizeibooleanPtrfloatIOV FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix2x3fvNVFunPtr
glUniformMatrix2x3fvNVFunPtr :: FunPtr (GLint -> GLsizei -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix2x3fvNVFunPtr :: FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix2x3fvNVFunPtr = IO (FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ()))
-> FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
forall a. IO a -> a
unsafePerformIO (String
-> IO
(FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ()))
forall a. String -> IO (FunPtr a)
getProcAddress String
"glUniformMatrix2x3fvNV")
{-# NOINLINE glUniformMatrix2x3fvNVFunPtr #-}
glUniformMatrix2x4fvNV :: MonadIO m => GLint -> GLsizei -> GLboolean -> Ptr GLfloat -> m ()
glUniformMatrix2x4fvNV :: forall (m :: * -> *).
MonadIO m =>
GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
glUniformMatrix2x4fvNV = FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
-> GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
-> GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
ffiintsizeibooleanPtrfloatIOV FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix2x4fvNVFunPtr
glUniformMatrix2x4fvNVFunPtr :: FunPtr (GLint -> GLsizei -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix2x4fvNVFunPtr :: FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix2x4fvNVFunPtr = IO (FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ()))
-> FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
forall a. IO a -> a
unsafePerformIO (String
-> IO
(FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ()))
forall a. String -> IO (FunPtr a)
getProcAddress String
"glUniformMatrix2x4fvNV")
{-# NOINLINE glUniformMatrix2x4fvNVFunPtr #-}
glUniformMatrix3x2fvNV :: MonadIO m => GLint -> GLsizei -> GLboolean -> Ptr GLfloat -> m ()
glUniformMatrix3x2fvNV :: forall (m :: * -> *).
MonadIO m =>
GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
glUniformMatrix3x2fvNV = FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
-> GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
-> GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
ffiintsizeibooleanPtrfloatIOV FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix3x2fvNVFunPtr
glUniformMatrix3x2fvNVFunPtr :: FunPtr (GLint -> GLsizei -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix3x2fvNVFunPtr :: FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix3x2fvNVFunPtr = IO (FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ()))
-> FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
forall a. IO a -> a
unsafePerformIO (String
-> IO
(FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ()))
forall a. String -> IO (FunPtr a)
getProcAddress String
"glUniformMatrix3x2fvNV")
{-# NOINLINE glUniformMatrix3x2fvNVFunPtr #-}
glUniformMatrix3x4fvNV :: MonadIO m => GLint -> GLsizei -> GLboolean -> Ptr GLfloat -> m ()
glUniformMatrix3x4fvNV :: forall (m :: * -> *).
MonadIO m =>
GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
glUniformMatrix3x4fvNV = FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
-> GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
-> GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
ffiintsizeibooleanPtrfloatIOV FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix3x4fvNVFunPtr
glUniformMatrix3x4fvNVFunPtr :: FunPtr (GLint -> GLsizei -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix3x4fvNVFunPtr :: FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix3x4fvNVFunPtr = IO (FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ()))
-> FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
forall a. IO a -> a
unsafePerformIO (String
-> IO
(FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ()))
forall a. String -> IO (FunPtr a)
getProcAddress String
"glUniformMatrix3x4fvNV")
{-# NOINLINE glUniformMatrix3x4fvNVFunPtr #-}
glUniformMatrix4x2fvNV :: MonadIO m => GLint -> GLsizei -> GLboolean -> Ptr GLfloat -> m ()
glUniformMatrix4x2fvNV :: forall (m :: * -> *).
MonadIO m =>
GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
glUniformMatrix4x2fvNV = FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
-> GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
-> GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
ffiintsizeibooleanPtrfloatIOV FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix4x2fvNVFunPtr
glUniformMatrix4x2fvNVFunPtr :: FunPtr (GLint -> GLsizei -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix4x2fvNVFunPtr :: FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix4x2fvNVFunPtr = IO (FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ()))
-> FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
forall a. IO a -> a
unsafePerformIO (String
-> IO
(FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ()))
forall a. String -> IO (FunPtr a)
getProcAddress String
"glUniformMatrix4x2fvNV")
{-# NOINLINE glUniformMatrix4x2fvNVFunPtr #-}
glUniformMatrix4x3fvNV :: MonadIO m => GLint -> GLsizei -> GLboolean -> Ptr GLfloat -> m ()
glUniformMatrix4x3fvNV :: forall (m :: * -> *).
MonadIO m =>
GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
glUniformMatrix4x3fvNV = FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
-> GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
-> GLint -> GLint -> GLboolean -> Ptr GLfloat -> m ()
ffiintsizeibooleanPtrfloatIOV FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix4x3fvNVFunPtr
glUniformMatrix4x3fvNVFunPtr :: FunPtr (GLint -> GLsizei -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix4x3fvNVFunPtr :: FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
glUniformMatrix4x3fvNVFunPtr = IO (FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ()))
-> FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ())
forall a. IO a -> a
unsafePerformIO (String
-> IO
(FunPtr (GLint -> GLint -> GLboolean -> Ptr GLfloat -> IO ()))
forall a. String -> IO (FunPtr a)
getProcAddress String
"glUniformMatrix4x3fvNV")
{-# NOINLINE glUniformMatrix4x3fvNVFunPtr #-}
pattern GL_FLOAT_MAT2x3_NV :: (Eq a, Num a) => a
pattern $mGL_FLOAT_MAT2x3_NV :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_FLOAT_MAT2x3_NV :: forall a. (Eq a, Num a) => a
GL_FLOAT_MAT2x3_NV = 0x8B65
pattern GL_FLOAT_MAT2x4_NV :: (Eq a, Num a) => a
pattern $mGL_FLOAT_MAT2x4_NV :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_FLOAT_MAT2x4_NV :: forall a. (Eq a, Num a) => a
GL_FLOAT_MAT2x4_NV = 0x8B66
pattern GL_FLOAT_MAT3x2_NV :: (Eq a, Num a) => a
pattern $mGL_FLOAT_MAT3x2_NV :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_FLOAT_MAT3x2_NV :: forall a. (Eq a, Num a) => a
GL_FLOAT_MAT3x2_NV = 0x8B67
pattern GL_FLOAT_MAT3x4_NV :: (Eq a, Num a) => a
pattern $mGL_FLOAT_MAT3x4_NV :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_FLOAT_MAT3x4_NV :: forall a. (Eq a, Num a) => a
GL_FLOAT_MAT3x4_NV = 0x8B68
pattern GL_FLOAT_MAT4x2_NV :: (Eq a, Num a) => a
pattern $mGL_FLOAT_MAT4x2_NV :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_FLOAT_MAT4x2_NV :: forall a. (Eq a, Num a) => a
GL_FLOAT_MAT4x2_NV = 0x8B69
pattern GL_FLOAT_MAT4x3_NV :: (Eq a, Num a) => a
pattern $mGL_FLOAT_MAT4x3_NV :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_FLOAT_MAT4x3_NV :: forall a. (Eq a, Num a) => a
GL_FLOAT_MAT4x3_NV = 0x8B6A