-- This file was automatically generated.
{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.SGIS.Multisample (
  -- * Extension Support
    gl_SGIS_multisample

  -- * GL_SGIS_multisample
  , glSampleMaskSGIS
  , glSamplePatternSGIS
  , pattern GL_1PASS_SGIS
  , pattern GL_2PASS_0_SGIS
  , pattern GL_2PASS_1_SGIS
  , pattern GL_4PASS_0_SGIS
  , pattern GL_4PASS_1_SGIS
  , pattern GL_4PASS_2_SGIS
  , pattern GL_4PASS_3_SGIS
  , pattern GL_MULTISAMPLE_SGIS
  , pattern GL_SAMPLES_SGIS
  , pattern GL_SAMPLE_ALPHA_TO_MASK_SGIS
  , pattern GL_SAMPLE_ALPHA_TO_ONE_SGIS
  , pattern GL_SAMPLE_BUFFERS_SGIS
  , pattern GL_SAMPLE_MASK_INVERT_SGIS
  , pattern GL_SAMPLE_MASK_SGIS
  , pattern GL_SAMPLE_MASK_VALUE_SGIS
  , pattern GL_SAMPLE_PATTERN_SGIS
) 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/SGIS/multisample.txt GL_SGIS_multisample> extension is available.

gl_SGIS_multisample :: Bool
gl_SGIS_multisample :: Bool
gl_SGIS_multisample = String -> Set String -> Bool
forall a. Ord a => a -> Set a -> Bool
member String
"GL_SGIS_multisample" Set String
extensions
{-# NOINLINE gl_SGIS_multisample #-}

-- | Usage: @'glSampleMaskSGIS' value invert@
--
-- The parameter @value@ is a @ClampedFloat32@.
--
-- The parameter @invert@ is a @Boolean@, one of: 'Graphics.GL.Internal.Shared.GL_FALSE', 'Graphics.GL.Internal.Shared.GL_TRUE'.
--
-- This command is an alias for 'Graphics.GL.Ext.EXT.Multisample.glSampleMaskEXT'.


glSampleMaskSGIS :: MonadIO m => GLclampf -> GLboolean -> m ()
glSampleMaskSGIS :: forall (m :: * -> *). MonadIO m => GLclampf -> GLboolean -> m ()
glSampleMaskSGIS = FunPtr (GLclampf -> GLboolean -> IO ())
-> GLclampf -> GLboolean -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLclampf -> GLboolean -> IO ())
-> GLclampf -> GLboolean -> m ()
fficlampfbooleanIOV FunPtr (GLclampf -> GLboolean -> IO ())
glSampleMaskSGISFunPtr

glSampleMaskSGISFunPtr :: FunPtr (GLclampf -> GLboolean -> IO ())
glSampleMaskSGISFunPtr :: FunPtr (GLclampf -> GLboolean -> IO ())
glSampleMaskSGISFunPtr = IO (FunPtr (GLclampf -> GLboolean -> IO ()))
-> FunPtr (GLclampf -> GLboolean -> IO ())
forall a. IO a -> a
unsafePerformIO (String -> IO (FunPtr (GLclampf -> GLboolean -> IO ()))
forall a. String -> IO (FunPtr a)
getProcAddress String
"glSampleMaskSGIS")

{-# NOINLINE glSampleMaskSGISFunPtr #-}

-- | Usage: @'glSamplePatternSGIS' pattern@
--
-- The parameter @pattern@ is a @SamplePatternSGIS@, one of: 'Graphics.GL.Ext.EXT.Multisample.GL_1PASS_EXT', 'Graphics.GL.Ext.SGIS.Multisample.GL_1PASS_SGIS', 'Graphics.GL.Ext.EXT.Multisample.GL_2PASS_0_EXT', 'Graphics.GL.Ext.SGIS.Multisample.GL_2PASS_0_SGIS', 'Graphics.GL.Ext.EXT.Multisample.GL_2PASS_1_EXT', 'Graphics.GL.Ext.SGIS.Multisample.GL_2PASS_1_SGIS', 'Graphics.GL.Ext.EXT.Multisample.GL_4PASS_0_EXT', 'Graphics.GL.Ext.SGIS.Multisample.GL_4PASS_0_SGIS', 'Graphics.GL.Ext.EXT.Multisample.GL_4PASS_1_EXT', 'Graphics.GL.Ext.SGIS.Multisample.GL_4PASS_1_SGIS', 'Graphics.GL.Ext.EXT.Multisample.GL_4PASS_2_EXT', 'Graphics.GL.Ext.SGIS.Multisample.GL_4PASS_2_SGIS', 'Graphics.GL.Ext.EXT.Multisample.GL_4PASS_3_EXT', 'Graphics.GL.Ext.SGIS.Multisample.GL_4PASS_3_SGIS'.
--
-- This command is an alias for 'Graphics.GL.Ext.EXT.Multisample.glSamplePatternEXT'.


glSamplePatternSGIS :: MonadIO m => GLenum -> m ()
glSamplePatternSGIS :: forall (m :: * -> *). MonadIO m => GLenum -> m ()
glSamplePatternSGIS = FunPtr (GLenum -> IO ()) -> GLenum -> m ()
forall (m :: * -> *).
MonadIO m =>
FunPtr (GLenum -> IO ()) -> GLenum -> m ()
ffienumIOV FunPtr (GLenum -> IO ())
glSamplePatternSGISFunPtr

glSamplePatternSGISFunPtr :: FunPtr (GLenum -> IO ())
glSamplePatternSGISFunPtr :: FunPtr (GLenum -> IO ())
glSamplePatternSGISFunPtr = IO (FunPtr (GLenum -> IO ())) -> FunPtr (GLenum -> IO ())
forall a. IO a -> a
unsafePerformIO (String -> IO (FunPtr (GLenum -> IO ()))
forall a. String -> IO (FunPtr a)
getProcAddress String
"glSamplePatternSGIS")

{-# NOINLINE glSamplePatternSGISFunPtr #-}

pattern GL_1PASS_SGIS  :: (Eq a, Num a) => a

pattern $mGL_1PASS_SGIS :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_1PASS_SGIS :: forall a. (Eq a, Num a) => a
GL_1PASS_SGIS = 0x80A1

pattern GL_2PASS_0_SGIS  :: (Eq a, Num a) => a

pattern $mGL_2PASS_0_SGIS :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_2PASS_0_SGIS :: forall a. (Eq a, Num a) => a
GL_2PASS_0_SGIS = 0x80A2

pattern GL_2PASS_1_SGIS  :: (Eq a, Num a) => a

pattern $mGL_2PASS_1_SGIS :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_2PASS_1_SGIS :: forall a. (Eq a, Num a) => a
GL_2PASS_1_SGIS = 0x80A3

pattern GL_4PASS_0_SGIS  :: (Eq a, Num a) => a

pattern $mGL_4PASS_0_SGIS :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_4PASS_0_SGIS :: forall a. (Eq a, Num a) => a
GL_4PASS_0_SGIS = 0x80A4

pattern GL_4PASS_1_SGIS  :: (Eq a, Num a) => a

pattern $mGL_4PASS_1_SGIS :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_4PASS_1_SGIS :: forall a. (Eq a, Num a) => a
GL_4PASS_1_SGIS = 0x80A5

pattern GL_4PASS_2_SGIS  :: (Eq a, Num a) => a

pattern $mGL_4PASS_2_SGIS :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_4PASS_2_SGIS :: forall a. (Eq a, Num a) => a
GL_4PASS_2_SGIS = 0x80A6

pattern GL_4PASS_3_SGIS  :: (Eq a, Num a) => a

pattern $mGL_4PASS_3_SGIS :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_4PASS_3_SGIS :: forall a. (Eq a, Num a) => a
GL_4PASS_3_SGIS = 0x80A7

pattern GL_MULTISAMPLE_SGIS  :: (Eq a, Num a) => a

pattern $mGL_MULTISAMPLE_SGIS :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_MULTISAMPLE_SGIS :: forall a. (Eq a, Num a) => a
GL_MULTISAMPLE_SGIS = 0x809D

pattern GL_SAMPLES_SGIS  :: (Eq a, Num a) => a

pattern $mGL_SAMPLES_SGIS :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_SAMPLES_SGIS :: forall a. (Eq a, Num a) => a
GL_SAMPLES_SGIS = 0x80A9

pattern GL_SAMPLE_ALPHA_TO_MASK_SGIS  :: (Eq a, Num a) => a

pattern $mGL_SAMPLE_ALPHA_TO_MASK_SGIS :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_SAMPLE_ALPHA_TO_MASK_SGIS :: forall a. (Eq a, Num a) => a
GL_SAMPLE_ALPHA_TO_MASK_SGIS = 0x809E

pattern GL_SAMPLE_ALPHA_TO_ONE_SGIS  :: (Eq a, Num a) => a

pattern $mGL_SAMPLE_ALPHA_TO_ONE_SGIS :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_SAMPLE_ALPHA_TO_ONE_SGIS :: forall a. (Eq a, Num a) => a
GL_SAMPLE_ALPHA_TO_ONE_SGIS = 0x809F

pattern GL_SAMPLE_BUFFERS_SGIS  :: (Eq a, Num a) => a

pattern $mGL_SAMPLE_BUFFERS_SGIS :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_SAMPLE_BUFFERS_SGIS :: forall a. (Eq a, Num a) => a
GL_SAMPLE_BUFFERS_SGIS = 0x80A8

pattern GL_SAMPLE_MASK_INVERT_SGIS  :: (Eq a, Num a) => a

pattern $mGL_SAMPLE_MASK_INVERT_SGIS :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_SAMPLE_MASK_INVERT_SGIS :: forall a. (Eq a, Num a) => a
GL_SAMPLE_MASK_INVERT_SGIS = 0x80AB

pattern GL_SAMPLE_MASK_SGIS  :: (Eq a, Num a) => a

pattern $mGL_SAMPLE_MASK_SGIS :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_SAMPLE_MASK_SGIS :: forall a. (Eq a, Num a) => a
GL_SAMPLE_MASK_SGIS = 0x80A0

pattern GL_SAMPLE_MASK_VALUE_SGIS  :: (Eq a, Num a) => a

pattern $mGL_SAMPLE_MASK_VALUE_SGIS :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_SAMPLE_MASK_VALUE_SGIS :: forall a. (Eq a, Num a) => a
GL_SAMPLE_MASK_VALUE_SGIS = 0x80AA

pattern GL_SAMPLE_PATTERN_SGIS  :: (Eq a, Num a) => a

pattern $mGL_SAMPLE_PATTERN_SGIS :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_SAMPLE_PATTERN_SGIS :: forall a. (Eq a, Num a) => a
GL_SAMPLE_PATTERN_SGIS = 0x80AC