{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.SGIX.DepthTexture (
gl_SGIX_depth_texture
, pattern GL_DEPTH_COMPONENT16_SGIX
, pattern GL_DEPTH_COMPONENT24_SGIX
, pattern GL_DEPTH_COMPONENT32_SGIX
) where
import Data.Set
import Graphics.GL.Internal.Proc
gl_SGIX_depth_texture :: Bool
gl_SGIX_depth_texture :: Bool
gl_SGIX_depth_texture = String -> Set String -> Bool
forall a. Ord a => a -> Set a -> Bool
member String
"GL_SGIX_depth_texture" Set String
extensions
{-# NOINLINE gl_SGIX_depth_texture #-}
pattern GL_DEPTH_COMPONENT16_SGIX :: (Eq a, Num a) => a
pattern $mGL_DEPTH_COMPONENT16_SGIX :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_DEPTH_COMPONENT16_SGIX :: forall a. (Eq a, Num a) => a
GL_DEPTH_COMPONENT16_SGIX = 0x81A5
pattern GL_DEPTH_COMPONENT24_SGIX :: (Eq a, Num a) => a
pattern $mGL_DEPTH_COMPONENT24_SGIX :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_DEPTH_COMPONENT24_SGIX :: forall a. (Eq a, Num a) => a
GL_DEPTH_COMPONENT24_SGIX = 0x81A6
pattern GL_DEPTH_COMPONENT32_SGIX :: (Eq a, Num a) => a
pattern $mGL_DEPTH_COMPONENT32_SGIX :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_DEPTH_COMPONENT32_SGIX :: forall a. (Eq a, Num a) => a
GL_DEPTH_COMPONENT32_SGIX = 0x81A7