-- This file was automatically generated. {-# LANGUAGE ScopedTypeVariables, PatternSynonyms #-} module Graphics.GL.Raw.Extension.EXT.BlendEquationSeparate ( -- * Extension Support gl_EXT_blend_equation_separate -- * GL_EXT_blend_equation_separate , glBlendEquationSeparateEXT , pattern GL_BLEND_EQUATION_ALPHA_EXT , pattern GL_BLEND_EQUATION_RGB_EXT ) where import Control.Monad.IO.Class import Data.Set import Foreign.Ptr import Graphics.GL.Raw.Internal.FFI import Graphics.GL.Raw.Internal.Proc import Graphics.GL.Raw.Types import System.IO.Unsafe gl_EXT_blend_equation_separate :: Bool gl_EXT_blend_equation_separate = member "GL_EXT_blend_equation_separate" extensions glBlendEquationSeparateEXT :: MonadIO m => GLenum -> GLenum -> m () glBlendEquationSeparateEXT = ffienumenumIOV glBlendEquationSeparateEXTFunPtr glBlendEquationSeparateEXTFunPtr :: FunPtr (GLenum -> GLenum -> IO ()) glBlendEquationSeparateEXTFunPtr = unsafePerformIO (getProcAddress "glBlendEquationSeparateEXT") {-# NOINLINE glBlendEquationSeparateEXTFunPtr #-} pattern GL_BLEND_EQUATION_ALPHA_EXT = 0x883D pattern GL_BLEND_EQUATION_RGB_EXT = 0x8009