{-# OPTIONS_HADDOCK ignore-exports#-}
{-# LANGUAGE DataKinds                  #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE PatternSynonyms            #-}
{-# LANGUAGE Strict                     #-}
module Graphics.Vulkan.Types.Enum.ConservativeRasterizationModeEXT
       (VkConservativeRasterizationModeEXT(VkConservativeRasterizationModeEXT,
                                           VK_CONSERVATIVE_RASTERIZATION_MODE_DISABLED_EXT,
                                           VK_CONSERVATIVE_RASTERIZATION_MODE_OVERESTIMATE_EXT,
                                           VK_CONSERVATIVE_RASTERIZATION_MODE_UNDERESTIMATE_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#VkConservativeRasterizationModeEXT VkConservativeRasterizationModeEXT registry at www.khronos.org>
newtype VkConservativeRasterizationModeEXT = VkConservativeRasterizationModeEXT Int32
                                             deriving (VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Bool
(VkConservativeRasterizationModeEXT
 -> VkConservativeRasterizationModeEXT -> Bool)
-> (VkConservativeRasterizationModeEXT
    -> VkConservativeRasterizationModeEXT -> Bool)
-> Eq VkConservativeRasterizationModeEXT
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Bool
$c/= :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Bool
== :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Bool
$c== :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Bool
Eq, Eq VkConservativeRasterizationModeEXT
Eq VkConservativeRasterizationModeEXT
-> (VkConservativeRasterizationModeEXT
    -> VkConservativeRasterizationModeEXT -> Ordering)
-> (VkConservativeRasterizationModeEXT
    -> VkConservativeRasterizationModeEXT -> Bool)
-> (VkConservativeRasterizationModeEXT
    -> VkConservativeRasterizationModeEXT -> Bool)
-> (VkConservativeRasterizationModeEXT
    -> VkConservativeRasterizationModeEXT -> Bool)
-> (VkConservativeRasterizationModeEXT
    -> VkConservativeRasterizationModeEXT -> Bool)
-> (VkConservativeRasterizationModeEXT
    -> VkConservativeRasterizationModeEXT
    -> VkConservativeRasterizationModeEXT)
-> (VkConservativeRasterizationModeEXT
    -> VkConservativeRasterizationModeEXT
    -> VkConservativeRasterizationModeEXT)
-> Ord VkConservativeRasterizationModeEXT
VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Bool
VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Ordering
VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
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 :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
$cmin :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
max :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
$cmax :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
>= :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Bool
$c>= :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Bool
> :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Bool
$c> :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Bool
<= :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Bool
$c<= :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Bool
< :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Bool
$c< :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Bool
compare :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Ordering
$ccompare :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> Ordering
Ord, Int -> VkConservativeRasterizationModeEXT
VkConservativeRasterizationModeEXT -> Int
VkConservativeRasterizationModeEXT
-> [VkConservativeRasterizationModeEXT]
VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
-> [VkConservativeRasterizationModeEXT]
VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
-> [VkConservativeRasterizationModeEXT]
(VkConservativeRasterizationModeEXT
 -> VkConservativeRasterizationModeEXT)
-> (VkConservativeRasterizationModeEXT
    -> VkConservativeRasterizationModeEXT)
-> (Int -> VkConservativeRasterizationModeEXT)
-> (VkConservativeRasterizationModeEXT -> Int)
-> (VkConservativeRasterizationModeEXT
    -> [VkConservativeRasterizationModeEXT])
-> (VkConservativeRasterizationModeEXT
    -> VkConservativeRasterizationModeEXT
    -> [VkConservativeRasterizationModeEXT])
-> (VkConservativeRasterizationModeEXT
    -> VkConservativeRasterizationModeEXT
    -> [VkConservativeRasterizationModeEXT])
-> (VkConservativeRasterizationModeEXT
    -> VkConservativeRasterizationModeEXT
    -> VkConservativeRasterizationModeEXT
    -> [VkConservativeRasterizationModeEXT])
-> Enum VkConservativeRasterizationModeEXT
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 :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
-> [VkConservativeRasterizationModeEXT]
$cenumFromThenTo :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
-> [VkConservativeRasterizationModeEXT]
enumFromTo :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
-> [VkConservativeRasterizationModeEXT]
$cenumFromTo :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
-> [VkConservativeRasterizationModeEXT]
enumFromThen :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
-> [VkConservativeRasterizationModeEXT]
$cenumFromThen :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
-> [VkConservativeRasterizationModeEXT]
enumFrom :: VkConservativeRasterizationModeEXT
-> [VkConservativeRasterizationModeEXT]
$cenumFrom :: VkConservativeRasterizationModeEXT
-> [VkConservativeRasterizationModeEXT]
fromEnum :: VkConservativeRasterizationModeEXT -> Int
$cfromEnum :: VkConservativeRasterizationModeEXT -> Int
toEnum :: Int -> VkConservativeRasterizationModeEXT
$ctoEnum :: Int -> VkConservativeRasterizationModeEXT
pred :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
$cpred :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
succ :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
$csucc :: VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT
Enum, Ptr VkConservativeRasterizationModeEXT
-> IO VkConservativeRasterizationModeEXT
Ptr VkConservativeRasterizationModeEXT
-> Int -> IO VkConservativeRasterizationModeEXT
Ptr VkConservativeRasterizationModeEXT
-> Int -> VkConservativeRasterizationModeEXT -> IO ()
Ptr VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> IO ()
VkConservativeRasterizationModeEXT -> Int
(VkConservativeRasterizationModeEXT -> Int)
-> (VkConservativeRasterizationModeEXT -> Int)
-> (Ptr VkConservativeRasterizationModeEXT
    -> Int -> IO VkConservativeRasterizationModeEXT)
-> (Ptr VkConservativeRasterizationModeEXT
    -> Int -> VkConservativeRasterizationModeEXT -> IO ())
-> (forall b.
    Ptr b -> Int -> IO VkConservativeRasterizationModeEXT)
-> (forall b.
    Ptr b -> Int -> VkConservativeRasterizationModeEXT -> IO ())
-> (Ptr VkConservativeRasterizationModeEXT
    -> IO VkConservativeRasterizationModeEXT)
-> (Ptr VkConservativeRasterizationModeEXT
    -> VkConservativeRasterizationModeEXT -> IO ())
-> Storable VkConservativeRasterizationModeEXT
forall b. Ptr b -> Int -> IO VkConservativeRasterizationModeEXT
forall b.
Ptr b -> Int -> VkConservativeRasterizationModeEXT -> 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 VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> IO ()
$cpoke :: Ptr VkConservativeRasterizationModeEXT
-> VkConservativeRasterizationModeEXT -> IO ()
peek :: Ptr VkConservativeRasterizationModeEXT
-> IO VkConservativeRasterizationModeEXT
$cpeek :: Ptr VkConservativeRasterizationModeEXT
-> IO VkConservativeRasterizationModeEXT
pokeByteOff :: forall b.
Ptr b -> Int -> VkConservativeRasterizationModeEXT -> IO ()
$cpokeByteOff :: forall b.
Ptr b -> Int -> VkConservativeRasterizationModeEXT -> IO ()
peekByteOff :: forall b. Ptr b -> Int -> IO VkConservativeRasterizationModeEXT
$cpeekByteOff :: forall b. Ptr b -> Int -> IO VkConservativeRasterizationModeEXT
pokeElemOff :: Ptr VkConservativeRasterizationModeEXT
-> Int -> VkConservativeRasterizationModeEXT -> IO ()
$cpokeElemOff :: Ptr VkConservativeRasterizationModeEXT
-> Int -> VkConservativeRasterizationModeEXT -> IO ()
peekElemOff :: Ptr VkConservativeRasterizationModeEXT
-> Int -> IO VkConservativeRasterizationModeEXT
$cpeekElemOff :: Ptr VkConservativeRasterizationModeEXT
-> Int -> IO VkConservativeRasterizationModeEXT
alignment :: VkConservativeRasterizationModeEXT -> Int
$calignment :: VkConservativeRasterizationModeEXT -> Int
sizeOf :: VkConservativeRasterizationModeEXT -> Int
$csizeOf :: VkConservativeRasterizationModeEXT -> Int
Storable)

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

pattern $bVK_CONSERVATIVE_RASTERIZATION_MODE_DISABLED_EXT :: VkConservativeRasterizationModeEXT
$mVK_CONSERVATIVE_RASTERIZATION_MODE_DISABLED_EXT :: forall {r}.
VkConservativeRasterizationModeEXT
-> (Void# -> r) -> (Void# -> r) -> r
VK_CONSERVATIVE_RASTERIZATION_MODE_DISABLED_EXT =
        VkConservativeRasterizationModeEXT 0

pattern VK_CONSERVATIVE_RASTERIZATION_MODE_OVERESTIMATE_EXT ::
        VkConservativeRasterizationModeEXT

pattern $bVK_CONSERVATIVE_RASTERIZATION_MODE_OVERESTIMATE_EXT :: VkConservativeRasterizationModeEXT
$mVK_CONSERVATIVE_RASTERIZATION_MODE_OVERESTIMATE_EXT :: forall {r}.
VkConservativeRasterizationModeEXT
-> (Void# -> r) -> (Void# -> r) -> r
VK_CONSERVATIVE_RASTERIZATION_MODE_OVERESTIMATE_EXT =
        VkConservativeRasterizationModeEXT 1

pattern VK_CONSERVATIVE_RASTERIZATION_MODE_UNDERESTIMATE_EXT ::
        VkConservativeRasterizationModeEXT

pattern $bVK_CONSERVATIVE_RASTERIZATION_MODE_UNDERESTIMATE_EXT :: VkConservativeRasterizationModeEXT
$mVK_CONSERVATIVE_RASTERIZATION_MODE_UNDERESTIMATE_EXT :: forall {r}.
VkConservativeRasterizationModeEXT
-> (Void# -> r) -> (Void# -> r) -> r
VK_CONSERVATIVE_RASTERIZATION_MODE_UNDERESTIMATE_EXT =
        VkConservativeRasterizationModeEXT 2