-- This file was automatically generated.
{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.SGIX.Shadow (
  -- * Extension Support
    gl_SGIX_shadow

  -- * GL_SGIX_shadow
  , pattern GL_TEXTURE_COMPARE_OPERATOR_SGIX
  , pattern GL_TEXTURE_COMPARE_SGIX
  , pattern GL_TEXTURE_GEQUAL_R_SGIX
  , pattern GL_TEXTURE_LEQUAL_R_SGIX
) where

import Data.Set
import Graphics.GL.Internal.Proc

-- | Checks that the <https://cvs.khronos.org/svn/repos/ogl/trunk/doc/registry/public/specs/SGIX/shadow.txt GL_SGIX_shadow> extension is available.

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

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

pattern $mGL_TEXTURE_COMPARE_OPERATOR_SGIX :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_TEXTURE_COMPARE_OPERATOR_SGIX :: forall a. (Eq a, Num a) => a
GL_TEXTURE_COMPARE_OPERATOR_SGIX = 0x819B

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

pattern $mGL_TEXTURE_COMPARE_SGIX :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_TEXTURE_COMPARE_SGIX :: forall a. (Eq a, Num a) => a
GL_TEXTURE_COMPARE_SGIX = 0x819A

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

pattern $mGL_TEXTURE_GEQUAL_R_SGIX :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_TEXTURE_GEQUAL_R_SGIX :: forall a. (Eq a, Num a) => a
GL_TEXTURE_GEQUAL_R_SGIX = 0x819D

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

pattern $mGL_TEXTURE_LEQUAL_R_SGIX :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_TEXTURE_LEQUAL_R_SGIX :: forall a. (Eq a, Num a) => a
GL_TEXTURE_LEQUAL_R_SGIX = 0x819C