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

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

import           Foreign.C.Types

{-# LINE 9 "Graphics/ImageMagick/MagickCore/Types/FFI/MagickFunction.hsc" #-}

newtype MagickFunction = MagickFunction { unMagickFunction :: CInt }
          deriving (Eq, Show)

undefinedFunction  :: MagickFunction
undefinedFunction  = MagickFunction 0
polynomialFunction  :: MagickFunction
polynomialFunction  = MagickFunction 1
sinusoidFunction  :: MagickFunction
sinusoidFunction  = MagickFunction 2
arcsinFunction  :: MagickFunction
arcsinFunction  = MagickFunction 3
arctanFunction  :: MagickFunction
arctanFunction  = MagickFunction 4

{-# LINE 20 "Graphics/ImageMagick/MagickCore/Types/FFI/MagickFunction.hsc" #-}