{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.INGR.ColorClamp (
gl_INGR_color_clamp
, pattern GL_ALPHA_MAX_CLAMP_INGR
, pattern GL_ALPHA_MIN_CLAMP_INGR
, pattern GL_BLUE_MAX_CLAMP_INGR
, pattern GL_BLUE_MIN_CLAMP_INGR
, pattern GL_GREEN_MAX_CLAMP_INGR
, pattern GL_GREEN_MIN_CLAMP_INGR
, pattern GL_RED_MAX_CLAMP_INGR
, pattern GL_RED_MIN_CLAMP_INGR
) where
import Data.Set
import Graphics.GL.Internal.Proc
gl_INGR_color_clamp :: Bool
gl_INGR_color_clamp :: Bool
gl_INGR_color_clamp = String -> Set String -> Bool
forall a. Ord a => a -> Set a -> Bool
member String
"GL_INGR_color_clamp" Set String
extensions
{-# NOINLINE gl_INGR_color_clamp #-}
pattern GL_ALPHA_MAX_CLAMP_INGR :: (Eq a, Num a) => a
pattern $mGL_ALPHA_MAX_CLAMP_INGR :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_ALPHA_MAX_CLAMP_INGR :: forall a. (Eq a, Num a) => a
GL_ALPHA_MAX_CLAMP_INGR = 0x8567
pattern GL_ALPHA_MIN_CLAMP_INGR :: (Eq a, Num a) => a
pattern $mGL_ALPHA_MIN_CLAMP_INGR :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_ALPHA_MIN_CLAMP_INGR :: forall a. (Eq a, Num a) => a
GL_ALPHA_MIN_CLAMP_INGR = 0x8563
pattern GL_BLUE_MAX_CLAMP_INGR :: (Eq a, Num a) => a
pattern $mGL_BLUE_MAX_CLAMP_INGR :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_BLUE_MAX_CLAMP_INGR :: forall a. (Eq a, Num a) => a
GL_BLUE_MAX_CLAMP_INGR = 0x8566
pattern GL_BLUE_MIN_CLAMP_INGR :: (Eq a, Num a) => a
pattern $mGL_BLUE_MIN_CLAMP_INGR :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_BLUE_MIN_CLAMP_INGR :: forall a. (Eq a, Num a) => a
GL_BLUE_MIN_CLAMP_INGR = 0x8562
pattern GL_GREEN_MAX_CLAMP_INGR :: (Eq a, Num a) => a
pattern $mGL_GREEN_MAX_CLAMP_INGR :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_GREEN_MAX_CLAMP_INGR :: forall a. (Eq a, Num a) => a
GL_GREEN_MAX_CLAMP_INGR = 0x8565
pattern GL_GREEN_MIN_CLAMP_INGR :: (Eq a, Num a) => a
pattern $mGL_GREEN_MIN_CLAMP_INGR :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_GREEN_MIN_CLAMP_INGR :: forall a. (Eq a, Num a) => a
GL_GREEN_MIN_CLAMP_INGR = 0x8561
pattern GL_RED_MAX_CLAMP_INGR :: (Eq a, Num a) => a
pattern $mGL_RED_MAX_CLAMP_INGR :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_RED_MAX_CLAMP_INGR :: forall a. (Eq a, Num a) => a
GL_RED_MAX_CLAMP_INGR = 0x8564
pattern GL_RED_MIN_CLAMP_INGR :: (Eq a, Num a) => a
pattern $mGL_RED_MIN_CLAMP_INGR :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_RED_MIN_CLAMP_INGR :: forall a. (Eq a, Num a) => a
GL_RED_MIN_CLAMP_INGR = 0x8560