{-# LANGUAGE CPP, ScopedTypeVariables, PatternSynonyms #-}
module Graphics.GL.Ext.APPLE.SpecularVector (
gl_APPLE_specular_vector
, pattern GL_LIGHT_MODEL_SPECULAR_VECTOR_APPLE
) where
import Data.Set
import Graphics.GL.Internal.Proc
gl_APPLE_specular_vector :: Bool
gl_APPLE_specular_vector :: Bool
gl_APPLE_specular_vector = String -> Set String -> Bool
forall a. Ord a => a -> Set a -> Bool
member String
"GL_APPLE_specular_vector" Set String
extensions
{-# NOINLINE gl_APPLE_specular_vector #-}
pattern GL_LIGHT_MODEL_SPECULAR_VECTOR_APPLE :: (Eq a, Num a) => a
pattern $mGL_LIGHT_MODEL_SPECULAR_VECTOR_APPLE :: forall {r} {a}.
(Eq a, Num a) =>
a -> ((# #) -> r) -> ((# #) -> r) -> r
$bGL_LIGHT_MODEL_SPECULAR_VECTOR_APPLE :: forall a. (Eq a, Num a) => a
GL_LIGHT_MODEL_SPECULAR_VECTOR_APPLE = 0x85B0