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

instance Show VkVertexInputRate where
        showsPrec :: Int -> VkVertexInputRate -> ShowS
showsPrec Int
_ VkVertexInputRate
VK_VERTEX_INPUT_RATE_VERTEX
          = String -> ShowS
showString String
"VK_VERTEX_INPUT_RATE_VERTEX"
        showsPrec Int
_ VkVertexInputRate
VK_VERTEX_INPUT_RATE_INSTANCE
          = String -> ShowS
showString String
"VK_VERTEX_INPUT_RATE_INSTANCE"
        showsPrec Int
p (VkVertexInputRate Int32
x)
          = Bool -> ShowS -> ShowS
showParen (Int
p Int -> Int -> Bool
forall a. Ord a => a -> a -> Bool
>= Int
11)
              (String -> ShowS
showString String
"VkVertexInputRate " 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 VkVertexInputRate where
        readPrec :: ReadPrec VkVertexInputRate
readPrec
          = ReadPrec VkVertexInputRate -> ReadPrec VkVertexInputRate
forall a. ReadPrec a -> ReadPrec a
parens
              ([(String, ReadPrec VkVertexInputRate)]
-> ReadPrec VkVertexInputRate
forall a. [(String, ReadPrec a)] -> ReadPrec a
choose
                 [(String
"VK_VERTEX_INPUT_RATE_VERTEX", VkVertexInputRate -> ReadPrec VkVertexInputRate
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkVertexInputRate
VK_VERTEX_INPUT_RATE_VERTEX),
                  (String
"VK_VERTEX_INPUT_RATE_INSTANCE",
                   VkVertexInputRate -> ReadPrec VkVertexInputRate
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkVertexInputRate
VK_VERTEX_INPUT_RATE_INSTANCE)]
                 ReadPrec VkVertexInputRate
-> ReadPrec VkVertexInputRate -> ReadPrec VkVertexInputRate
forall a. ReadPrec a -> ReadPrec a -> ReadPrec a
+++
                 Int -> ReadPrec VkVertexInputRate -> ReadPrec VkVertexInputRate
forall a. Int -> ReadPrec a -> ReadPrec a
prec Int
10
                   (Lexeme -> ReadPrec ()
expectP (String -> Lexeme
Ident String
"VkVertexInputRate") ReadPrec ()
-> ReadPrec VkVertexInputRate -> ReadPrec VkVertexInputRate
forall (m :: * -> *) a b. Monad m => m a -> m b -> m b
>>
                      (Int32 -> VkVertexInputRate
VkVertexInputRate (Int32 -> VkVertexInputRate)
-> ReadPrec Int32 -> ReadPrec VkVertexInputRate
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_VERTEX_INPUT_RATE_VERTEX :: VkVertexInputRate

pattern $bVK_VERTEX_INPUT_RATE_VERTEX :: VkVertexInputRate
$mVK_VERTEX_INPUT_RATE_VERTEX :: forall r. VkVertexInputRate -> (Void# -> r) -> (Void# -> r) -> r
VK_VERTEX_INPUT_RATE_VERTEX = VkVertexInputRate 0

pattern VK_VERTEX_INPUT_RATE_INSTANCE :: VkVertexInputRate

pattern $bVK_VERTEX_INPUT_RATE_INSTANCE :: VkVertexInputRate
$mVK_VERTEX_INPUT_RATE_INSTANCE :: forall r. VkVertexInputRate -> (Void# -> r) -> (Void# -> r) -> r
VK_VERTEX_INPUT_RATE_INSTANCE = VkVertexInputRate 1