{-# LINE 1 "src/Graphics/ImageMagick/MagickCore/Types/FFI/Geometry.hsc" #-}
{-# LANGUAGE CPP                      #-}
{-# LINE 2 "src/Graphics/ImageMagick/MagickCore/Types/FFI/Geometry.hsc" #-}
{-# LANGUAGE ForeignFunctionInterface #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}

module Graphics.ImageMagick.MagickCore.Types.FFI.Geometry
    where

import           Foreign.C.Types

{-# LINE 10 "src/Graphics/ImageMagick/MagickCore/Types/FFI/Geometry.hsc" #-}

newtype GravityType = GravityType { unGravityType :: CInt }
          deriving (Eq, Show)

forgetGravity  :: GravityType
forgetGravity  = GravityType 0
northWestGravity  :: GravityType
northWestGravity  = GravityType 1
northGravity  :: GravityType
northGravity  = GravityType 2
northEastGravity  :: GravityType
northEastGravity  = GravityType 3
westGravity  :: GravityType
westGravity  = GravityType 4
centerGravity  :: GravityType
centerGravity  = GravityType 5
eastGravity  :: GravityType
eastGravity  = GravityType 6
southWestGravity  :: GravityType
southWestGravity  = GravityType 7
southGravity  :: GravityType
southGravity  = GravityType 8
southEastGravity  :: GravityType
southEastGravity  = GravityType 9
staticGravity  :: GravityType
staticGravity  = GravityType 10

{-# LINE 27 "src/Graphics/ImageMagick/MagickCore/Types/FFI/Geometry.hsc" #-}

undefinedGravity :: GravityType
undefinedGravity = forgetGravity