{-# language CPP #-}
-- No documentation found for Chapter "TessellationDomainOrigin"
module Vulkan.Core11.Enums.TessellationDomainOrigin  (TessellationDomainOrigin( TESSELLATION_DOMAIN_ORIGIN_UPPER_LEFT
                                                                              , TESSELLATION_DOMAIN_ORIGIN_LOWER_LEFT
                                                                              , ..
                                                                              )) where

import Vulkan.Internal.Utils (enumReadPrec)
import Vulkan.Internal.Utils (enumShowsPrec)
import GHC.Show (showsPrec)
import Vulkan.Zero (Zero)
import Foreign.Storable (Storable)
import Data.Int (Int32)
import GHC.Read (Read(readPrec))
import GHC.Show (Show(showsPrec))

-- | VkTessellationDomainOrigin - Enum describing tessellation domain origin
--
-- = Description
--
-- This enum affects how the @VertexOrderCw@ and @VertexOrderCcw@
-- tessellation execution modes are interpreted, since the winding is
-- defined relative to the orientation of the domain.
--
-- = See Also
--
-- <https://www.khronos.org/registry/vulkan/specs/1.2-extensions/html/vkspec.html#VK_VERSION_1_1 VK_VERSION_1_1>,
-- 'Vulkan.Core11.Promoted_From_VK_KHR_maintenance2.PipelineTessellationDomainOriginStateCreateInfo',
-- 'Vulkan.Extensions.VK_EXT_extended_dynamic_state3.cmdSetTessellationDomainOriginEXT'
newtype TessellationDomainOrigin = TessellationDomainOrigin Int32
  deriving newtype (TessellationDomainOrigin -> TessellationDomainOrigin -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TessellationDomainOrigin -> TessellationDomainOrigin -> Bool
$c/= :: TessellationDomainOrigin -> TessellationDomainOrigin -> Bool
== :: TessellationDomainOrigin -> TessellationDomainOrigin -> Bool
$c== :: TessellationDomainOrigin -> TessellationDomainOrigin -> Bool
Eq, Eq TessellationDomainOrigin
TessellationDomainOrigin -> TessellationDomainOrigin -> Bool
TessellationDomainOrigin -> TessellationDomainOrigin -> Ordering
TessellationDomainOrigin
-> TessellationDomainOrigin -> TessellationDomainOrigin
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 :: TessellationDomainOrigin
-> TessellationDomainOrigin -> TessellationDomainOrigin
$cmin :: TessellationDomainOrigin
-> TessellationDomainOrigin -> TessellationDomainOrigin
max :: TessellationDomainOrigin
-> TessellationDomainOrigin -> TessellationDomainOrigin
$cmax :: TessellationDomainOrigin
-> TessellationDomainOrigin -> TessellationDomainOrigin
>= :: TessellationDomainOrigin -> TessellationDomainOrigin -> Bool
$c>= :: TessellationDomainOrigin -> TessellationDomainOrigin -> Bool
> :: TessellationDomainOrigin -> TessellationDomainOrigin -> Bool
$c> :: TessellationDomainOrigin -> TessellationDomainOrigin -> Bool
<= :: TessellationDomainOrigin -> TessellationDomainOrigin -> Bool
$c<= :: TessellationDomainOrigin -> TessellationDomainOrigin -> Bool
< :: TessellationDomainOrigin -> TessellationDomainOrigin -> Bool
$c< :: TessellationDomainOrigin -> TessellationDomainOrigin -> Bool
compare :: TessellationDomainOrigin -> TessellationDomainOrigin -> Ordering
$ccompare :: TessellationDomainOrigin -> TessellationDomainOrigin -> Ordering
Ord, Ptr TessellationDomainOrigin -> IO TessellationDomainOrigin
Ptr TessellationDomainOrigin -> Int -> IO TessellationDomainOrigin
Ptr TessellationDomainOrigin
-> Int -> TessellationDomainOrigin -> IO ()
Ptr TessellationDomainOrigin -> TessellationDomainOrigin -> IO ()
TessellationDomainOrigin -> Int
forall b. Ptr b -> Int -> IO TessellationDomainOrigin
forall b. Ptr b -> Int -> TessellationDomainOrigin -> 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 TessellationDomainOrigin -> TessellationDomainOrigin -> IO ()
$cpoke :: Ptr TessellationDomainOrigin -> TessellationDomainOrigin -> IO ()
peek :: Ptr TessellationDomainOrigin -> IO TessellationDomainOrigin
$cpeek :: Ptr TessellationDomainOrigin -> IO TessellationDomainOrigin
pokeByteOff :: forall b. Ptr b -> Int -> TessellationDomainOrigin -> IO ()
$cpokeByteOff :: forall b. Ptr b -> Int -> TessellationDomainOrigin -> IO ()
peekByteOff :: forall b. Ptr b -> Int -> IO TessellationDomainOrigin
$cpeekByteOff :: forall b. Ptr b -> Int -> IO TessellationDomainOrigin
pokeElemOff :: Ptr TessellationDomainOrigin
-> Int -> TessellationDomainOrigin -> IO ()
$cpokeElemOff :: Ptr TessellationDomainOrigin
-> Int -> TessellationDomainOrigin -> IO ()
peekElemOff :: Ptr TessellationDomainOrigin -> Int -> IO TessellationDomainOrigin
$cpeekElemOff :: Ptr TessellationDomainOrigin -> Int -> IO TessellationDomainOrigin
alignment :: TessellationDomainOrigin -> Int
$calignment :: TessellationDomainOrigin -> Int
sizeOf :: TessellationDomainOrigin -> Int
$csizeOf :: TessellationDomainOrigin -> Int
Storable, TessellationDomainOrigin
forall a. a -> Zero a
zero :: TessellationDomainOrigin
$czero :: TessellationDomainOrigin
Zero)

-- | 'TESSELLATION_DOMAIN_ORIGIN_UPPER_LEFT' specifies that the origin of the
-- domain space is in the upper left corner, as shown in figure
-- <https://registry.khronos.org/vulkan/specs/1.3-extensions/html/vkspec.html#img-tessellation-topology-ul>.
pattern $bTESSELLATION_DOMAIN_ORIGIN_UPPER_LEFT :: TessellationDomainOrigin
$mTESSELLATION_DOMAIN_ORIGIN_UPPER_LEFT :: forall {r}.
TessellationDomainOrigin -> ((# #) -> r) -> ((# #) -> r) -> r
TESSELLATION_DOMAIN_ORIGIN_UPPER_LEFT = TessellationDomainOrigin 0

-- | 'TESSELLATION_DOMAIN_ORIGIN_LOWER_LEFT' specifies that the origin of the
-- domain space is in the lower left corner, as shown in figure
-- <https://registry.khronos.org/vulkan/specs/1.3-extensions/html/vkspec.html#img-tessellation-topology-ll>.
pattern $bTESSELLATION_DOMAIN_ORIGIN_LOWER_LEFT :: TessellationDomainOrigin
$mTESSELLATION_DOMAIN_ORIGIN_LOWER_LEFT :: forall {r}.
TessellationDomainOrigin -> ((# #) -> r) -> ((# #) -> r) -> r
TESSELLATION_DOMAIN_ORIGIN_LOWER_LEFT = TessellationDomainOrigin 1

{-# COMPLETE
  TESSELLATION_DOMAIN_ORIGIN_UPPER_LEFT
  , TESSELLATION_DOMAIN_ORIGIN_LOWER_LEFT ::
    TessellationDomainOrigin
  #-}

conNameTessellationDomainOrigin :: String
conNameTessellationDomainOrigin :: String
conNameTessellationDomainOrigin = String
"TessellationDomainOrigin"

enumPrefixTessellationDomainOrigin :: String
enumPrefixTessellationDomainOrigin :: String
enumPrefixTessellationDomainOrigin = String
"TESSELLATION_DOMAIN_ORIGIN_"

showTableTessellationDomainOrigin :: [(TessellationDomainOrigin, String)]
showTableTessellationDomainOrigin :: [(TessellationDomainOrigin, String)]
showTableTessellationDomainOrigin =
  [
    ( TessellationDomainOrigin
TESSELLATION_DOMAIN_ORIGIN_UPPER_LEFT
    , String
"UPPER_LEFT"
    )
  ,
    ( TessellationDomainOrigin
TESSELLATION_DOMAIN_ORIGIN_LOWER_LEFT
    , String
"LOWER_LEFT"
    )
  ]

instance Show TessellationDomainOrigin where
  showsPrec :: Int -> TessellationDomainOrigin -> ShowS
showsPrec =
    forall a i.
Eq a =>
String
-> [(a, String)]
-> String
-> (a -> i)
-> (i -> ShowS)
-> Int
-> a
-> ShowS
enumShowsPrec
      String
enumPrefixTessellationDomainOrigin
      [(TessellationDomainOrigin, String)]
showTableTessellationDomainOrigin
      String
conNameTessellationDomainOrigin
      (\(TessellationDomainOrigin Int32
x) -> Int32
x)
      (forall a. Show a => Int -> a -> ShowS
showsPrec Int
11)

instance Read TessellationDomainOrigin where
  readPrec :: ReadPrec TessellationDomainOrigin
readPrec =
    forall i a.
Read i =>
String -> [(a, String)] -> String -> (i -> a) -> ReadPrec a
enumReadPrec
      String
enumPrefixTessellationDomainOrigin
      [(TessellationDomainOrigin, String)]
showTableTessellationDomainOrigin
      String
conNameTessellationDomainOrigin
      Int32 -> TessellationDomainOrigin
TessellationDomainOrigin