{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.S3.S3tc (
gl_S3_s3tc
, pattern GL_RGB4_S3TC
, pattern GL_RGBA4_DXT5_S3TC
, pattern GL_RGBA4_S3TC
, pattern GL_RGBA_DXT5_S3TC
, pattern GL_RGBA_S3TC
, pattern GL_RGB_S3TC
) where
import Data.Set
import Graphics.GL.Internal.Proc
gl_S3_s3tc :: Bool
gl_S3_s3tc :: Bool
gl_S3_s3tc = String -> Set String -> Bool
forall a. Ord a => a -> Set a -> Bool
member String
"GL_S3_s3tc" Set String
extensions
{-# NOINLINE gl_S3_s3tc #-}
pattern GL_RGB4_S3TC :: (Eq a, Num a) => a
pattern $mGL_RGB4_S3TC :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_RGB4_S3TC :: forall a. (Eq a, Num a) => a
GL_RGB4_S3TC = 0x83A1
pattern GL_RGBA4_DXT5_S3TC :: (Eq a, Num a) => a
pattern $mGL_RGBA4_DXT5_S3TC :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_RGBA4_DXT5_S3TC :: forall a. (Eq a, Num a) => a
GL_RGBA4_DXT5_S3TC = 0x83A5
pattern GL_RGBA4_S3TC :: (Eq a, Num a) => a
pattern $mGL_RGBA4_S3TC :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_RGBA4_S3TC :: forall a. (Eq a, Num a) => a
GL_RGBA4_S3TC = 0x83A3
pattern GL_RGBA_DXT5_S3TC :: (Eq a, Num a) => a
pattern $mGL_RGBA_DXT5_S3TC :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_RGBA_DXT5_S3TC :: forall a. (Eq a, Num a) => a
GL_RGBA_DXT5_S3TC = 0x83A4
pattern GL_RGBA_S3TC :: (Eq a, Num a) => a
pattern $mGL_RGBA_S3TC :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_RGBA_S3TC :: forall a. (Eq a, Num a) => a
GL_RGBA_S3TC = 0x83A2
pattern GL_RGB_S3TC :: (Eq a, Num a) => a
pattern $mGL_RGB_S3TC :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_RGB_S3TC :: forall a. (Eq a, Num a) => a
GL_RGB_S3TC = 0x83A0