{-# OPTIONS_HADDOCK ignore-exports#-}
{-# LANGUAGE DataKinds                  #-}
{-# LANGUAGE DeriveDataTypeable         #-}
{-# LANGUAGE DeriveGeneric              #-}
{-# LANGUAGE FlexibleInstances          #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE KindSignatures             #-}
{-# LANGUAGE PatternSynonyms            #-}
{-# LANGUAGE StandaloneDeriving         #-}
{-# LANGUAGE Strict                     #-}
{-# LANGUAGE TypeSynonymInstances       #-}
module Graphics.Vulkan.Types.Enum.Color
       (VkColorComponentBitmask(VkColorComponentBitmask,
                                VkColorComponentFlags, VkColorComponentFlagBits,
                                VK_COLOR_COMPONENT_R_BIT, VK_COLOR_COMPONENT_G_BIT,
                                VK_COLOR_COMPONENT_B_BIT, VK_COLOR_COMPONENT_A_BIT),
        VkColorComponentFlags, VkColorComponentFlagBits,
        VkColorSpaceKHR(VkColorSpaceKHR,
                        VK_COLOR_SPACE_SRGB_NONLINEAR_KHR))
       where
import           Data.Bits                       (Bits, FiniteBits)
import           Data.Data                       (Data)
import           Foreign.Storable                (Storable)
import           GHC.Generics                    (Generic)
import           GHC.Read                        (choose, expectP)
import           Graphics.Vulkan.Marshal         (FlagBit, FlagMask, FlagType,
                                                  Int32)
import           Graphics.Vulkan.Types.BaseTypes (VkFlags (..))
import           Text.ParserCombinators.ReadPrec (prec, step, (+++))
import           Text.Read                       (Read (..), parens)
import           Text.Read.Lex                   (Lexeme (..))

newtype VkColorComponentBitmask (a ::
                                   FlagType) = VkColorComponentBitmask VkFlags
                                                 deriving (VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool
(VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool)
-> (VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool)
-> Eq (VkColorComponentBitmask a)
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
forall (a :: FlagType).
VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool
/= :: VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool
$c/= :: forall (a :: FlagType).
VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool
== :: VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool
$c== :: forall (a :: FlagType).
VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool
Eq, Eq (VkColorComponentBitmask a)
Eq (VkColorComponentBitmask a)
-> (VkColorComponentBitmask a
    -> VkColorComponentBitmask a -> Ordering)
-> (VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool)
-> (VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool)
-> (VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool)
-> (VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool)
-> (VkColorComponentBitmask a
    -> VkColorComponentBitmask a -> VkColorComponentBitmask a)
-> (VkColorComponentBitmask a
    -> VkColorComponentBitmask a -> VkColorComponentBitmask a)
-> Ord (VkColorComponentBitmask a)
VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool
VkColorComponentBitmask a -> VkColorComponentBitmask a -> Ordering
VkColorComponentBitmask a
-> VkColorComponentBitmask a -> VkColorComponentBitmask a
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
forall (a :: FlagType). Eq (VkColorComponentBitmask a)
forall (a :: FlagType).
VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool
forall (a :: FlagType).
VkColorComponentBitmask a -> VkColorComponentBitmask a -> Ordering
forall (a :: FlagType).
VkColorComponentBitmask a
-> VkColorComponentBitmask a -> VkColorComponentBitmask a
min :: VkColorComponentBitmask a
-> VkColorComponentBitmask a -> VkColorComponentBitmask a
$cmin :: forall (a :: FlagType).
VkColorComponentBitmask a
-> VkColorComponentBitmask a -> VkColorComponentBitmask a
max :: VkColorComponentBitmask a
-> VkColorComponentBitmask a -> VkColorComponentBitmask a
$cmax :: forall (a :: FlagType).
VkColorComponentBitmask a
-> VkColorComponentBitmask a -> VkColorComponentBitmask a
>= :: VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool
$c>= :: forall (a :: FlagType).
VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool
> :: VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool
$c> :: forall (a :: FlagType).
VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool
<= :: VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool
$c<= :: forall (a :: FlagType).
VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool
< :: VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool
$c< :: forall (a :: FlagType).
VkColorComponentBitmask a -> VkColorComponentBitmask a -> Bool
compare :: VkColorComponentBitmask a -> VkColorComponentBitmask a -> Ordering
$ccompare :: forall (a :: FlagType).
VkColorComponentBitmask a -> VkColorComponentBitmask a -> Ordering
$cp1Ord :: forall (a :: FlagType). Eq (VkColorComponentBitmask a)
Ord, Ptr b -> Int -> IO (VkColorComponentBitmask a)
Ptr b -> Int -> VkColorComponentBitmask a -> IO ()
Ptr (VkColorComponentBitmask a) -> IO (VkColorComponentBitmask a)
Ptr (VkColorComponentBitmask a)
-> Int -> IO (VkColorComponentBitmask a)
Ptr (VkColorComponentBitmask a)
-> Int -> VkColorComponentBitmask a -> IO ()
Ptr (VkColorComponentBitmask a)
-> VkColorComponentBitmask a -> IO ()
VkColorComponentBitmask a -> Int
(VkColorComponentBitmask a -> Int)
-> (VkColorComponentBitmask a -> Int)
-> (Ptr (VkColorComponentBitmask a)
    -> Int -> IO (VkColorComponentBitmask a))
-> (Ptr (VkColorComponentBitmask a)
    -> Int -> VkColorComponentBitmask a -> IO ())
-> (forall b. Ptr b -> Int -> IO (VkColorComponentBitmask a))
-> (forall b. Ptr b -> Int -> VkColorComponentBitmask a -> IO ())
-> (Ptr (VkColorComponentBitmask a)
    -> IO (VkColorComponentBitmask a))
-> (Ptr (VkColorComponentBitmask a)
    -> VkColorComponentBitmask a -> IO ())
-> Storable (VkColorComponentBitmask a)
forall b. Ptr b -> Int -> IO (VkColorComponentBitmask a)
forall b. Ptr b -> Int -> VkColorComponentBitmask a -> 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
forall (a :: FlagType).
Ptr (VkColorComponentBitmask a) -> IO (VkColorComponentBitmask a)
forall (a :: FlagType).
Ptr (VkColorComponentBitmask a)
-> Int -> IO (VkColorComponentBitmask a)
forall (a :: FlagType).
Ptr (VkColorComponentBitmask a)
-> Int -> VkColorComponentBitmask a -> IO ()
forall (a :: FlagType).
Ptr (VkColorComponentBitmask a)
-> VkColorComponentBitmask a -> IO ()
forall (a :: FlagType). VkColorComponentBitmask a -> Int
forall (a :: FlagType) b.
Ptr b -> Int -> IO (VkColorComponentBitmask a)
forall (a :: FlagType) b.
Ptr b -> Int -> VkColorComponentBitmask a -> IO ()
poke :: Ptr (VkColorComponentBitmask a)
-> VkColorComponentBitmask a -> IO ()
$cpoke :: forall (a :: FlagType).
Ptr (VkColorComponentBitmask a)
-> VkColorComponentBitmask a -> IO ()
peek :: Ptr (VkColorComponentBitmask a) -> IO (VkColorComponentBitmask a)
$cpeek :: forall (a :: FlagType).
Ptr (VkColorComponentBitmask a) -> IO (VkColorComponentBitmask a)
pokeByteOff :: Ptr b -> Int -> VkColorComponentBitmask a -> IO ()
$cpokeByteOff :: forall (a :: FlagType) b.
Ptr b -> Int -> VkColorComponentBitmask a -> IO ()
peekByteOff :: Ptr b -> Int -> IO (VkColorComponentBitmask a)
$cpeekByteOff :: forall (a :: FlagType) b.
Ptr b -> Int -> IO (VkColorComponentBitmask a)
pokeElemOff :: Ptr (VkColorComponentBitmask a)
-> Int -> VkColorComponentBitmask a -> IO ()
$cpokeElemOff :: forall (a :: FlagType).
Ptr (VkColorComponentBitmask a)
-> Int -> VkColorComponentBitmask a -> IO ()
peekElemOff :: Ptr (VkColorComponentBitmask a)
-> Int -> IO (VkColorComponentBitmask a)
$cpeekElemOff :: forall (a :: FlagType).
Ptr (VkColorComponentBitmask a)
-> Int -> IO (VkColorComponentBitmask a)
alignment :: VkColorComponentBitmask a -> Int
$calignment :: forall (a :: FlagType). VkColorComponentBitmask a -> Int
sizeOf :: VkColorComponentBitmask a -> Int
$csizeOf :: forall (a :: FlagType). VkColorComponentBitmask a -> Int
Storable, Typeable (VkColorComponentBitmask a)
DataType
Constr
Typeable (VkColorComponentBitmask a)
-> (forall (c :: * -> *).
    (forall d b. Data d => c (d -> b) -> d -> c b)
    -> (forall g. g -> c g)
    -> VkColorComponentBitmask a
    -> c (VkColorComponentBitmask a))
-> (forall (c :: * -> *).
    (forall b r. Data b => c (b -> r) -> c r)
    -> (forall r. r -> c r) -> Constr -> c (VkColorComponentBitmask a))
-> (VkColorComponentBitmask a -> Constr)
-> (VkColorComponentBitmask a -> DataType)
-> (forall (t :: * -> *) (c :: * -> *).
    Typeable t =>
    (forall d. Data d => c (t d))
    -> Maybe (c (VkColorComponentBitmask a)))
-> (forall (t :: * -> * -> *) (c :: * -> *).
    Typeable t =>
    (forall d e. (Data d, Data e) => c (t d e))
    -> Maybe (c (VkColorComponentBitmask a)))
-> ((forall b. Data b => b -> b)
    -> VkColorComponentBitmask a -> VkColorComponentBitmask a)
-> (forall r r'.
    (r -> r' -> r)
    -> r
    -> (forall d. Data d => d -> r')
    -> VkColorComponentBitmask a
    -> r)
-> (forall r r'.
    (r' -> r -> r)
    -> r
    -> (forall d. Data d => d -> r')
    -> VkColorComponentBitmask a
    -> r)
-> (forall u.
    (forall d. Data d => d -> u) -> VkColorComponentBitmask a -> [u])
-> (forall u.
    Int
    -> (forall d. Data d => d -> u) -> VkColorComponentBitmask a -> u)
-> (forall (m :: * -> *).
    Monad m =>
    (forall d. Data d => d -> m d)
    -> VkColorComponentBitmask a -> m (VkColorComponentBitmask a))
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d)
    -> VkColorComponentBitmask a -> m (VkColorComponentBitmask a))
-> (forall (m :: * -> *).
    MonadPlus m =>
    (forall d. Data d => d -> m d)
    -> VkColorComponentBitmask a -> m (VkColorComponentBitmask a))
-> Data (VkColorComponentBitmask a)
VkColorComponentBitmask a -> DataType
VkColorComponentBitmask a -> Constr
(forall b. Data b => b -> b)
-> VkColorComponentBitmask a -> VkColorComponentBitmask a
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> VkColorComponentBitmask a
-> c (VkColorComponentBitmask a)
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c (VkColorComponentBitmask a)
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) -> VkColorComponentBitmask a -> u
forall u.
(forall d. Data d => d -> u) -> VkColorComponentBitmask a -> [u]
forall r r'.
(r -> r' -> r)
-> r
-> (forall d. Data d => d -> r')
-> VkColorComponentBitmask a
-> r
forall r r'.
(r' -> r -> r)
-> r
-> (forall d. Data d => d -> r')
-> VkColorComponentBitmask a
-> r
forall (a :: FlagType).
Typeable a =>
Typeable (VkColorComponentBitmask a)
forall (a :: FlagType).
Typeable a =>
VkColorComponentBitmask a -> DataType
forall (a :: FlagType).
Typeable a =>
VkColorComponentBitmask a -> Constr
forall (a :: FlagType).
Typeable a =>
(forall b. Data b => b -> b)
-> VkColorComponentBitmask a -> VkColorComponentBitmask a
forall (a :: FlagType) u.
Typeable a =>
Int
-> (forall d. Data d => d -> u) -> VkColorComponentBitmask a -> u
forall (a :: FlagType) u.
Typeable a =>
(forall d. Data d => d -> u) -> VkColorComponentBitmask a -> [u]
forall (a :: FlagType) r r'.
Typeable a =>
(r -> r' -> r)
-> r
-> (forall d. Data d => d -> r')
-> VkColorComponentBitmask a
-> r
forall (a :: FlagType) r r'.
Typeable a =>
(r' -> r -> r)
-> r
-> (forall d. Data d => d -> r')
-> VkColorComponentBitmask a
-> r
forall (a :: FlagType) (m :: * -> *).
(Typeable a, Monad m) =>
(forall d. Data d => d -> m d)
-> VkColorComponentBitmask a -> m (VkColorComponentBitmask a)
forall (a :: FlagType) (m :: * -> *).
(Typeable a, MonadPlus m) =>
(forall d. Data d => d -> m d)
-> VkColorComponentBitmask a -> m (VkColorComponentBitmask a)
forall (a :: FlagType) (c :: * -> *).
Typeable a =>
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c (VkColorComponentBitmask a)
forall (a :: FlagType) (c :: * -> *).
Typeable a =>
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> VkColorComponentBitmask a
-> c (VkColorComponentBitmask a)
forall (a :: FlagType) (t :: * -> *) (c :: * -> *).
(Typeable a, Typeable t) =>
(forall d. Data d => c (t d))
-> Maybe (c (VkColorComponentBitmask a))
forall (a :: FlagType) (t :: * -> * -> *) (c :: * -> *).
(Typeable a, Typeable t) =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c (VkColorComponentBitmask a))
forall (m :: * -> *).
Monad m =>
(forall d. Data d => d -> m d)
-> VkColorComponentBitmask a -> m (VkColorComponentBitmask a)
forall (m :: * -> *).
MonadPlus m =>
(forall d. Data d => d -> m d)
-> VkColorComponentBitmask a -> m (VkColorComponentBitmask a)
forall (c :: * -> *).
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c (VkColorComponentBitmask a)
forall (c :: * -> *).
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> VkColorComponentBitmask a
-> c (VkColorComponentBitmask a)
forall (t :: * -> *) (c :: * -> *).
Typeable t =>
(forall d. Data d => c (t d))
-> Maybe (c (VkColorComponentBitmask a))
forall (t :: * -> * -> *) (c :: * -> *).
Typeable t =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c (VkColorComponentBitmask a))
$cVkColorComponentBitmask :: Constr
$tVkColorComponentBitmask :: DataType
gmapMo :: (forall d. Data d => d -> m d)
-> VkColorComponentBitmask a -> m (VkColorComponentBitmask a)
$cgmapMo :: forall (a :: FlagType) (m :: * -> *).
(Typeable a, MonadPlus m) =>
(forall d. Data d => d -> m d)
-> VkColorComponentBitmask a -> m (VkColorComponentBitmask a)
gmapMp :: (forall d. Data d => d -> m d)
-> VkColorComponentBitmask a -> m (VkColorComponentBitmask a)
$cgmapMp :: forall (a :: FlagType) (m :: * -> *).
(Typeable a, MonadPlus m) =>
(forall d. Data d => d -> m d)
-> VkColorComponentBitmask a -> m (VkColorComponentBitmask a)
gmapM :: (forall d. Data d => d -> m d)
-> VkColorComponentBitmask a -> m (VkColorComponentBitmask a)
$cgmapM :: forall (a :: FlagType) (m :: * -> *).
(Typeable a, Monad m) =>
(forall d. Data d => d -> m d)
-> VkColorComponentBitmask a -> m (VkColorComponentBitmask a)
gmapQi :: Int
-> (forall d. Data d => d -> u) -> VkColorComponentBitmask a -> u
$cgmapQi :: forall (a :: FlagType) u.
Typeable a =>
Int
-> (forall d. Data d => d -> u) -> VkColorComponentBitmask a -> u
gmapQ :: (forall d. Data d => d -> u) -> VkColorComponentBitmask a -> [u]
$cgmapQ :: forall (a :: FlagType) u.
Typeable a =>
(forall d. Data d => d -> u) -> VkColorComponentBitmask a -> [u]
gmapQr :: (r' -> r -> r)
-> r
-> (forall d. Data d => d -> r')
-> VkColorComponentBitmask a
-> r
$cgmapQr :: forall (a :: FlagType) r r'.
Typeable a =>
(r' -> r -> r)
-> r
-> (forall d. Data d => d -> r')
-> VkColorComponentBitmask a
-> r
gmapQl :: (r -> r' -> r)
-> r
-> (forall d. Data d => d -> r')
-> VkColorComponentBitmask a
-> r
$cgmapQl :: forall (a :: FlagType) r r'.
Typeable a =>
(r -> r' -> r)
-> r
-> (forall d. Data d => d -> r')
-> VkColorComponentBitmask a
-> r
gmapT :: (forall b. Data b => b -> b)
-> VkColorComponentBitmask a -> VkColorComponentBitmask a
$cgmapT :: forall (a :: FlagType).
Typeable a =>
(forall b. Data b => b -> b)
-> VkColorComponentBitmask a -> VkColorComponentBitmask a
dataCast2 :: (forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c (VkColorComponentBitmask a))
$cdataCast2 :: forall (a :: FlagType) (t :: * -> * -> *) (c :: * -> *).
(Typeable a, Typeable t) =>
(forall d e. (Data d, Data e) => c (t d e))
-> Maybe (c (VkColorComponentBitmask a))
dataCast1 :: (forall d. Data d => c (t d))
-> Maybe (c (VkColorComponentBitmask a))
$cdataCast1 :: forall (a :: FlagType) (t :: * -> *) (c :: * -> *).
(Typeable a, Typeable t) =>
(forall d. Data d => c (t d))
-> Maybe (c (VkColorComponentBitmask a))
dataTypeOf :: VkColorComponentBitmask a -> DataType
$cdataTypeOf :: forall (a :: FlagType).
Typeable a =>
VkColorComponentBitmask a -> DataType
toConstr :: VkColorComponentBitmask a -> Constr
$ctoConstr :: forall (a :: FlagType).
Typeable a =>
VkColorComponentBitmask a -> Constr
gunfold :: (forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c (VkColorComponentBitmask a)
$cgunfold :: forall (a :: FlagType) (c :: * -> *).
Typeable a =>
(forall b r. Data b => c (b -> r) -> c r)
-> (forall r. r -> c r) -> Constr -> c (VkColorComponentBitmask a)
gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> VkColorComponentBitmask a
-> c (VkColorComponentBitmask a)
$cgfoldl :: forall (a :: FlagType) (c :: * -> *).
Typeable a =>
(forall d b. Data d => c (d -> b) -> d -> c b)
-> (forall g. g -> c g)
-> VkColorComponentBitmask a
-> c (VkColorComponentBitmask a)
$cp1Data :: forall (a :: FlagType).
Typeable a =>
Typeable (VkColorComponentBitmask a)
Data, (forall x.
 VkColorComponentBitmask a -> Rep (VkColorComponentBitmask a) x)
-> (forall x.
    Rep (VkColorComponentBitmask a) x -> VkColorComponentBitmask a)
-> Generic (VkColorComponentBitmask a)
forall x.
Rep (VkColorComponentBitmask a) x -> VkColorComponentBitmask a
forall x.
VkColorComponentBitmask a -> Rep (VkColorComponentBitmask a) x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
forall (a :: FlagType) x.
Rep (VkColorComponentBitmask a) x -> VkColorComponentBitmask a
forall (a :: FlagType) x.
VkColorComponentBitmask a -> Rep (VkColorComponentBitmask a) x
$cto :: forall (a :: FlagType) x.
Rep (VkColorComponentBitmask a) x -> VkColorComponentBitmask a
$cfrom :: forall (a :: FlagType) x.
VkColorComponentBitmask a -> Rep (VkColorComponentBitmask a) x
Generic)

type VkColorComponentFlags = VkColorComponentBitmask FlagMask

type VkColorComponentFlagBits = VkColorComponentBitmask FlagBit

pattern VkColorComponentFlagBits ::
        VkFlags -> VkColorComponentBitmask FlagBit

pattern $bVkColorComponentFlagBits :: VkFlags -> VkColorComponentBitmask FlagBit
$mVkColorComponentFlagBits :: forall r.
VkColorComponentBitmask FlagBit
-> (VkFlags -> r) -> (Void# -> r) -> r
VkColorComponentFlagBits n = VkColorComponentBitmask n

pattern VkColorComponentFlags ::
        VkFlags -> VkColorComponentBitmask FlagMask

pattern $bVkColorComponentFlags :: VkFlags -> VkColorComponentBitmask FlagMask
$mVkColorComponentFlags :: forall r.
VkColorComponentBitmask FlagMask
-> (VkFlags -> r) -> (Void# -> r) -> r
VkColorComponentFlags n = VkColorComponentBitmask n

deriving instance Bits (VkColorComponentBitmask FlagMask)

deriving instance FiniteBits (VkColorComponentBitmask FlagMask)

deriving instance Integral (VkColorComponentBitmask FlagMask)

deriving instance Num (VkColorComponentBitmask FlagMask)

deriving instance Bounded (VkColorComponentBitmask FlagMask)

deriving instance Enum (VkColorComponentBitmask FlagMask)

deriving instance Real (VkColorComponentBitmask FlagMask)

instance Show (VkColorComponentBitmask a) where
        showsPrec :: Int -> VkColorComponentBitmask a -> ShowS
showsPrec Int
_ VkColorComponentBitmask a
VK_COLOR_COMPONENT_R_BIT
          = String -> ShowS
showString String
"VK_COLOR_COMPONENT_R_BIT"
        showsPrec Int
_ VkColorComponentBitmask a
VK_COLOR_COMPONENT_G_BIT
          = String -> ShowS
showString String
"VK_COLOR_COMPONENT_G_BIT"
        showsPrec Int
_ VkColorComponentBitmask a
VK_COLOR_COMPONENT_B_BIT
          = String -> ShowS
showString String
"VK_COLOR_COMPONENT_B_BIT"
        showsPrec Int
_ VkColorComponentBitmask a
VK_COLOR_COMPONENT_A_BIT
          = String -> ShowS
showString String
"VK_COLOR_COMPONENT_A_BIT"
        showsPrec Int
p (VkColorComponentBitmask VkFlags
x)
          = Bool -> ShowS -> ShowS
showParen (Int
p Int -> Int -> Bool
forall a. Ord a => a -> a -> Bool
>= Int
11)
              (String -> ShowS
showString String
"VkColorComponentBitmask " ShowS -> ShowS -> ShowS
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Int -> VkFlags -> ShowS
forall a. Show a => Int -> a -> ShowS
showsPrec Int
11 VkFlags
x)

instance Read (VkColorComponentBitmask a) where
        readPrec :: ReadPrec (VkColorComponentBitmask a)
readPrec
          = ReadPrec (VkColorComponentBitmask a)
-> ReadPrec (VkColorComponentBitmask a)
forall a. ReadPrec a -> ReadPrec a
parens
              ([(String, ReadPrec (VkColorComponentBitmask a))]
-> ReadPrec (VkColorComponentBitmask a)
forall a. [(String, ReadPrec a)] -> ReadPrec a
choose
                 [(String
"VK_COLOR_COMPONENT_R_BIT", VkColorComponentBitmask a -> ReadPrec (VkColorComponentBitmask a)
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkColorComponentBitmask a
forall (a :: FlagType). VkColorComponentBitmask a
VK_COLOR_COMPONENT_R_BIT),
                  (String
"VK_COLOR_COMPONENT_G_BIT", VkColorComponentBitmask a -> ReadPrec (VkColorComponentBitmask a)
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkColorComponentBitmask a
forall (a :: FlagType). VkColorComponentBitmask a
VK_COLOR_COMPONENT_G_BIT),
                  (String
"VK_COLOR_COMPONENT_B_BIT", VkColorComponentBitmask a -> ReadPrec (VkColorComponentBitmask a)
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkColorComponentBitmask a
forall (a :: FlagType). VkColorComponentBitmask a
VK_COLOR_COMPONENT_B_BIT),
                  (String
"VK_COLOR_COMPONENT_A_BIT", VkColorComponentBitmask a -> ReadPrec (VkColorComponentBitmask a)
forall (f :: * -> *) a. Applicative f => a -> f a
pure VkColorComponentBitmask a
forall (a :: FlagType). VkColorComponentBitmask a
VK_COLOR_COMPONENT_A_BIT)]
                 ReadPrec (VkColorComponentBitmask a)
-> ReadPrec (VkColorComponentBitmask a)
-> ReadPrec (VkColorComponentBitmask a)
forall a. ReadPrec a -> ReadPrec a -> ReadPrec a
+++
                 Int
-> ReadPrec (VkColorComponentBitmask a)
-> ReadPrec (VkColorComponentBitmask a)
forall a. Int -> ReadPrec a -> ReadPrec a
prec Int
10
                   (Lexeme -> ReadPrec ()
expectP (String -> Lexeme
Ident String
"VkColorComponentBitmask") ReadPrec ()
-> ReadPrec (VkColorComponentBitmask a)
-> ReadPrec (VkColorComponentBitmask a)
forall (m :: * -> *) a b. Monad m => m a -> m b -> m b
>>
                      (VkFlags -> VkColorComponentBitmask a
forall (a :: FlagType). VkFlags -> VkColorComponentBitmask a
VkColorComponentBitmask (VkFlags -> VkColorComponentBitmask a)
-> ReadPrec VkFlags -> ReadPrec (VkColorComponentBitmask a)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> ReadPrec VkFlags -> ReadPrec VkFlags
forall a. ReadPrec a -> ReadPrec a
step ReadPrec VkFlags
forall a. Read a => ReadPrec a
readPrec)))

-- | bitpos = @0@
pattern VK_COLOR_COMPONENT_R_BIT :: VkColorComponentBitmask a

pattern $bVK_COLOR_COMPONENT_R_BIT :: VkColorComponentBitmask a
$mVK_COLOR_COMPONENT_R_BIT :: forall r (a :: FlagType).
VkColorComponentBitmask a -> (Void# -> r) -> (Void# -> r) -> r
VK_COLOR_COMPONENT_R_BIT = VkColorComponentBitmask 1

-- | bitpos = @1@
pattern VK_COLOR_COMPONENT_G_BIT :: VkColorComponentBitmask a

pattern $bVK_COLOR_COMPONENT_G_BIT :: VkColorComponentBitmask a
$mVK_COLOR_COMPONENT_G_BIT :: forall r (a :: FlagType).
VkColorComponentBitmask a -> (Void# -> r) -> (Void# -> r) -> r
VK_COLOR_COMPONENT_G_BIT = VkColorComponentBitmask 2

-- | bitpos = @2@
pattern VK_COLOR_COMPONENT_B_BIT :: VkColorComponentBitmask a

pattern $bVK_COLOR_COMPONENT_B_BIT :: VkColorComponentBitmask a
$mVK_COLOR_COMPONENT_B_BIT :: forall r (a :: FlagType).
VkColorComponentBitmask a -> (Void# -> r) -> (Void# -> r) -> r
VK_COLOR_COMPONENT_B_BIT = VkColorComponentBitmask 4

-- | bitpos = @3@
pattern VK_COLOR_COMPONENT_A_BIT :: VkColorComponentBitmask a

pattern $bVK_COLOR_COMPONENT_A_BIT :: VkColorComponentBitmask a
$mVK_COLOR_COMPONENT_A_BIT :: forall r (a :: FlagType).
VkColorComponentBitmask a -> (Void# -> r) -> (Void# -> r) -> r
VK_COLOR_COMPONENT_A_BIT = VkColorComponentBitmask 8

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

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

pattern $bVK_COLOR_SPACE_SRGB_NONLINEAR_KHR :: VkColorSpaceKHR
$mVK_COLOR_SPACE_SRGB_NONLINEAR_KHR :: forall r. VkColorSpaceKHR -> (Void# -> r) -> (Void# -> r) -> r
VK_COLOR_SPACE_SRGB_NONLINEAR_KHR = VkColorSpaceKHR 0