module Graphics.ImageMagick.MagickCore.Types.FFI.Geometry
where
import Foreign.C.Types
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
undefinedGravity :: GravityType
undefinedGravity = forgetGravity