{-# OPTIONS_HADDOCK ignore-exports#-}
{-# LANGUAGE DataKinds                  #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE PatternSynonyms            #-}
{-# LANGUAGE Strict                     #-}
module Graphics.Vulkan.Types.Enum.Blend
       (VkBlendFactor(VkBlendFactor, VK_BLEND_FACTOR_ZERO,
                      VK_BLEND_FACTOR_ONE, VK_BLEND_FACTOR_SRC_COLOR,
                      VK_BLEND_FACTOR_ONE_MINUS_SRC_COLOR, VK_BLEND_FACTOR_DST_COLOR,
                      VK_BLEND_FACTOR_ONE_MINUS_DST_COLOR, VK_BLEND_FACTOR_SRC_ALPHA,
                      VK_BLEND_FACTOR_ONE_MINUS_SRC_ALPHA, VK_BLEND_FACTOR_DST_ALPHA,
                      VK_BLEND_FACTOR_ONE_MINUS_DST_ALPHA,
                      VK_BLEND_FACTOR_CONSTANT_COLOR,
                      VK_BLEND_FACTOR_ONE_MINUS_CONSTANT_COLOR,
                      VK_BLEND_FACTOR_CONSTANT_ALPHA,
                      VK_BLEND_FACTOR_ONE_MINUS_CONSTANT_ALPHA,
                      VK_BLEND_FACTOR_SRC_ALPHA_SATURATE, VK_BLEND_FACTOR_SRC1_COLOR,
                      VK_BLEND_FACTOR_ONE_MINUS_SRC1_COLOR, VK_BLEND_FACTOR_SRC1_ALPHA,
                      VK_BLEND_FACTOR_ONE_MINUS_SRC1_ALPHA),
        VkBlendOp(VkBlendOp, VK_BLEND_OP_ADD, VK_BLEND_OP_SUBTRACT,
                  VK_BLEND_OP_REVERSE_SUBTRACT, VK_BLEND_OP_MIN, VK_BLEND_OP_MAX),
        VkBlendOverlapEXT(VkBlendOverlapEXT,
                          VK_BLEND_OVERLAP_UNCORRELATED_EXT, VK_BLEND_OVERLAP_DISJOINT_EXT,
                          VK_BLEND_OVERLAP_CONJOINT_EXT))
       where
import Foreign.Storable                (Storable)
import GHC.Read                        (choose, expectP)
import Graphics.Vulkan.Marshal         (Int32)
import Text.ParserCombinators.ReadPrec (prec, step, (+++))
import Text.Read                       (Read (..), parens)
import Text.Read.Lex                   (Lexeme (..))

-- | type = @enum@
--
--   <https://www.khronos.org/registry/vulkan/specs/1.2-extensions/html/vkspec.html#VkBlendFactor VkBlendFactor registry at www.khronos.org>
newtype VkBlendFactor = VkBlendFactor Int32
                        deriving (VkBlendFactor -> VkBlendFactor -> Bool
(VkBlendFactor -> VkBlendFactor -> Bool)
-> (VkBlendFactor -> VkBlendFactor -> Bool) -> Eq VkBlendFactor
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: VkBlendFactor -> VkBlendFactor -> Bool
$c/= :: VkBlendFactor -> VkBlendFactor -> Bool
== :: VkBlendFactor -> VkBlendFactor -> Bool
$c== :: VkBlendFactor -> VkBlendFactor -> Bool
Eq, Eq VkBlendFactor
Eq VkBlendFactor
-> (VkBlendFactor -> VkBlendFactor -> Ordering)
-> (VkBlendFactor -> VkBlendFactor -> Bool)
-> (VkBlendFactor -> VkBlendFactor -> Bool)
-> (VkBlendFactor -> VkBlendFactor -> Bool)
-> (VkBlendFactor -> VkBlendFactor -> Bool)
-> (VkBlendFactor -> VkBlendFactor -> VkBlendFactor)
-> (VkBlendFactor -> VkBlendFactor -> VkBlendFactor)
-> Ord VkBlendFactor
VkBlendFactor -> VkBlendFactor -> Bool
VkBlendFactor -> VkBlendFactor -> Ordering
VkBlendFactor -> VkBlendFactor -> VkBlendFactor
forall a.
Eq a
-> (a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: VkBlendFactor -> VkBlendFactor -> VkBlendFactor
$cmin :: VkBlendFactor -> VkBlendFactor -> VkBlendFactor
max :: VkBlendFactor -> VkBlendFactor -> VkBlendFactor
$cmax :: VkBlendFactor -> VkBlendFactor -> VkBlendFactor
>= :: VkBlendFactor -> VkBlendFactor -> Bool
$c>= :: VkBlendFactor -> VkBlendFactor -> Bool
> :: VkBlendFactor -> VkBlendFactor -> Bool
$c> :: VkBlendFactor -> VkBlendFactor -> Bool
<= :: VkBlendFactor -> VkBlendFactor -> Bool
$c<= :: VkBlendFactor -> VkBlendFactor -> Bool
< :: VkBlendFactor -> VkBlendFactor -> Bool
$c< :: VkBlendFactor -> VkBlendFactor -> Bool
compare :: VkBlendFactor -> VkBlendFactor -> Ordering
$ccompare :: VkBlendFactor -> VkBlendFactor -> Ordering
Ord, Int -> VkBlendFactor
VkBlendFactor -> Int
VkBlendFactor -> [VkBlendFactor]
VkBlendFactor -> VkBlendFactor
VkBlendFactor -> VkBlendFactor -> [VkBlendFactor]
VkBlendFactor -> VkBlendFactor -> VkBlendFactor -> [VkBlendFactor]
(VkBlendFactor -> VkBlendFactor)
-> (VkBlendFactor -> VkBlendFactor)
-> (Int -> VkBlendFactor)
-> (VkBlendFactor -> Int)
-> (VkBlendFactor -> [VkBlendFactor])
-> (VkBlendFactor -> VkBlendFactor -> [VkBlendFactor])
-> (VkBlendFactor -> VkBlendFactor -> [VkBlendFactor])
-> (VkBlendFactor
    -> VkBlendFactor -> VkBlendFactor -> [VkBlendFactor])
-> Enum VkBlendFactor
forall a.
(a -> a)
-> (a -> a)
-> (Int -> a)
-> (a -> Int)
-> (a -> [a])
-> (a -> a -> [a])
-> (a -> a -> [a])
-> (a -> a -> a -> [a])
-> Enum a
enumFromThenTo :: VkBlendFactor -> VkBlendFactor -> VkBlendFactor -> [VkBlendFactor]
$cenumFromThenTo :: VkBlendFactor -> VkBlendFactor -> VkBlendFactor -> [VkBlendFactor]
enumFromTo :: VkBlendFactor -> VkBlendFactor -> [VkBlendFactor]
$cenumFromTo :: VkBlendFactor -> VkBlendFactor -> [VkBlendFactor]
enumFromThen :: VkBlendFactor -> VkBlendFactor -> [VkBlendFactor]
$cenumFromThen :: VkBlendFactor -> VkBlendFactor -> [VkBlendFactor]
enumFrom :: VkBlendFactor -> [VkBlendFactor]
$cenumFrom :: VkBlendFactor -> [VkBlendFactor]
fromEnum :: VkBlendFactor -> Int
$cfromEnum :: VkBlendFactor -> Int
toEnum :: Int -> VkBlendFactor
$ctoEnum :: Int -> VkBlendFactor
pred :: VkBlendFactor -> VkBlendFactor
$cpred :: VkBlendFactor -> VkBlendFactor
succ :: VkBlendFactor -> VkBlendFactor
$csucc :: VkBlendFactor -> VkBlendFactor
Enum, Ptr VkBlendFactor -> IO VkBlendFactor
Ptr VkBlendFactor -> Int -> IO VkBlendFactor
Ptr VkBlendFactor -> Int -> VkBlendFactor -> IO ()
Ptr VkBlendFactor -> VkBlendFactor -> IO ()
VkBlendFactor -> Int
(VkBlendFactor -> Int)
-> (VkBlendFactor -> Int)
-> (Ptr VkBlendFactor -> Int -> IO VkBlendFactor)
-> (Ptr VkBlendFactor -> Int -> VkBlendFactor -> IO ())
-> (forall b. Ptr b -> Int -> IO VkBlendFactor)
-> (forall b. Ptr b -> Int -> VkBlendFactor -> IO ())
-> (Ptr VkBlendFactor -> IO VkBlendFactor)
-> (Ptr VkBlendFactor -> VkBlendFactor -> IO ())
-> Storable VkBlendFactor
forall b. Ptr b -> Int -> IO VkBlendFactor
forall b. Ptr b -> Int -> VkBlendFactor -> IO ()
forall a.
(a -> Int)
-> (a -> Int)
-> (Ptr a -> Int -> IO a)
-> (Ptr a -> Int -> a -> IO ())
-> (forall b. Ptr b -> Int -> IO a)
-> (forall b. Ptr b -> Int -> a -> IO ())
-> (Ptr a -> IO a)
-> (Ptr a -> a -> IO ())
-> Storable a
poke :: Ptr VkBlendFactor -> VkBlendFactor -> IO ()
$cpoke :: Ptr VkBlendFactor -> VkBlendFactor -> IO ()
peek :: Ptr VkBlendFactor -> IO VkBlendFactor
$cpeek :: Ptr VkBlendFactor -> IO VkBlendFactor
pokeByteOff :: forall b. Ptr b -> Int -> VkBlendFactor -> IO ()
$cpokeByteOff :: forall b. Ptr b -> Int -> VkBlendFactor -> IO ()
peekByteOff :: forall b. Ptr b -> Int -> IO VkBlendFactor
$cpeekByteOff :: forall b. Ptr b -> Int -> IO VkBlendFactor
pokeElemOff :: Ptr VkBlendFactor -> Int -> VkBlendFactor -> IO ()
$cpokeElemOff :: Ptr VkBlendFactor -> Int -> VkBlendFactor -> IO ()
peekElemOff :: Ptr VkBlendFactor -> Int -> IO VkBlendFactor
$cpeekElemOff :: Ptr VkBlendFactor -> Int -> IO VkBlendFactor
alignment :: VkBlendFactor -> Int
$calignment :: VkBlendFactor -> Int
sizeOf :: VkBlendFactor -> Int
$csizeOf :: VkBlendFactor -> Int
Storable)

instance Show VkBlendFactor where
    showsPrec :: Int -> VkBlendFactor -> ShowS
showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_ZERO
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_ZERO"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_ONE = String -> ShowS
showString String
"VK_BLEND_FACTOR_ONE"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_SRC_COLOR
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_SRC_COLOR"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_ONE_MINUS_SRC_COLOR
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_ONE_MINUS_SRC_COLOR"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_DST_COLOR
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_DST_COLOR"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_ONE_MINUS_DST_COLOR
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_ONE_MINUS_DST_COLOR"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_SRC_ALPHA
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_SRC_ALPHA"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_ONE_MINUS_SRC_ALPHA
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_ONE_MINUS_SRC_ALPHA"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_DST_ALPHA
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_DST_ALPHA"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_ONE_MINUS_DST_ALPHA
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_ONE_MINUS_DST_ALPHA"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_CONSTANT_COLOR
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_CONSTANT_COLOR"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_ONE_MINUS_CONSTANT_COLOR
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_ONE_MINUS_CONSTANT_COLOR"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_CONSTANT_ALPHA
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_CONSTANT_ALPHA"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_ONE_MINUS_CONSTANT_ALPHA
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_ONE_MINUS_CONSTANT_ALPHA"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_SRC_ALPHA_SATURATE
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_SRC_ALPHA_SATURATE"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_SRC1_COLOR
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_SRC1_COLOR"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_ONE_MINUS_SRC1_COLOR
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_ONE_MINUS_SRC1_COLOR"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_SRC1_ALPHA
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_SRC1_ALPHA"
    showsPrec Int
_ VkBlendFactor
VK_BLEND_FACTOR_ONE_MINUS_SRC1_ALPHA
      = String -> ShowS
showString String
"VK_BLEND_FACTOR_ONE_MINUS_SRC1_ALPHA"
    showsPrec Int
p (VkBlendFactor Int32
x)
      = Bool -> ShowS -> ShowS
showParen (Int
p Int -> Int -> Bool
forall a. Ord a => a -> a -> Bool
>= Int
11)
          (String -> ShowS
showString String
"VkBlendFactor " ShowS -> ShowS -> ShowS
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Int -> Int32 -> ShowS
forall a. Show a => Int -> a -> ShowS
showsPrec Int
11 Int32
x)

instance Read VkBlendFactor where
    readPrec :: ReadPrec VkBlendFactor
readPrec
      = ReadPrec VkBlendFactor -> ReadPrec VkBlendFactor
forall a. ReadPrec a -> ReadPrec a
parens
          ([(String, ReadPrec VkBlendFactor)] -> ReadPrec VkBlendFactor
forall a. [(String, ReadPrec a)] -> ReadPrec a
choose
             [(String
"VK_BLEND_FACTOR_ZERO", VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_ZERO),
              (String
"VK_BLEND_FACTOR_ONE", VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_ONE),
              (String
"VK_BLEND_FACTOR_SRC_COLOR", VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_SRC_COLOR),
              (String
"VK_BLEND_FACTOR_ONE_MINUS_SRC_COLOR",
               VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_ONE_MINUS_SRC_COLOR),
              (String
"VK_BLEND_FACTOR_DST_COLOR", VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_DST_COLOR),
              (String
"VK_BLEND_FACTOR_ONE_MINUS_DST_COLOR",
               VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_ONE_MINUS_DST_COLOR),
              (String
"VK_BLEND_FACTOR_SRC_ALPHA", VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_SRC_ALPHA),
              (String
"VK_BLEND_FACTOR_ONE_MINUS_SRC_ALPHA",
               VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_ONE_MINUS_SRC_ALPHA),
              (String
"VK_BLEND_FACTOR_DST_ALPHA", VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_DST_ALPHA),
              (String
"VK_BLEND_FACTOR_ONE_MINUS_DST_ALPHA",
               VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_ONE_MINUS_DST_ALPHA),
              (String
"VK_BLEND_FACTOR_CONSTANT_COLOR",
               VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_CONSTANT_COLOR),
              (String
"VK_BLEND_FACTOR_ONE_MINUS_CONSTANT_COLOR",
               VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_ONE_MINUS_CONSTANT_COLOR),
              (String
"VK_BLEND_FACTOR_CONSTANT_ALPHA",
               VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_CONSTANT_ALPHA),
              (String
"VK_BLEND_FACTOR_ONE_MINUS_CONSTANT_ALPHA",
               VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_ONE_MINUS_CONSTANT_ALPHA),
              (String
"VK_BLEND_FACTOR_SRC_ALPHA_SATURATE",
               VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_SRC_ALPHA_SATURATE),
              (String
"VK_BLEND_FACTOR_SRC1_COLOR", VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_SRC1_COLOR),
              (String
"VK_BLEND_FACTOR_ONE_MINUS_SRC1_COLOR",
               VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_ONE_MINUS_SRC1_COLOR),
              (String
"VK_BLEND_FACTOR_SRC1_ALPHA", VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_SRC1_ALPHA),
              (String
"VK_BLEND_FACTOR_ONE_MINUS_SRC1_ALPHA",
               VkBlendFactor -> ReadPrec VkBlendFactor
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendFactor
VK_BLEND_FACTOR_ONE_MINUS_SRC1_ALPHA)]
             ReadPrec VkBlendFactor
-> ReadPrec VkBlendFactor -> ReadPrec VkBlendFactor
forall a. ReadPrec a -> ReadPrec a -> ReadPrec a
+++
             Int -> ReadPrec VkBlendFactor -> ReadPrec VkBlendFactor
forall a. Int -> ReadPrec a -> ReadPrec a
prec Int
10
               (Lexeme -> ReadPrec ()
expectP (String -> Lexeme
Ident String
"VkBlendFactor") ReadPrec () -> ReadPrec VkBlendFactor -> ReadPrec VkBlendFactor
forall (m :: * -> *) a b. Monad m => m a -> m b -> m b
>>
                  (Int32 -> VkBlendFactor
VkBlendFactor (Int32 -> VkBlendFactor)
-> ReadPrec Int32 -> ReadPrec VkBlendFactor
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> ReadPrec Int32 -> ReadPrec Int32
forall a. ReadPrec a -> ReadPrec a
step ReadPrec Int32
forall a. Read a => ReadPrec a
readPrec)))

pattern VK_BLEND_FACTOR_ZERO :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_ZERO :: VkBlendFactor
$mVK_BLEND_FACTOR_ZERO :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_ZERO = VkBlendFactor 0

pattern VK_BLEND_FACTOR_ONE :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_ONE :: VkBlendFactor
$mVK_BLEND_FACTOR_ONE :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_ONE = VkBlendFactor 1

pattern VK_BLEND_FACTOR_SRC_COLOR :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_SRC_COLOR :: VkBlendFactor
$mVK_BLEND_FACTOR_SRC_COLOR :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_SRC_COLOR = VkBlendFactor 2

pattern VK_BLEND_FACTOR_ONE_MINUS_SRC_COLOR :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_ONE_MINUS_SRC_COLOR :: VkBlendFactor
$mVK_BLEND_FACTOR_ONE_MINUS_SRC_COLOR :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_ONE_MINUS_SRC_COLOR = VkBlendFactor 3

pattern VK_BLEND_FACTOR_DST_COLOR :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_DST_COLOR :: VkBlendFactor
$mVK_BLEND_FACTOR_DST_COLOR :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_DST_COLOR = VkBlendFactor 4

pattern VK_BLEND_FACTOR_ONE_MINUS_DST_COLOR :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_ONE_MINUS_DST_COLOR :: VkBlendFactor
$mVK_BLEND_FACTOR_ONE_MINUS_DST_COLOR :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_ONE_MINUS_DST_COLOR = VkBlendFactor 5

pattern VK_BLEND_FACTOR_SRC_ALPHA :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_SRC_ALPHA :: VkBlendFactor
$mVK_BLEND_FACTOR_SRC_ALPHA :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_SRC_ALPHA = VkBlendFactor 6

pattern VK_BLEND_FACTOR_ONE_MINUS_SRC_ALPHA :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_ONE_MINUS_SRC_ALPHA :: VkBlendFactor
$mVK_BLEND_FACTOR_ONE_MINUS_SRC_ALPHA :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_ONE_MINUS_SRC_ALPHA = VkBlendFactor 7

pattern VK_BLEND_FACTOR_DST_ALPHA :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_DST_ALPHA :: VkBlendFactor
$mVK_BLEND_FACTOR_DST_ALPHA :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_DST_ALPHA = VkBlendFactor 8

pattern VK_BLEND_FACTOR_ONE_MINUS_DST_ALPHA :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_ONE_MINUS_DST_ALPHA :: VkBlendFactor
$mVK_BLEND_FACTOR_ONE_MINUS_DST_ALPHA :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_ONE_MINUS_DST_ALPHA = VkBlendFactor 9

pattern VK_BLEND_FACTOR_CONSTANT_COLOR :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_CONSTANT_COLOR :: VkBlendFactor
$mVK_BLEND_FACTOR_CONSTANT_COLOR :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_CONSTANT_COLOR = VkBlendFactor 10

pattern VK_BLEND_FACTOR_ONE_MINUS_CONSTANT_COLOR :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_ONE_MINUS_CONSTANT_COLOR :: VkBlendFactor
$mVK_BLEND_FACTOR_ONE_MINUS_CONSTANT_COLOR :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_ONE_MINUS_CONSTANT_COLOR = VkBlendFactor 11

pattern VK_BLEND_FACTOR_CONSTANT_ALPHA :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_CONSTANT_ALPHA :: VkBlendFactor
$mVK_BLEND_FACTOR_CONSTANT_ALPHA :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_CONSTANT_ALPHA = VkBlendFactor 12

pattern VK_BLEND_FACTOR_ONE_MINUS_CONSTANT_ALPHA :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_ONE_MINUS_CONSTANT_ALPHA :: VkBlendFactor
$mVK_BLEND_FACTOR_ONE_MINUS_CONSTANT_ALPHA :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_ONE_MINUS_CONSTANT_ALPHA = VkBlendFactor 13

pattern VK_BLEND_FACTOR_SRC_ALPHA_SATURATE :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_SRC_ALPHA_SATURATE :: VkBlendFactor
$mVK_BLEND_FACTOR_SRC_ALPHA_SATURATE :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_SRC_ALPHA_SATURATE = VkBlendFactor 14

pattern VK_BLEND_FACTOR_SRC1_COLOR :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_SRC1_COLOR :: VkBlendFactor
$mVK_BLEND_FACTOR_SRC1_COLOR :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_SRC1_COLOR = VkBlendFactor 15

pattern VK_BLEND_FACTOR_ONE_MINUS_SRC1_COLOR :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_ONE_MINUS_SRC1_COLOR :: VkBlendFactor
$mVK_BLEND_FACTOR_ONE_MINUS_SRC1_COLOR :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_ONE_MINUS_SRC1_COLOR = VkBlendFactor 16

pattern VK_BLEND_FACTOR_SRC1_ALPHA :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_SRC1_ALPHA :: VkBlendFactor
$mVK_BLEND_FACTOR_SRC1_ALPHA :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_SRC1_ALPHA = VkBlendFactor 17

pattern VK_BLEND_FACTOR_ONE_MINUS_SRC1_ALPHA :: VkBlendFactor

pattern $bVK_BLEND_FACTOR_ONE_MINUS_SRC1_ALPHA :: VkBlendFactor
$mVK_BLEND_FACTOR_ONE_MINUS_SRC1_ALPHA :: forall {r}. VkBlendFactor -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_FACTOR_ONE_MINUS_SRC1_ALPHA = VkBlendFactor 18

-- | type = @enum@
--
--   <https://www.khronos.org/registry/vulkan/specs/1.2-extensions/html/vkspec.html#VkBlendOp VkBlendOp registry at www.khronos.org>
newtype VkBlendOp = VkBlendOp Int32
                    deriving (VkBlendOp -> VkBlendOp -> Bool
(VkBlendOp -> VkBlendOp -> Bool)
-> (VkBlendOp -> VkBlendOp -> Bool) -> Eq VkBlendOp
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: VkBlendOp -> VkBlendOp -> Bool
$c/= :: VkBlendOp -> VkBlendOp -> Bool
== :: VkBlendOp -> VkBlendOp -> Bool
$c== :: VkBlendOp -> VkBlendOp -> Bool
Eq, Eq VkBlendOp
Eq VkBlendOp
-> (VkBlendOp -> VkBlendOp -> Ordering)
-> (VkBlendOp -> VkBlendOp -> Bool)
-> (VkBlendOp -> VkBlendOp -> Bool)
-> (VkBlendOp -> VkBlendOp -> Bool)
-> (VkBlendOp -> VkBlendOp -> Bool)
-> (VkBlendOp -> VkBlendOp -> VkBlendOp)
-> (VkBlendOp -> VkBlendOp -> VkBlendOp)
-> Ord VkBlendOp
VkBlendOp -> VkBlendOp -> Bool
VkBlendOp -> VkBlendOp -> Ordering
VkBlendOp -> VkBlendOp -> VkBlendOp
forall a.
Eq a
-> (a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: VkBlendOp -> VkBlendOp -> VkBlendOp
$cmin :: VkBlendOp -> VkBlendOp -> VkBlendOp
max :: VkBlendOp -> VkBlendOp -> VkBlendOp
$cmax :: VkBlendOp -> VkBlendOp -> VkBlendOp
>= :: VkBlendOp -> VkBlendOp -> Bool
$c>= :: VkBlendOp -> VkBlendOp -> Bool
> :: VkBlendOp -> VkBlendOp -> Bool
$c> :: VkBlendOp -> VkBlendOp -> Bool
<= :: VkBlendOp -> VkBlendOp -> Bool
$c<= :: VkBlendOp -> VkBlendOp -> Bool
< :: VkBlendOp -> VkBlendOp -> Bool
$c< :: VkBlendOp -> VkBlendOp -> Bool
compare :: VkBlendOp -> VkBlendOp -> Ordering
$ccompare :: VkBlendOp -> VkBlendOp -> Ordering
Ord, Int -> VkBlendOp
VkBlendOp -> Int
VkBlendOp -> [VkBlendOp]
VkBlendOp -> VkBlendOp
VkBlendOp -> VkBlendOp -> [VkBlendOp]
VkBlendOp -> VkBlendOp -> VkBlendOp -> [VkBlendOp]
(VkBlendOp -> VkBlendOp)
-> (VkBlendOp -> VkBlendOp)
-> (Int -> VkBlendOp)
-> (VkBlendOp -> Int)
-> (VkBlendOp -> [VkBlendOp])
-> (VkBlendOp -> VkBlendOp -> [VkBlendOp])
-> (VkBlendOp -> VkBlendOp -> [VkBlendOp])
-> (VkBlendOp -> VkBlendOp -> VkBlendOp -> [VkBlendOp])
-> Enum VkBlendOp
forall a.
(a -> a)
-> (a -> a)
-> (Int -> a)
-> (a -> Int)
-> (a -> [a])
-> (a -> a -> [a])
-> (a -> a -> [a])
-> (a -> a -> a -> [a])
-> Enum a
enumFromThenTo :: VkBlendOp -> VkBlendOp -> VkBlendOp -> [VkBlendOp]
$cenumFromThenTo :: VkBlendOp -> VkBlendOp -> VkBlendOp -> [VkBlendOp]
enumFromTo :: VkBlendOp -> VkBlendOp -> [VkBlendOp]
$cenumFromTo :: VkBlendOp -> VkBlendOp -> [VkBlendOp]
enumFromThen :: VkBlendOp -> VkBlendOp -> [VkBlendOp]
$cenumFromThen :: VkBlendOp -> VkBlendOp -> [VkBlendOp]
enumFrom :: VkBlendOp -> [VkBlendOp]
$cenumFrom :: VkBlendOp -> [VkBlendOp]
fromEnum :: VkBlendOp -> Int
$cfromEnum :: VkBlendOp -> Int
toEnum :: Int -> VkBlendOp
$ctoEnum :: Int -> VkBlendOp
pred :: VkBlendOp -> VkBlendOp
$cpred :: VkBlendOp -> VkBlendOp
succ :: VkBlendOp -> VkBlendOp
$csucc :: VkBlendOp -> VkBlendOp
Enum, Ptr VkBlendOp -> IO VkBlendOp
Ptr VkBlendOp -> Int -> IO VkBlendOp
Ptr VkBlendOp -> Int -> VkBlendOp -> IO ()
Ptr VkBlendOp -> VkBlendOp -> IO ()
VkBlendOp -> Int
(VkBlendOp -> Int)
-> (VkBlendOp -> Int)
-> (Ptr VkBlendOp -> Int -> IO VkBlendOp)
-> (Ptr VkBlendOp -> Int -> VkBlendOp -> IO ())
-> (forall b. Ptr b -> Int -> IO VkBlendOp)
-> (forall b. Ptr b -> Int -> VkBlendOp -> IO ())
-> (Ptr VkBlendOp -> IO VkBlendOp)
-> (Ptr VkBlendOp -> VkBlendOp -> IO ())
-> Storable VkBlendOp
forall b. Ptr b -> Int -> IO VkBlendOp
forall b. Ptr b -> Int -> VkBlendOp -> IO ()
forall a.
(a -> Int)
-> (a -> Int)
-> (Ptr a -> Int -> IO a)
-> (Ptr a -> Int -> a -> IO ())
-> (forall b. Ptr b -> Int -> IO a)
-> (forall b. Ptr b -> Int -> a -> IO ())
-> (Ptr a -> IO a)
-> (Ptr a -> a -> IO ())
-> Storable a
poke :: Ptr VkBlendOp -> VkBlendOp -> IO ()
$cpoke :: Ptr VkBlendOp -> VkBlendOp -> IO ()
peek :: Ptr VkBlendOp -> IO VkBlendOp
$cpeek :: Ptr VkBlendOp -> IO VkBlendOp
pokeByteOff :: forall b. Ptr b -> Int -> VkBlendOp -> IO ()
$cpokeByteOff :: forall b. Ptr b -> Int -> VkBlendOp -> IO ()
peekByteOff :: forall b. Ptr b -> Int -> IO VkBlendOp
$cpeekByteOff :: forall b. Ptr b -> Int -> IO VkBlendOp
pokeElemOff :: Ptr VkBlendOp -> Int -> VkBlendOp -> IO ()
$cpokeElemOff :: Ptr VkBlendOp -> Int -> VkBlendOp -> IO ()
peekElemOff :: Ptr VkBlendOp -> Int -> IO VkBlendOp
$cpeekElemOff :: Ptr VkBlendOp -> Int -> IO VkBlendOp
alignment :: VkBlendOp -> Int
$calignment :: VkBlendOp -> Int
sizeOf :: VkBlendOp -> Int
$csizeOf :: VkBlendOp -> Int
Storable)

instance Show VkBlendOp where
    showsPrec :: Int -> VkBlendOp -> ShowS
showsPrec Int
_ VkBlendOp
VK_BLEND_OP_ADD = String -> ShowS
showString String
"VK_BLEND_OP_ADD"
    showsPrec Int
_ VkBlendOp
VK_BLEND_OP_SUBTRACT
      = String -> ShowS
showString String
"VK_BLEND_OP_SUBTRACT"
    showsPrec Int
_ VkBlendOp
VK_BLEND_OP_REVERSE_SUBTRACT
      = String -> ShowS
showString String
"VK_BLEND_OP_REVERSE_SUBTRACT"
    showsPrec Int
_ VkBlendOp
VK_BLEND_OP_MIN = String -> ShowS
showString String
"VK_BLEND_OP_MIN"
    showsPrec Int
_ VkBlendOp
VK_BLEND_OP_MAX = String -> ShowS
showString String
"VK_BLEND_OP_MAX"
    showsPrec Int
p (VkBlendOp Int32
x)
      = Bool -> ShowS -> ShowS
showParen (Int
p Int -> Int -> Bool
forall a. Ord a => a -> a -> Bool
>= Int
11) (String -> ShowS
showString String
"VkBlendOp " ShowS -> ShowS -> ShowS
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Int -> Int32 -> ShowS
forall a. Show a => Int -> a -> ShowS
showsPrec Int
11 Int32
x)

instance Read VkBlendOp where
    readPrec :: ReadPrec VkBlendOp
readPrec
      = ReadPrec VkBlendOp -> ReadPrec VkBlendOp
forall a. ReadPrec a -> ReadPrec a
parens
          ([(String, ReadPrec VkBlendOp)] -> ReadPrec VkBlendOp
forall a. [(String, ReadPrec a)] -> ReadPrec a
choose
             [(String
"VK_BLEND_OP_ADD", VkBlendOp -> ReadPrec VkBlendOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendOp
VK_BLEND_OP_ADD),
              (String
"VK_BLEND_OP_SUBTRACT", VkBlendOp -> ReadPrec VkBlendOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendOp
VK_BLEND_OP_SUBTRACT),
              (String
"VK_BLEND_OP_REVERSE_SUBTRACT",
               VkBlendOp -> ReadPrec VkBlendOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendOp
VK_BLEND_OP_REVERSE_SUBTRACT),
              (String
"VK_BLEND_OP_MIN", VkBlendOp -> ReadPrec VkBlendOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendOp
VK_BLEND_OP_MIN),
              (String
"VK_BLEND_OP_MAX", VkBlendOp -> ReadPrec VkBlendOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendOp
VK_BLEND_OP_MAX)]
             ReadPrec VkBlendOp -> ReadPrec VkBlendOp -> ReadPrec VkBlendOp
forall a. ReadPrec a -> ReadPrec a -> ReadPrec a
+++
             Int -> ReadPrec VkBlendOp -> ReadPrec VkBlendOp
forall a. Int -> ReadPrec a -> ReadPrec a
prec Int
10
               (Lexeme -> ReadPrec ()
expectP (String -> Lexeme
Ident String
"VkBlendOp") ReadPrec () -> ReadPrec VkBlendOp -> ReadPrec VkBlendOp
forall (m :: * -> *) a b. Monad m => m a -> m b -> m b
>> (Int32 -> VkBlendOp
VkBlendOp (Int32 -> VkBlendOp) -> ReadPrec Int32 -> ReadPrec VkBlendOp
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> ReadPrec Int32 -> ReadPrec Int32
forall a. ReadPrec a -> ReadPrec a
step ReadPrec Int32
forall a. Read a => ReadPrec a
readPrec)))

pattern VK_BLEND_OP_ADD :: VkBlendOp

pattern $bVK_BLEND_OP_ADD :: VkBlendOp
$mVK_BLEND_OP_ADD :: forall {r}. VkBlendOp -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_OP_ADD = VkBlendOp 0

pattern VK_BLEND_OP_SUBTRACT :: VkBlendOp

pattern $bVK_BLEND_OP_SUBTRACT :: VkBlendOp
$mVK_BLEND_OP_SUBTRACT :: forall {r}. VkBlendOp -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_OP_SUBTRACT = VkBlendOp 1

pattern VK_BLEND_OP_REVERSE_SUBTRACT :: VkBlendOp

pattern $bVK_BLEND_OP_REVERSE_SUBTRACT :: VkBlendOp
$mVK_BLEND_OP_REVERSE_SUBTRACT :: forall {r}. VkBlendOp -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_OP_REVERSE_SUBTRACT = VkBlendOp 2

pattern VK_BLEND_OP_MIN :: VkBlendOp

pattern $bVK_BLEND_OP_MIN :: VkBlendOp
$mVK_BLEND_OP_MIN :: forall {r}. VkBlendOp -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_OP_MIN = VkBlendOp 3

pattern VK_BLEND_OP_MAX :: VkBlendOp

pattern $bVK_BLEND_OP_MAX :: VkBlendOp
$mVK_BLEND_OP_MAX :: forall {r}. VkBlendOp -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_OP_MAX = VkBlendOp 4

-- | type = @enum@
--
--   <https://www.khronos.org/registry/vulkan/specs/1.2-extensions/html/vkspec.html#VkBlendOverlapEXT VkBlendOverlapEXT registry at www.khronos.org>
newtype VkBlendOverlapEXT = VkBlendOverlapEXT Int32
                            deriving (VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool
(VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool)
-> (VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool)
-> Eq VkBlendOverlapEXT
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool
$c/= :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool
== :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool
$c== :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool
Eq, Eq VkBlendOverlapEXT
Eq VkBlendOverlapEXT
-> (VkBlendOverlapEXT -> VkBlendOverlapEXT -> Ordering)
-> (VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool)
-> (VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool)
-> (VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool)
-> (VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool)
-> (VkBlendOverlapEXT -> VkBlendOverlapEXT -> VkBlendOverlapEXT)
-> (VkBlendOverlapEXT -> VkBlendOverlapEXT -> VkBlendOverlapEXT)
-> Ord VkBlendOverlapEXT
VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool
VkBlendOverlapEXT -> VkBlendOverlapEXT -> Ordering
VkBlendOverlapEXT -> VkBlendOverlapEXT -> VkBlendOverlapEXT
forall a.
Eq a
-> (a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> VkBlendOverlapEXT
$cmin :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> VkBlendOverlapEXT
max :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> VkBlendOverlapEXT
$cmax :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> VkBlendOverlapEXT
>= :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool
$c>= :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool
> :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool
$c> :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool
<= :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool
$c<= :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool
< :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool
$c< :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> Bool
compare :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> Ordering
$ccompare :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> Ordering
Ord, Int -> VkBlendOverlapEXT
VkBlendOverlapEXT -> Int
VkBlendOverlapEXT -> [VkBlendOverlapEXT]
VkBlendOverlapEXT -> VkBlendOverlapEXT
VkBlendOverlapEXT -> VkBlendOverlapEXT -> [VkBlendOverlapEXT]
VkBlendOverlapEXT
-> VkBlendOverlapEXT -> VkBlendOverlapEXT -> [VkBlendOverlapEXT]
(VkBlendOverlapEXT -> VkBlendOverlapEXT)
-> (VkBlendOverlapEXT -> VkBlendOverlapEXT)
-> (Int -> VkBlendOverlapEXT)
-> (VkBlendOverlapEXT -> Int)
-> (VkBlendOverlapEXT -> [VkBlendOverlapEXT])
-> (VkBlendOverlapEXT -> VkBlendOverlapEXT -> [VkBlendOverlapEXT])
-> (VkBlendOverlapEXT -> VkBlendOverlapEXT -> [VkBlendOverlapEXT])
-> (VkBlendOverlapEXT
    -> VkBlendOverlapEXT -> VkBlendOverlapEXT -> [VkBlendOverlapEXT])
-> Enum VkBlendOverlapEXT
forall a.
(a -> a)
-> (a -> a)
-> (Int -> a)
-> (a -> Int)
-> (a -> [a])
-> (a -> a -> [a])
-> (a -> a -> [a])
-> (a -> a -> a -> [a])
-> Enum a
enumFromThenTo :: VkBlendOverlapEXT
-> VkBlendOverlapEXT -> VkBlendOverlapEXT -> [VkBlendOverlapEXT]
$cenumFromThenTo :: VkBlendOverlapEXT
-> VkBlendOverlapEXT -> VkBlendOverlapEXT -> [VkBlendOverlapEXT]
enumFromTo :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> [VkBlendOverlapEXT]
$cenumFromTo :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> [VkBlendOverlapEXT]
enumFromThen :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> [VkBlendOverlapEXT]
$cenumFromThen :: VkBlendOverlapEXT -> VkBlendOverlapEXT -> [VkBlendOverlapEXT]
enumFrom :: VkBlendOverlapEXT -> [VkBlendOverlapEXT]
$cenumFrom :: VkBlendOverlapEXT -> [VkBlendOverlapEXT]
fromEnum :: VkBlendOverlapEXT -> Int
$cfromEnum :: VkBlendOverlapEXT -> Int
toEnum :: Int -> VkBlendOverlapEXT
$ctoEnum :: Int -> VkBlendOverlapEXT
pred :: VkBlendOverlapEXT -> VkBlendOverlapEXT
$cpred :: VkBlendOverlapEXT -> VkBlendOverlapEXT
succ :: VkBlendOverlapEXT -> VkBlendOverlapEXT
$csucc :: VkBlendOverlapEXT -> VkBlendOverlapEXT
Enum, Ptr VkBlendOverlapEXT -> IO VkBlendOverlapEXT
Ptr VkBlendOverlapEXT -> Int -> IO VkBlendOverlapEXT
Ptr VkBlendOverlapEXT -> Int -> VkBlendOverlapEXT -> IO ()
Ptr VkBlendOverlapEXT -> VkBlendOverlapEXT -> IO ()
VkBlendOverlapEXT -> Int
(VkBlendOverlapEXT -> Int)
-> (VkBlendOverlapEXT -> Int)
-> (Ptr VkBlendOverlapEXT -> Int -> IO VkBlendOverlapEXT)
-> (Ptr VkBlendOverlapEXT -> Int -> VkBlendOverlapEXT -> IO ())
-> (forall b. Ptr b -> Int -> IO VkBlendOverlapEXT)
-> (forall b. Ptr b -> Int -> VkBlendOverlapEXT -> IO ())
-> (Ptr VkBlendOverlapEXT -> IO VkBlendOverlapEXT)
-> (Ptr VkBlendOverlapEXT -> VkBlendOverlapEXT -> IO ())
-> Storable VkBlendOverlapEXT
forall b. Ptr b -> Int -> IO VkBlendOverlapEXT
forall b. Ptr b -> Int -> VkBlendOverlapEXT -> IO ()
forall a.
(a -> Int)
-> (a -> Int)
-> (Ptr a -> Int -> IO a)
-> (Ptr a -> Int -> a -> IO ())
-> (forall b. Ptr b -> Int -> IO a)
-> (forall b. Ptr b -> Int -> a -> IO ())
-> (Ptr a -> IO a)
-> (Ptr a -> a -> IO ())
-> Storable a
poke :: Ptr VkBlendOverlapEXT -> VkBlendOverlapEXT -> IO ()
$cpoke :: Ptr VkBlendOverlapEXT -> VkBlendOverlapEXT -> IO ()
peek :: Ptr VkBlendOverlapEXT -> IO VkBlendOverlapEXT
$cpeek :: Ptr VkBlendOverlapEXT -> IO VkBlendOverlapEXT
pokeByteOff :: forall b. Ptr b -> Int -> VkBlendOverlapEXT -> IO ()
$cpokeByteOff :: forall b. Ptr b -> Int -> VkBlendOverlapEXT -> IO ()
peekByteOff :: forall b. Ptr b -> Int -> IO VkBlendOverlapEXT
$cpeekByteOff :: forall b. Ptr b -> Int -> IO VkBlendOverlapEXT
pokeElemOff :: Ptr VkBlendOverlapEXT -> Int -> VkBlendOverlapEXT -> IO ()
$cpokeElemOff :: Ptr VkBlendOverlapEXT -> Int -> VkBlendOverlapEXT -> IO ()
peekElemOff :: Ptr VkBlendOverlapEXT -> Int -> IO VkBlendOverlapEXT
$cpeekElemOff :: Ptr VkBlendOverlapEXT -> Int -> IO VkBlendOverlapEXT
alignment :: VkBlendOverlapEXT -> Int
$calignment :: VkBlendOverlapEXT -> Int
sizeOf :: VkBlendOverlapEXT -> Int
$csizeOf :: VkBlendOverlapEXT -> Int
Storable)

instance Show VkBlendOverlapEXT where
    showsPrec :: Int -> VkBlendOverlapEXT -> ShowS
showsPrec Int
_ VkBlendOverlapEXT
VK_BLEND_OVERLAP_UNCORRELATED_EXT
      = String -> ShowS
showString String
"VK_BLEND_OVERLAP_UNCORRELATED_EXT"
    showsPrec Int
_ VkBlendOverlapEXT
VK_BLEND_OVERLAP_DISJOINT_EXT
      = String -> ShowS
showString String
"VK_BLEND_OVERLAP_DISJOINT_EXT"
    showsPrec Int
_ VkBlendOverlapEXT
VK_BLEND_OVERLAP_CONJOINT_EXT
      = String -> ShowS
showString String
"VK_BLEND_OVERLAP_CONJOINT_EXT"
    showsPrec Int
p (VkBlendOverlapEXT Int32
x)
      = Bool -> ShowS -> ShowS
showParen (Int
p Int -> Int -> Bool
forall a. Ord a => a -> a -> Bool
>= Int
11)
          (String -> ShowS
showString String
"VkBlendOverlapEXT " ShowS -> ShowS -> ShowS
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Int -> Int32 -> ShowS
forall a. Show a => Int -> a -> ShowS
showsPrec Int
11 Int32
x)

instance Read VkBlendOverlapEXT where
    readPrec :: ReadPrec VkBlendOverlapEXT
readPrec
      = ReadPrec VkBlendOverlapEXT -> ReadPrec VkBlendOverlapEXT
forall a. ReadPrec a -> ReadPrec a
parens
          ([(String, ReadPrec VkBlendOverlapEXT)]
-> ReadPrec VkBlendOverlapEXT
forall a. [(String, ReadPrec a)] -> ReadPrec a
choose
             [(String
"VK_BLEND_OVERLAP_UNCORRELATED_EXT",
               VkBlendOverlapEXT -> ReadPrec VkBlendOverlapEXT
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendOverlapEXT
VK_BLEND_OVERLAP_UNCORRELATED_EXT),
              (String
"VK_BLEND_OVERLAP_DISJOINT_EXT",
               VkBlendOverlapEXT -> ReadPrec VkBlendOverlapEXT
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendOverlapEXT
VK_BLEND_OVERLAP_DISJOINT_EXT),
              (String
"VK_BLEND_OVERLAP_CONJOINT_EXT",
               VkBlendOverlapEXT -> ReadPrec VkBlendOverlapEXT
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkBlendOverlapEXT
VK_BLEND_OVERLAP_CONJOINT_EXT)]
             ReadPrec VkBlendOverlapEXT
-> ReadPrec VkBlendOverlapEXT -> ReadPrec VkBlendOverlapEXT
forall a. ReadPrec a -> ReadPrec a -> ReadPrec a
+++
             Int -> ReadPrec VkBlendOverlapEXT -> ReadPrec VkBlendOverlapEXT
forall a. Int -> ReadPrec a -> ReadPrec a
prec Int
10
               (Lexeme -> ReadPrec ()
expectP (String -> Lexeme
Ident String
"VkBlendOverlapEXT") ReadPrec ()
-> ReadPrec VkBlendOverlapEXT -> ReadPrec VkBlendOverlapEXT
forall (m :: * -> *) a b. Monad m => m a -> m b -> m b
>>
                  (Int32 -> VkBlendOverlapEXT
VkBlendOverlapEXT (Int32 -> VkBlendOverlapEXT)
-> ReadPrec Int32 -> ReadPrec VkBlendOverlapEXT
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> ReadPrec Int32 -> ReadPrec Int32
forall a. ReadPrec a -> ReadPrec a
step ReadPrec Int32
forall a. Read a => ReadPrec a
readPrec)))

pattern VK_BLEND_OVERLAP_UNCORRELATED_EXT :: VkBlendOverlapEXT

pattern $bVK_BLEND_OVERLAP_UNCORRELATED_EXT :: VkBlendOverlapEXT
$mVK_BLEND_OVERLAP_UNCORRELATED_EXT :: forall {r}. VkBlendOverlapEXT -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_OVERLAP_UNCORRELATED_EXT = VkBlendOverlapEXT 0

pattern VK_BLEND_OVERLAP_DISJOINT_EXT :: VkBlendOverlapEXT

pattern $bVK_BLEND_OVERLAP_DISJOINT_EXT :: VkBlendOverlapEXT
$mVK_BLEND_OVERLAP_DISJOINT_EXT :: forall {r}. VkBlendOverlapEXT -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_OVERLAP_DISJOINT_EXT = VkBlendOverlapEXT 1

pattern VK_BLEND_OVERLAP_CONJOINT_EXT :: VkBlendOverlapEXT

pattern $bVK_BLEND_OVERLAP_CONJOINT_EXT :: VkBlendOverlapEXT
$mVK_BLEND_OVERLAP_CONJOINT_EXT :: forall {r}. VkBlendOverlapEXT -> (Void# -> r) -> (Void# -> r) -> r
VK_BLEND_OVERLAP_CONJOINT_EXT = VkBlendOverlapEXT 2