{-# OPTIONS_HADDOCK ignore-exports#-}
{-# LANGUAGE DataKinds                  #-}
{-# LANGUAGE DeriveDataTypeable         #-}
{-# LANGUAGE DeriveGeneric              #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE PatternSynonyms            #-}
{-# LANGUAGE Strict                     #-}
module Graphics.Vulkan.Types.Enum.LogicOp
       (VkLogicOp(VkLogicOp, VK_LOGIC_OP_CLEAR, VK_LOGIC_OP_AND,
                  VK_LOGIC_OP_AND_REVERSE, VK_LOGIC_OP_COPY,
                  VK_LOGIC_OP_AND_INVERTED, VK_LOGIC_OP_NO_OP, VK_LOGIC_OP_XOR,
                  VK_LOGIC_OP_OR, VK_LOGIC_OP_NOR, VK_LOGIC_OP_EQUIVALENT,
                  VK_LOGIC_OP_INVERT, VK_LOGIC_OP_OR_REVERSE,
                  VK_LOGIC_OP_COPY_INVERTED, VK_LOGIC_OP_OR_INVERTED,
                  VK_LOGIC_OP_NAND, VK_LOGIC_OP_SET))
       where
import           Data.Data                       (Data)
import           Foreign.Storable                (Storable)
import           GHC.Generics                    (Generic)
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.1-extensions/html/vkspec.html#VkLogicOp VkLogicOp registry at www.khronos.org>
newtype VkLogicOp = VkLogicOp Int32
                      deriving (VkLogicOp -> VkLogicOp -> Bool
(VkLogicOp -> VkLogicOp -> Bool)
-> (VkLogicOp -> VkLogicOp -> Bool) -> Eq VkLogicOp
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: VkLogicOp -> VkLogicOp -> Bool
$c/= :: VkLogicOp -> VkLogicOp -> Bool
== :: VkLogicOp -> VkLogicOp -> Bool
$c== :: VkLogicOp -> VkLogicOp -> Bool
Eq, Eq VkLogicOp
Eq VkLogicOp
-> (VkLogicOp -> VkLogicOp -> Ordering)
-> (VkLogicOp -> VkLogicOp -> Bool)
-> (VkLogicOp -> VkLogicOp -> Bool)
-> (VkLogicOp -> VkLogicOp -> Bool)
-> (VkLogicOp -> VkLogicOp -> Bool)
-> (VkLogicOp -> VkLogicOp -> VkLogicOp)
-> (VkLogicOp -> VkLogicOp -> VkLogicOp)
-> Ord VkLogicOp
VkLogicOp -> VkLogicOp -> Bool
VkLogicOp -> VkLogicOp -> Ordering
VkLogicOp -> VkLogicOp -> VkLogicOp
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 :: VkLogicOp -> VkLogicOp -> VkLogicOp
$cmin :: VkLogicOp -> VkLogicOp -> VkLogicOp
max :: VkLogicOp -> VkLogicOp -> VkLogicOp
$cmax :: VkLogicOp -> VkLogicOp -> VkLogicOp
>= :: VkLogicOp -> VkLogicOp -> Bool
$c>= :: VkLogicOp -> VkLogicOp -> Bool
> :: VkLogicOp -> VkLogicOp -> Bool
$c> :: VkLogicOp -> VkLogicOp -> Bool
<= :: VkLogicOp -> VkLogicOp -> Bool
$c<= :: VkLogicOp -> VkLogicOp -> Bool
< :: VkLogicOp -> VkLogicOp -> Bool
$c< :: VkLogicOp -> VkLogicOp -> Bool
compare :: VkLogicOp -> VkLogicOp -> Ordering
$ccompare :: VkLogicOp -> VkLogicOp -> Ordering
$cp1Ord :: Eq VkLogicOp
Ord, Integer -> VkLogicOp
VkLogicOp -> VkLogicOp
VkLogicOp -> VkLogicOp -> VkLogicOp
(VkLogicOp -> VkLogicOp -> VkLogicOp)
-> (VkLogicOp -> VkLogicOp -> VkLogicOp)
-> (VkLogicOp -> VkLogicOp -> VkLogicOp)
-> (VkLogicOp -> VkLogicOp)
-> (VkLogicOp -> VkLogicOp)
-> (VkLogicOp -> VkLogicOp)
-> (Integer -> VkLogicOp)
-> Num VkLogicOp
forall a.
(a -> a -> a)
-> (a -> a -> a)
-> (a -> a -> a)
-> (a -> a)
-> (a -> a)
-> (a -> a)
-> (Integer -> a)
-> Num a
fromInteger :: Integer -> VkLogicOp
$cfromInteger :: Integer -> VkLogicOp
signum :: VkLogicOp -> VkLogicOp
$csignum :: VkLogicOp -> VkLogicOp
abs :: VkLogicOp -> VkLogicOp
$cabs :: VkLogicOp -> VkLogicOp
negate :: VkLogicOp -> VkLogicOp
$cnegate :: VkLogicOp -> VkLogicOp
* :: VkLogicOp -> VkLogicOp -> VkLogicOp
$c* :: VkLogicOp -> VkLogicOp -> VkLogicOp
- :: VkLogicOp -> VkLogicOp -> VkLogicOp
$c- :: VkLogicOp -> VkLogicOp -> VkLogicOp
+ :: VkLogicOp -> VkLogicOp -> VkLogicOp
$c+ :: VkLogicOp -> VkLogicOp -> VkLogicOp
Num, VkLogicOp
VkLogicOp -> VkLogicOp -> Bounded VkLogicOp
forall a. a -> a -> Bounded a
maxBound :: VkLogicOp
$cmaxBound :: VkLogicOp
minBound :: VkLogicOp
$cminBound :: VkLogicOp
Bounded, Ptr b -> Int -> IO VkLogicOp
Ptr b -> Int -> VkLogicOp -> IO ()
Ptr VkLogicOp -> IO VkLogicOp
Ptr VkLogicOp -> Int -> IO VkLogicOp
Ptr VkLogicOp -> Int -> VkLogicOp -> IO ()
Ptr VkLogicOp -> VkLogicOp -> IO ()
VkLogicOp -> Int
(VkLogicOp -> Int)
-> (VkLogicOp -> Int)
-> (Ptr VkLogicOp -> Int -> IO VkLogicOp)
-> (Ptr VkLogicOp -> Int -> VkLogicOp -> IO ())
-> (forall b. Ptr b -> Int -> IO VkLogicOp)
-> (forall b. Ptr b -> Int -> VkLogicOp -> IO ())
-> (Ptr VkLogicOp -> IO VkLogicOp)
-> (Ptr VkLogicOp -> VkLogicOp -> IO ())
-> Storable VkLogicOp
forall b. Ptr b -> Int -> IO VkLogicOp
forall b. Ptr b -> Int -> VkLogicOp -> 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 VkLogicOp -> VkLogicOp -> IO ()
$cpoke :: Ptr VkLogicOp -> VkLogicOp -> IO ()
peek :: Ptr VkLogicOp -> IO VkLogicOp
$cpeek :: Ptr VkLogicOp -> IO VkLogicOp
pokeByteOff :: Ptr b -> Int -> VkLogicOp -> IO ()
$cpokeByteOff :: forall b. Ptr b -> Int -> VkLogicOp -> IO ()
peekByteOff :: Ptr b -> Int -> IO VkLogicOp
$cpeekByteOff :: forall b. Ptr b -> Int -> IO VkLogicOp
pokeElemOff :: Ptr VkLogicOp -> Int -> VkLogicOp -> IO ()
$cpokeElemOff :: Ptr VkLogicOp -> Int -> VkLogicOp -> IO ()
peekElemOff :: Ptr VkLogicOp -> Int -> IO VkLogicOp
$cpeekElemOff :: Ptr VkLogicOp -> Int -> IO VkLogicOp
alignment :: VkLogicOp -> Int
$calignment :: VkLogicOp -> Int
sizeOf :: VkLogicOp -> Int
$csizeOf :: VkLogicOp -> Int
Storable, Int -> VkLogicOp
VkLogicOp -> Int
VkLogicOp -> [VkLogicOp]
VkLogicOp -> VkLogicOp
VkLogicOp -> VkLogicOp -> [VkLogicOp]
VkLogicOp -> VkLogicOp -> VkLogicOp -> [VkLogicOp]
(VkLogicOp -> VkLogicOp)
-> (VkLogicOp -> VkLogicOp)
-> (Int -> VkLogicOp)
-> (VkLogicOp -> Int)
-> (VkLogicOp -> [VkLogicOp])
-> (VkLogicOp -> VkLogicOp -> [VkLogicOp])
-> (VkLogicOp -> VkLogicOp -> [VkLogicOp])
-> (VkLogicOp -> VkLogicOp -> VkLogicOp -> [VkLogicOp])
-> Enum VkLogicOp
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 :: VkLogicOp -> VkLogicOp -> VkLogicOp -> [VkLogicOp]
$cenumFromThenTo :: VkLogicOp -> VkLogicOp -> VkLogicOp -> [VkLogicOp]
enumFromTo :: VkLogicOp -> VkLogicOp -> [VkLogicOp]
$cenumFromTo :: VkLogicOp -> VkLogicOp -> [VkLogicOp]
enumFromThen :: VkLogicOp -> VkLogicOp -> [VkLogicOp]
$cenumFromThen :: VkLogicOp -> VkLogicOp -> [VkLogicOp]
enumFrom :: VkLogicOp -> [VkLogicOp]
$cenumFrom :: VkLogicOp -> [VkLogicOp]
fromEnum :: VkLogicOp -> Int
$cfromEnum :: VkLogicOp -> Int
toEnum :: Int -> VkLogicOp
$ctoEnum :: Int -> VkLogicOp
pred :: VkLogicOp -> VkLogicOp
$cpred :: VkLogicOp -> VkLogicOp
succ :: VkLogicOp -> VkLogicOp
$csucc :: VkLogicOp -> VkLogicOp
Enum, Typeable VkLogicOp
DataType
Constr
Typeable VkLogicOp
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> VkLogicOp -> c VkLogicOp)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c VkLogicOp)
-> (VkLogicOp -> Constr)
-> (VkLogicOp -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c VkLogicOp))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c VkLogicOp))
-> ((forall b. Data b => b -> b) -> VkLogicOp -> VkLogicOp)
-> (forall r r'.
    (r -> r' -> r)
    -> r -> (forall d. Data d => d -> r') -> VkLogicOp -> r)
-> (forall r r'.
    (r' -> r -> r)
    -> r -> (forall d. Data d => d -> r') -> VkLogicOp -> r)
-> (forall u. (forall d. Data d => d -> u) -> VkLogicOp -> [u])
-> (forall u.
    Int -> (forall d. Data d => d -> u) -> VkLogicOp -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d) -> VkLogicOp -> m VkLogicOp)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> VkLogicOp -> m VkLogicOp)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> VkLogicOp -> m VkLogicOp)
-> Data VkLogicOp
VkLogicOp -> DataType
VkLogicOp -> Constr
(forall b. Data b => b -> b) -> VkLogicOp -> VkLogicOp
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> VkLogicOp -> c VkLogicOp
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c VkLogicOp
forall a.
Typeable a
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g) -> a -> c a)
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c a)
-> (a -> Constr)
-> (a -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d)) -> Maybe (c a))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c a))
-> ((forall b. Data b => b -> b) -> a -> a)
-> (forall r r'.
    (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall r r'.
    (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> a -> r)
-> (forall u. (forall d. Data d => d -> u) -> a -> [u])
-> (forall u. Int -> (forall d. Data d => d -> u) -> a -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d) -> a -> m a)
-> Data a
forall u. Int -> (forall d. Data d => d -> u) -> VkLogicOp -> u
forall u. (forall d. Data d => d -> u) -> VkLogicOp -> [u]
forall r r'.
(r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> VkLogicOp -> r
forall r r'.
(r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> VkLogicOp -> r
forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d) -> VkLogicOp -> m VkLogicOp
forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d) -> VkLogicOp -> m VkLogicOp
forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c VkLogicOp
forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> VkLogicOp -> c VkLogicOp
forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c VkLogicOp)
forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c VkLogicOp)
$cVkLogicOp :: Constr
$tVkLogicOp :: DataType
gmapMo :: (forall d. Data d => d -> m d) -> VkLogicOp -> m VkLogicOp
$cgmapMo :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d) -> VkLogicOp -> m VkLogicOp
gmapMp :: (forall d. Data d => d -> m d) -> VkLogicOp -> m VkLogicOp
$cgmapMp :: forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d) -> VkLogicOp -> m VkLogicOp
gmapM :: (forall d. Data d => d -> m d) -> VkLogicOp -> m VkLogicOp
$cgmapM :: forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d) -> VkLogicOp -> m VkLogicOp
gmapQi :: Int -> (forall d. Data d => d -> u) -> VkLogicOp -> u
$cgmapQi :: forall u. Int -> (forall d. Data d => d -> u) -> VkLogicOp -> u
gmapQ :: (forall d. Data d => d -> u) -> VkLogicOp -> [u]
$cgmapQ :: forall u. (forall d. Data d => d -> u) -> VkLogicOp -> [u]
gmapQr :: (r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> VkLogicOp -> r
$cgmapQr :: forall r r'.
(r' -> r -> r)
-> r -> (forall d. Data d => d -> r') -> VkLogicOp -> r
gmapQl :: (r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> VkLogicOp -> r
$cgmapQl :: forall r r'.
(r -> r' -> r)
-> r -> (forall d. Data d => d -> r') -> VkLogicOp -> r
gmapT :: (forall b. Data b => b -> b) -> VkLogicOp -> VkLogicOp
$cgmapT :: (forall b. Data b => b -> b) -> VkLogicOp -> VkLogicOp
dataCast2 :: (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c VkLogicOp)
$cdataCast2 :: forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c VkLogicOp)
dataCast1 :: (forall d. Data d => c (t d)) -> Maybe (c VkLogicOp)
$cdataCast1 :: forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d)) -> Maybe (c VkLogicOp)
dataTypeOf :: VkLogicOp -> DataType
$cdataTypeOf :: VkLogicOp -> DataType
toConstr :: VkLogicOp -> Constr
$ctoConstr :: VkLogicOp -> Constr
gunfold :: (forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c VkLogicOp
$cgunfold :: forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c VkLogicOp
gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> VkLogicOp -> c VkLogicOp
$cgfoldl :: forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g) -> VkLogicOp -> c VkLogicOp
$cp1Data :: Typeable VkLogicOp
Data, (forall x. VkLogicOp -> Rep VkLogicOp x)
-> (forall x. Rep VkLogicOp x -> VkLogicOp) -> Generic VkLogicOp
forall x. Rep VkLogicOp x -> VkLogicOp
forall x. VkLogicOp -> Rep VkLogicOp x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep VkLogicOp x -> VkLogicOp
$cfrom :: forall x. VkLogicOp -> Rep VkLogicOp x
Generic)

instance Show VkLogicOp where
        showsPrec :: Int -> VkLogicOp -> ShowS
showsPrec Int
_ VkLogicOp
VK_LOGIC_OP_CLEAR = String -> ShowS
showString String
"VK_LOGIC_OP_CLEAR"
        showsPrec Int
_ VkLogicOp
VK_LOGIC_OP_AND = String -> ShowS
showString String
"VK_LOGIC_OP_AND"
        showsPrec Int
_ VkLogicOp
VK_LOGIC_OP_AND_REVERSE
          = String -> ShowS
showString String
"VK_LOGIC_OP_AND_REVERSE"
        showsPrec Int
_ VkLogicOp
VK_LOGIC_OP_COPY = String -> ShowS
showString String
"VK_LOGIC_OP_COPY"
        showsPrec Int
_ VkLogicOp
VK_LOGIC_OP_AND_INVERTED
          = String -> ShowS
showString String
"VK_LOGIC_OP_AND_INVERTED"
        showsPrec Int
_ VkLogicOp
VK_LOGIC_OP_NO_OP = String -> ShowS
showString String
"VK_LOGIC_OP_NO_OP"
        showsPrec Int
_ VkLogicOp
VK_LOGIC_OP_XOR = String -> ShowS
showString String
"VK_LOGIC_OP_XOR"
        showsPrec Int
_ VkLogicOp
VK_LOGIC_OP_OR = String -> ShowS
showString String
"VK_LOGIC_OP_OR"
        showsPrec Int
_ VkLogicOp
VK_LOGIC_OP_NOR = String -> ShowS
showString String
"VK_LOGIC_OP_NOR"
        showsPrec Int
_ VkLogicOp
VK_LOGIC_OP_EQUIVALENT
          = String -> ShowS
showString String
"VK_LOGIC_OP_EQUIVALENT"
        showsPrec Int
_ VkLogicOp
VK_LOGIC_OP_INVERT = String -> ShowS
showString String
"VK_LOGIC_OP_INVERT"
        showsPrec Int
_ VkLogicOp
VK_LOGIC_OP_OR_REVERSE
          = String -> ShowS
showString String
"VK_LOGIC_OP_OR_REVERSE"
        showsPrec Int
_ VkLogicOp
VK_LOGIC_OP_COPY_INVERTED
          = String -> ShowS
showString String
"VK_LOGIC_OP_COPY_INVERTED"
        showsPrec Int
_ VkLogicOp
VK_LOGIC_OP_OR_INVERTED
          = String -> ShowS
showString String
"VK_LOGIC_OP_OR_INVERTED"
        showsPrec Int
_ VkLogicOp
VK_LOGIC_OP_NAND = String -> ShowS
showString String
"VK_LOGIC_OP_NAND"
        showsPrec Int
_ VkLogicOp
VK_LOGIC_OP_SET = String -> ShowS
showString String
"VK_LOGIC_OP_SET"
        showsPrec Int
p (VkLogicOp Int32
x)
          = Bool -> ShowS -> ShowS
showParen (Int
p Int -> Int -> Bool
forall a. Ord a => a -> a -> Bool
>= Int
11) (String -> ShowS
showString String
"VkLogicOp " 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 VkLogicOp where
        readPrec :: ReadPrec VkLogicOp
readPrec
          = ReadPrec VkLogicOp -> ReadPrec VkLogicOp
forall a. ReadPrec a -> ReadPrec a
parens
              ([(String, ReadPrec VkLogicOp)] -> ReadPrec VkLogicOp
forall a. [(String, ReadPrec a)] -> ReadPrec a
choose
                 [(String
"VK_LOGIC_OP_CLEAR", VkLogicOp -> ReadPrec VkLogicOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkLogicOp
VK_LOGIC_OP_CLEAR),
                  (String
"VK_LOGIC_OP_AND", VkLogicOp -> ReadPrec VkLogicOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkLogicOp
VK_LOGIC_OP_AND),
                  (String
"VK_LOGIC_OP_AND_REVERSE", VkLogicOp -> ReadPrec VkLogicOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkLogicOp
VK_LOGIC_OP_AND_REVERSE),
                  (String
"VK_LOGIC_OP_COPY", VkLogicOp -> ReadPrec VkLogicOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkLogicOp
VK_LOGIC_OP_COPY),
                  (String
"VK_LOGIC_OP_AND_INVERTED", VkLogicOp -> ReadPrec VkLogicOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkLogicOp
VK_LOGIC_OP_AND_INVERTED),
                  (String
"VK_LOGIC_OP_NO_OP", VkLogicOp -> ReadPrec VkLogicOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkLogicOp
VK_LOGIC_OP_NO_OP),
                  (String
"VK_LOGIC_OP_XOR", VkLogicOp -> ReadPrec VkLogicOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkLogicOp
VK_LOGIC_OP_XOR),
                  (String
"VK_LOGIC_OP_OR", VkLogicOp -> ReadPrec VkLogicOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkLogicOp
VK_LOGIC_OP_OR),
                  (String
"VK_LOGIC_OP_NOR", VkLogicOp -> ReadPrec VkLogicOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkLogicOp
VK_LOGIC_OP_NOR),
                  (String
"VK_LOGIC_OP_EQUIVALENT", VkLogicOp -> ReadPrec VkLogicOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkLogicOp
VK_LOGIC_OP_EQUIVALENT),
                  (String
"VK_LOGIC_OP_INVERT", VkLogicOp -> ReadPrec VkLogicOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkLogicOp
VK_LOGIC_OP_INVERT),
                  (String
"VK_LOGIC_OP_OR_REVERSE", VkLogicOp -> ReadPrec VkLogicOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkLogicOp
VK_LOGIC_OP_OR_REVERSE),
                  (String
"VK_LOGIC_OP_COPY_INVERTED", VkLogicOp -> ReadPrec VkLogicOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkLogicOp
VK_LOGIC_OP_COPY_INVERTED),
                  (String
"VK_LOGIC_OP_OR_INVERTED", VkLogicOp -> ReadPrec VkLogicOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkLogicOp
VK_LOGIC_OP_OR_INVERTED),
                  (String
"VK_LOGIC_OP_NAND", VkLogicOp -> ReadPrec VkLogicOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkLogicOp
VK_LOGIC_OP_NAND),
                  (String
"VK_LOGIC_OP_SET", VkLogicOp -> ReadPrec VkLogicOp
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkLogicOp
VK_LOGIC_OP_SET)]
                 ReadPrec VkLogicOp -> ReadPrec VkLogicOp -> ReadPrec VkLogicOp
forall a. ReadPrec a -> ReadPrec a -> ReadPrec a
+++
                 Int -> ReadPrec VkLogicOp -> ReadPrec VkLogicOp
forall a. Int -> ReadPrec a -> ReadPrec a
prec Int
10
                   (Lexeme -> ReadPrec ()
expectP (String -> Lexeme
Ident String
"VkLogicOp") ReadPrec () -> ReadPrec VkLogicOp -> ReadPrec VkLogicOp
forall (m :: * -> *) a b. Monad m => m a -> m b -> m b
>> (Int32 -> VkLogicOp
VkLogicOp (Int32 -> VkLogicOp) -> ReadPrec Int32 -> ReadPrec VkLogicOp
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_LOGIC_OP_CLEAR :: VkLogicOp

pattern $bVK_LOGIC_OP_CLEAR :: VkLogicOp
$mVK_LOGIC_OP_CLEAR :: forall r. VkLogicOp -> (Void# -> r) -> (Void# -> r) -> r
VK_LOGIC_OP_CLEAR = VkLogicOp 0

pattern VK_LOGIC_OP_AND :: VkLogicOp

pattern $bVK_LOGIC_OP_AND :: VkLogicOp
$mVK_LOGIC_OP_AND :: forall r. VkLogicOp -> (Void# -> r) -> (Void# -> r) -> r
VK_LOGIC_OP_AND = VkLogicOp 1

pattern VK_LOGIC_OP_AND_REVERSE :: VkLogicOp

pattern $bVK_LOGIC_OP_AND_REVERSE :: VkLogicOp
$mVK_LOGIC_OP_AND_REVERSE :: forall r. VkLogicOp -> (Void# -> r) -> (Void# -> r) -> r
VK_LOGIC_OP_AND_REVERSE = VkLogicOp 2

pattern VK_LOGIC_OP_COPY :: VkLogicOp

pattern $bVK_LOGIC_OP_COPY :: VkLogicOp
$mVK_LOGIC_OP_COPY :: forall r. VkLogicOp -> (Void# -> r) -> (Void# -> r) -> r
VK_LOGIC_OP_COPY = VkLogicOp 3

pattern VK_LOGIC_OP_AND_INVERTED :: VkLogicOp

pattern $bVK_LOGIC_OP_AND_INVERTED :: VkLogicOp
$mVK_LOGIC_OP_AND_INVERTED :: forall r. VkLogicOp -> (Void# -> r) -> (Void# -> r) -> r
VK_LOGIC_OP_AND_INVERTED = VkLogicOp 4

pattern VK_LOGIC_OP_NO_OP :: VkLogicOp

pattern $bVK_LOGIC_OP_NO_OP :: VkLogicOp
$mVK_LOGIC_OP_NO_OP :: forall r. VkLogicOp -> (Void# -> r) -> (Void# -> r) -> r
VK_LOGIC_OP_NO_OP = VkLogicOp 5

pattern VK_LOGIC_OP_XOR :: VkLogicOp

pattern $bVK_LOGIC_OP_XOR :: VkLogicOp
$mVK_LOGIC_OP_XOR :: forall r. VkLogicOp -> (Void# -> r) -> (Void# -> r) -> r
VK_LOGIC_OP_XOR = VkLogicOp 6

pattern VK_LOGIC_OP_OR :: VkLogicOp

pattern $bVK_LOGIC_OP_OR :: VkLogicOp
$mVK_LOGIC_OP_OR :: forall r. VkLogicOp -> (Void# -> r) -> (Void# -> r) -> r
VK_LOGIC_OP_OR = VkLogicOp 7

pattern VK_LOGIC_OP_NOR :: VkLogicOp

pattern $bVK_LOGIC_OP_NOR :: VkLogicOp
$mVK_LOGIC_OP_NOR :: forall r. VkLogicOp -> (Void# -> r) -> (Void# -> r) -> r
VK_LOGIC_OP_NOR = VkLogicOp 8

pattern VK_LOGIC_OP_EQUIVALENT :: VkLogicOp

pattern $bVK_LOGIC_OP_EQUIVALENT :: VkLogicOp
$mVK_LOGIC_OP_EQUIVALENT :: forall r. VkLogicOp -> (Void# -> r) -> (Void# -> r) -> r
VK_LOGIC_OP_EQUIVALENT = VkLogicOp 9

pattern VK_LOGIC_OP_INVERT :: VkLogicOp

pattern $bVK_LOGIC_OP_INVERT :: VkLogicOp
$mVK_LOGIC_OP_INVERT :: forall r. VkLogicOp -> (Void# -> r) -> (Void# -> r) -> r
VK_LOGIC_OP_INVERT = VkLogicOp 10

pattern VK_LOGIC_OP_OR_REVERSE :: VkLogicOp

pattern $bVK_LOGIC_OP_OR_REVERSE :: VkLogicOp
$mVK_LOGIC_OP_OR_REVERSE :: forall r. VkLogicOp -> (Void# -> r) -> (Void# -> r) -> r
VK_LOGIC_OP_OR_REVERSE = VkLogicOp 11

pattern VK_LOGIC_OP_COPY_INVERTED :: VkLogicOp

pattern $bVK_LOGIC_OP_COPY_INVERTED :: VkLogicOp
$mVK_LOGIC_OP_COPY_INVERTED :: forall r. VkLogicOp -> (Void# -> r) -> (Void# -> r) -> r
VK_LOGIC_OP_COPY_INVERTED = VkLogicOp 12

pattern VK_LOGIC_OP_OR_INVERTED :: VkLogicOp

pattern $bVK_LOGIC_OP_OR_INVERTED :: VkLogicOp
$mVK_LOGIC_OP_OR_INVERTED :: forall r. VkLogicOp -> (Void# -> r) -> (Void# -> r) -> r
VK_LOGIC_OP_OR_INVERTED = VkLogicOp 13

pattern VK_LOGIC_OP_NAND :: VkLogicOp

pattern $bVK_LOGIC_OP_NAND :: VkLogicOp
$mVK_LOGIC_OP_NAND :: forall r. VkLogicOp -> (Void# -> r) -> (Void# -> r) -> r
VK_LOGIC_OP_NAND = VkLogicOp 14

pattern VK_LOGIC_OP_SET :: VkLogicOp

pattern $bVK_LOGIC_OP_SET :: VkLogicOp
$mVK_LOGIC_OP_SET :: forall r. VkLogicOp -> (Void# -> r) -> (Void# -> r) -> r
VK_LOGIC_OP_SET = VkLogicOp 15