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

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

pattern $bVK_LINE_RASTERIZATION_MODE_DEFAULT_EXT :: VkLineRasterizationModeEXT
$mVK_LINE_RASTERIZATION_MODE_DEFAULT_EXT :: forall {r}.
VkLineRasterizationModeEXT -> (Void# -> r) -> (Void# -> r) -> r
VK_LINE_RASTERIZATION_MODE_DEFAULT_EXT =
        VkLineRasterizationModeEXT 0

pattern VK_LINE_RASTERIZATION_MODE_RECTANGULAR_EXT ::
        VkLineRasterizationModeEXT

pattern $bVK_LINE_RASTERIZATION_MODE_RECTANGULAR_EXT :: VkLineRasterizationModeEXT
$mVK_LINE_RASTERIZATION_MODE_RECTANGULAR_EXT :: forall {r}.
VkLineRasterizationModeEXT -> (Void# -> r) -> (Void# -> r) -> r
VK_LINE_RASTERIZATION_MODE_RECTANGULAR_EXT =
        VkLineRasterizationModeEXT 1

pattern VK_LINE_RASTERIZATION_MODE_BRESENHAM_EXT ::
        VkLineRasterizationModeEXT

pattern $bVK_LINE_RASTERIZATION_MODE_BRESENHAM_EXT :: VkLineRasterizationModeEXT
$mVK_LINE_RASTERIZATION_MODE_BRESENHAM_EXT :: forall {r}.
VkLineRasterizationModeEXT -> (Void# -> r) -> (Void# -> r) -> r
VK_LINE_RASTERIZATION_MODE_BRESENHAM_EXT =
        VkLineRasterizationModeEXT 2

pattern VK_LINE_RASTERIZATION_MODE_RECTANGULAR_SMOOTH_EXT ::
        VkLineRasterizationModeEXT

pattern $bVK_LINE_RASTERIZATION_MODE_RECTANGULAR_SMOOTH_EXT :: VkLineRasterizationModeEXT
$mVK_LINE_RASTERIZATION_MODE_RECTANGULAR_SMOOTH_EXT :: forall {r}.
VkLineRasterizationModeEXT -> (Void# -> r) -> (Void# -> r) -> r
VK_LINE_RASTERIZATION_MODE_RECTANGULAR_SMOOTH_EXT =
        VkLineRasterizationModeEXT 3