#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Vips.Enums
(
Access(..) ,
Align(..) ,
Angle(..) ,
Angle45(..) ,
BandFormat(..) ,
BlendMode(..) ,
Coding(..) ,
Combine(..) ,
CombineMode(..) ,
CompassDirection(..) ,
DemandStyle(..) ,
Direction(..) ,
Extend(..) ,
ForeignDzContainer(..) ,
ForeignDzDepth(..) ,
ForeignDzLayout(..) ,
ForeignHeifCompression(..) ,
ForeignJpegSubsample(..) ,
ForeignSubsample(..) ,
ForeignTiffCompression(..) ,
ForeignTiffPredictor(..) ,
ForeignTiffResunit(..) ,
ForeignWebpPreset(..) ,
ImageType(..) ,
Intent(..) ,
Interesting(..) ,
Interpretation(..) ,
Kernel(..) ,
OperationBoolean(..) ,
OperationComplex(..) ,
OperationComplex2(..) ,
OperationComplexget(..) ,
OperationMath(..) ,
OperationMath2(..) ,
OperationMorphology(..) ,
OperationRelational(..) ,
OperationRound(..) ,
PCS(..) ,
Precision(..) ,
RegionShrink(..) ,
Saveable(..) ,
Size(..) ,
Token(..) ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.BasicTypes as B.Types
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GArray as B.GArray
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Control.Monad.IO.Class as MIO
import qualified Data.Coerce as Coerce
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GHC.Records as R
data Token =
TokenLeft
| TokenRight
| TokenString
| TokenEquals
| TokenComma
| AnotherToken Int
deriving (Int -> Token -> ShowS
[Token] -> ShowS
Token -> String
(Int -> Token -> ShowS)
-> (Token -> String) -> ([Token] -> ShowS) -> Show Token
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Token] -> ShowS
$cshowList :: [Token] -> ShowS
show :: Token -> String
$cshow :: Token -> String
showsPrec :: Int -> Token -> ShowS
$cshowsPrec :: Int -> Token -> ShowS
Show, Token -> Token -> Bool
(Token -> Token -> Bool) -> (Token -> Token -> Bool) -> Eq Token
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Token -> Token -> Bool
$c/= :: Token -> Token -> Bool
== :: Token -> Token -> Bool
$c== :: Token -> Token -> Bool
Eq)
instance P.Enum Token where
fromEnum :: Token -> Int
fromEnum Token
TokenLeft = Int
1
fromEnum Token
TokenRight = Int
2
fromEnum Token
TokenString = Int
3
fromEnum Token
TokenEquals = Int
4
fromEnum Token
TokenComma = Int
5
fromEnum (AnotherToken Int
k) = Int
k
toEnum :: Int -> Token
toEnum Int
1 = Token
TokenLeft
toEnum Int
2 = Token
TokenRight
toEnum Int
3 = Token
TokenString
toEnum Int
4 = Token
TokenEquals
toEnum Int
5 = Token
TokenComma
toEnum Int
k = Int -> Token
AnotherToken Int
k
instance P.Ord Token where
compare :: Token -> Token -> Ordering
compare Token
a Token
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Token -> Int
forall a. Enum a => a -> Int
P.fromEnum Token
a) (Token -> Int
forall a. Enum a => a -> Int
P.fromEnum Token
b)
type instance O.ParentTypes Token = '[]
instance O.HasParentTypes Token
foreign import ccall "vips_token_get_type" c_vips_token_get_type ::
IO GType
instance B.Types.TypedObject Token where
glibType :: IO GType
glibType = IO GType
c_vips_token_get_type
instance B.Types.BoxedEnum Token
data Size =
SizeBoth
| SizeUp
| SizeDown
| SizeForce
| SizeLast
| AnotherSize Int
deriving (Int -> Size -> ShowS
[Size] -> ShowS
Size -> String
(Int -> Size -> ShowS)
-> (Size -> String) -> ([Size] -> ShowS) -> Show Size
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Size] -> ShowS
$cshowList :: [Size] -> ShowS
show :: Size -> String
$cshow :: Size -> String
showsPrec :: Int -> Size -> ShowS
$cshowsPrec :: Int -> Size -> ShowS
Show, Size -> Size -> Bool
(Size -> Size -> Bool) -> (Size -> Size -> Bool) -> Eq Size
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Size -> Size -> Bool
$c/= :: Size -> Size -> Bool
== :: Size -> Size -> Bool
$c== :: Size -> Size -> Bool
Eq)
instance P.Enum Size where
fromEnum :: Size -> Int
fromEnum Size
SizeBoth = Int
0
fromEnum Size
SizeUp = Int
1
fromEnum Size
SizeDown = Int
2
fromEnum Size
SizeForce = Int
3
fromEnum Size
SizeLast = Int
4
fromEnum (AnotherSize Int
k) = Int
k
toEnum :: Int -> Size
toEnum Int
0 = Size
SizeBoth
toEnum Int
1 = Size
SizeUp
toEnum Int
2 = Size
SizeDown
toEnum Int
3 = Size
SizeForce
toEnum Int
4 = Size
SizeLast
toEnum Int
k = Int -> Size
AnotherSize Int
k
instance P.Ord Size where
compare :: Size -> Size -> Ordering
compare Size
a Size
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Size -> Int
forall a. Enum a => a -> Int
P.fromEnum Size
a) (Size -> Int
forall a. Enum a => a -> Int
P.fromEnum Size
b)
type instance O.ParentTypes Size = '[]
instance O.HasParentTypes Size
foreign import ccall "vips_size_get_type" c_vips_size_get_type ::
IO GType
instance B.Types.TypedObject Size where
glibType :: IO GType
glibType = IO GType
c_vips_size_get_type
instance B.Types.BoxedEnum Size
data Saveable =
SaveableMono
| SaveableRgb
| SaveableRgba
| SaveableRgbaOnly
| SaveableRgbCmyk
| SaveableAny
| SaveableLast
| AnotherSaveable Int
deriving (Int -> Saveable -> ShowS
[Saveable] -> ShowS
Saveable -> String
(Int -> Saveable -> ShowS)
-> (Saveable -> String) -> ([Saveable] -> ShowS) -> Show Saveable
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Saveable] -> ShowS
$cshowList :: [Saveable] -> ShowS
show :: Saveable -> String
$cshow :: Saveable -> String
showsPrec :: Int -> Saveable -> ShowS
$cshowsPrec :: Int -> Saveable -> ShowS
Show, Saveable -> Saveable -> Bool
(Saveable -> Saveable -> Bool)
-> (Saveable -> Saveable -> Bool) -> Eq Saveable
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Saveable -> Saveable -> Bool
$c/= :: Saveable -> Saveable -> Bool
== :: Saveable -> Saveable -> Bool
$c== :: Saveable -> Saveable -> Bool
Eq)
instance P.Enum Saveable where
fromEnum :: Saveable -> Int
fromEnum Saveable
SaveableMono = Int
0
fromEnum Saveable
SaveableRgb = Int
1
fromEnum Saveable
SaveableRgba = Int
2
fromEnum Saveable
SaveableRgbaOnly = Int
3
fromEnum Saveable
SaveableRgbCmyk = Int
4
fromEnum Saveable
SaveableAny = Int
5
fromEnum Saveable
SaveableLast = Int
6
fromEnum (AnotherSaveable Int
k) = Int
k
toEnum :: Int -> Saveable
toEnum Int
0 = Saveable
SaveableMono
toEnum Int
1 = Saveable
SaveableRgb
toEnum Int
2 = Saveable
SaveableRgba
toEnum Int
3 = Saveable
SaveableRgbaOnly
toEnum Int
4 = Saveable
SaveableRgbCmyk
toEnum Int
5 = Saveable
SaveableAny
toEnum Int
6 = Saveable
SaveableLast
toEnum Int
k = Int -> Saveable
AnotherSaveable Int
k
instance P.Ord Saveable where
compare :: Saveable -> Saveable -> Ordering
compare Saveable
a Saveable
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Saveable -> Int
forall a. Enum a => a -> Int
P.fromEnum Saveable
a) (Saveable -> Int
forall a. Enum a => a -> Int
P.fromEnum Saveable
b)
type instance O.ParentTypes Saveable = '[]
instance O.HasParentTypes Saveable
foreign import ccall "vips_saveable_get_type" c_vips_saveable_get_type ::
IO GType
instance B.Types.TypedObject Saveable where
glibType :: IO GType
glibType = IO GType
c_vips_saveable_get_type
instance B.Types.BoxedEnum Saveable
data RegionShrink =
RegionShrinkMean
| RegionShrinkMedian
| RegionShrinkMode
| RegionShrinkMax
| RegionShrinkMin
| RegionShrinkNearest
| RegionShrinkLast
| AnotherRegionShrink Int
deriving (Int -> RegionShrink -> ShowS
[RegionShrink] -> ShowS
RegionShrink -> String
(Int -> RegionShrink -> ShowS)
-> (RegionShrink -> String)
-> ([RegionShrink] -> ShowS)
-> Show RegionShrink
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RegionShrink] -> ShowS
$cshowList :: [RegionShrink] -> ShowS
show :: RegionShrink -> String
$cshow :: RegionShrink -> String
showsPrec :: Int -> RegionShrink -> ShowS
$cshowsPrec :: Int -> RegionShrink -> ShowS
Show, RegionShrink -> RegionShrink -> Bool
(RegionShrink -> RegionShrink -> Bool)
-> (RegionShrink -> RegionShrink -> Bool) -> Eq RegionShrink
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RegionShrink -> RegionShrink -> Bool
$c/= :: RegionShrink -> RegionShrink -> Bool
== :: RegionShrink -> RegionShrink -> Bool
$c== :: RegionShrink -> RegionShrink -> Bool
Eq)
instance P.Enum RegionShrink where
fromEnum :: RegionShrink -> Int
fromEnum RegionShrink
RegionShrinkMean = Int
0
fromEnum RegionShrink
RegionShrinkMedian = Int
1
fromEnum RegionShrink
RegionShrinkMode = Int
2
fromEnum RegionShrink
RegionShrinkMax = Int
3
fromEnum RegionShrink
RegionShrinkMin = Int
4
fromEnum RegionShrink
RegionShrinkNearest = Int
5
fromEnum RegionShrink
RegionShrinkLast = Int
6
fromEnum (AnotherRegionShrink Int
k) = Int
k
toEnum :: Int -> RegionShrink
toEnum Int
0 = RegionShrink
RegionShrinkMean
toEnum Int
1 = RegionShrink
RegionShrinkMedian
toEnum Int
2 = RegionShrink
RegionShrinkMode
toEnum Int
3 = RegionShrink
RegionShrinkMax
toEnum Int
4 = RegionShrink
RegionShrinkMin
toEnum Int
5 = RegionShrink
RegionShrinkNearest
toEnum Int
6 = RegionShrink
RegionShrinkLast
toEnum Int
k = Int -> RegionShrink
AnotherRegionShrink Int
k
instance P.Ord RegionShrink where
compare :: RegionShrink -> RegionShrink -> Ordering
compare RegionShrink
a RegionShrink
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (RegionShrink -> Int
forall a. Enum a => a -> Int
P.fromEnum RegionShrink
a) (RegionShrink -> Int
forall a. Enum a => a -> Int
P.fromEnum RegionShrink
b)
type instance O.ParentTypes RegionShrink = '[]
instance O.HasParentTypes RegionShrink
foreign import ccall "vips_region_shrink_get_type" c_vips_region_shrink_get_type ::
IO GType
instance B.Types.TypedObject RegionShrink where
glibType :: IO GType
glibType = IO GType
c_vips_region_shrink_get_type
instance B.Types.BoxedEnum RegionShrink
data Precision =
PrecisionInteger
| PrecisionFloat
| PrecisionApproximate
| PrecisionLast
| AnotherPrecision Int
deriving (Int -> Precision -> ShowS
[Precision] -> ShowS
Precision -> String
(Int -> Precision -> ShowS)
-> (Precision -> String)
-> ([Precision] -> ShowS)
-> Show Precision
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Precision] -> ShowS
$cshowList :: [Precision] -> ShowS
show :: Precision -> String
$cshow :: Precision -> String
showsPrec :: Int -> Precision -> ShowS
$cshowsPrec :: Int -> Precision -> ShowS
Show, Precision -> Precision -> Bool
(Precision -> Precision -> Bool)
-> (Precision -> Precision -> Bool) -> Eq Precision
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Precision -> Precision -> Bool
$c/= :: Precision -> Precision -> Bool
== :: Precision -> Precision -> Bool
$c== :: Precision -> Precision -> Bool
Eq)
instance P.Enum Precision where
fromEnum :: Precision -> Int
fromEnum Precision
PrecisionInteger = Int
0
fromEnum Precision
PrecisionFloat = Int
1
fromEnum Precision
PrecisionApproximate = Int
2
fromEnum Precision
PrecisionLast = Int
3
fromEnum (AnotherPrecision Int
k) = Int
k
toEnum :: Int -> Precision
toEnum Int
0 = Precision
PrecisionInteger
toEnum Int
1 = Precision
PrecisionFloat
toEnum Int
2 = Precision
PrecisionApproximate
toEnum Int
3 = Precision
PrecisionLast
toEnum Int
k = Int -> Precision
AnotherPrecision Int
k
instance P.Ord Precision where
compare :: Precision -> Precision -> Ordering
compare Precision
a Precision
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Precision -> Int
forall a. Enum a => a -> Int
P.fromEnum Precision
a) (Precision -> Int
forall a. Enum a => a -> Int
P.fromEnum Precision
b)
type instance O.ParentTypes Precision = '[]
instance O.HasParentTypes Precision
foreign import ccall "vips_precision_get_type" c_vips_precision_get_type ::
IO GType
instance B.Types.TypedObject Precision where
glibType :: IO GType
glibType = IO GType
c_vips_precision_get_type
instance B.Types.BoxedEnum Precision
data PCS =
PCSLab
| PCSXyz
| PCSLast
| AnotherPCS Int
deriving (Int -> PCS -> ShowS
[PCS] -> ShowS
PCS -> String
(Int -> PCS -> ShowS)
-> (PCS -> String) -> ([PCS] -> ShowS) -> Show PCS
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PCS] -> ShowS
$cshowList :: [PCS] -> ShowS
show :: PCS -> String
$cshow :: PCS -> String
showsPrec :: Int -> PCS -> ShowS
$cshowsPrec :: Int -> PCS -> ShowS
Show, PCS -> PCS -> Bool
(PCS -> PCS -> Bool) -> (PCS -> PCS -> Bool) -> Eq PCS
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PCS -> PCS -> Bool
$c/= :: PCS -> PCS -> Bool
== :: PCS -> PCS -> Bool
$c== :: PCS -> PCS -> Bool
Eq)
instance P.Enum PCS where
fromEnum :: PCS -> Int
fromEnum PCS
PCSLab = Int
0
fromEnum PCS
PCSXyz = Int
1
fromEnum PCS
PCSLast = Int
2
fromEnum (AnotherPCS Int
k) = Int
k
toEnum :: Int -> PCS
toEnum Int
0 = PCS
PCSLab
toEnum Int
1 = PCS
PCSXyz
toEnum Int
2 = PCS
PCSLast
toEnum Int
k = Int -> PCS
AnotherPCS Int
k
instance P.Ord PCS where
compare :: PCS -> PCS -> Ordering
compare PCS
a PCS
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (PCS -> Int
forall a. Enum a => a -> Int
P.fromEnum PCS
a) (PCS -> Int
forall a. Enum a => a -> Int
P.fromEnum PCS
b)
type instance O.ParentTypes PCS = '[]
instance O.HasParentTypes PCS
foreign import ccall "vips_pcs_get_type" c_vips_pcs_get_type ::
IO GType
instance B.Types.TypedObject PCS where
glibType :: IO GType
glibType = IO GType
c_vips_pcs_get_type
instance B.Types.BoxedEnum PCS
data OperationRound =
OperationRoundRint
| OperationRoundCeil
| OperationRoundFloor
| OperationRoundLast
| AnotherOperationRound Int
deriving (Int -> OperationRound -> ShowS
[OperationRound] -> ShowS
OperationRound -> String
(Int -> OperationRound -> ShowS)
-> (OperationRound -> String)
-> ([OperationRound] -> ShowS)
-> Show OperationRound
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OperationRound] -> ShowS
$cshowList :: [OperationRound] -> ShowS
show :: OperationRound -> String
$cshow :: OperationRound -> String
showsPrec :: Int -> OperationRound -> ShowS
$cshowsPrec :: Int -> OperationRound -> ShowS
Show, OperationRound -> OperationRound -> Bool
(OperationRound -> OperationRound -> Bool)
-> (OperationRound -> OperationRound -> Bool) -> Eq OperationRound
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OperationRound -> OperationRound -> Bool
$c/= :: OperationRound -> OperationRound -> Bool
== :: OperationRound -> OperationRound -> Bool
$c== :: OperationRound -> OperationRound -> Bool
Eq)
instance P.Enum OperationRound where
fromEnum :: OperationRound -> Int
fromEnum OperationRound
OperationRoundRint = Int
0
fromEnum OperationRound
OperationRoundCeil = Int
1
fromEnum OperationRound
OperationRoundFloor = Int
2
fromEnum OperationRound
OperationRoundLast = Int
3
fromEnum (AnotherOperationRound Int
k) = Int
k
toEnum :: Int -> OperationRound
toEnum Int
0 = OperationRound
OperationRoundRint
toEnum Int
1 = OperationRound
OperationRoundCeil
toEnum Int
2 = OperationRound
OperationRoundFloor
toEnum Int
3 = OperationRound
OperationRoundLast
toEnum Int
k = Int -> OperationRound
AnotherOperationRound Int
k
instance P.Ord OperationRound where
compare :: OperationRound -> OperationRound -> Ordering
compare OperationRound
a OperationRound
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (OperationRound -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationRound
a) (OperationRound -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationRound
b)
type instance O.ParentTypes OperationRound = '[]
instance O.HasParentTypes OperationRound
foreign import ccall "vips_operation_round_get_type" c_vips_operation_round_get_type ::
IO GType
instance B.Types.TypedObject OperationRound where
glibType :: IO GType
glibType = IO GType
c_vips_operation_round_get_type
instance B.Types.BoxedEnum OperationRound
data OperationRelational =
OperationRelationalEqual
| OperationRelationalNoteq
| OperationRelationalLess
| OperationRelationalLesseq
| OperationRelationalMore
| OperationRelationalMoreeq
| OperationRelationalLast
| AnotherOperationRelational Int
deriving (Int -> OperationRelational -> ShowS
[OperationRelational] -> ShowS
OperationRelational -> String
(Int -> OperationRelational -> ShowS)
-> (OperationRelational -> String)
-> ([OperationRelational] -> ShowS)
-> Show OperationRelational
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OperationRelational] -> ShowS
$cshowList :: [OperationRelational] -> ShowS
show :: OperationRelational -> String
$cshow :: OperationRelational -> String
showsPrec :: Int -> OperationRelational -> ShowS
$cshowsPrec :: Int -> OperationRelational -> ShowS
Show, OperationRelational -> OperationRelational -> Bool
(OperationRelational -> OperationRelational -> Bool)
-> (OperationRelational -> OperationRelational -> Bool)
-> Eq OperationRelational
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OperationRelational -> OperationRelational -> Bool
$c/= :: OperationRelational -> OperationRelational -> Bool
== :: OperationRelational -> OperationRelational -> Bool
$c== :: OperationRelational -> OperationRelational -> Bool
Eq)
instance P.Enum OperationRelational where
fromEnum :: OperationRelational -> Int
fromEnum OperationRelational
OperationRelationalEqual = Int
0
fromEnum OperationRelational
OperationRelationalNoteq = Int
1
fromEnum OperationRelational
OperationRelationalLess = Int
2
fromEnum OperationRelational
OperationRelationalLesseq = Int
3
fromEnum OperationRelational
OperationRelationalMore = Int
4
fromEnum OperationRelational
OperationRelationalMoreeq = Int
5
fromEnum OperationRelational
OperationRelationalLast = Int
6
fromEnum (AnotherOperationRelational Int
k) = Int
k
toEnum :: Int -> OperationRelational
toEnum Int
0 = OperationRelational
OperationRelationalEqual
toEnum Int
1 = OperationRelational
OperationRelationalNoteq
toEnum Int
2 = OperationRelational
OperationRelationalLess
toEnum Int
3 = OperationRelational
OperationRelationalLesseq
toEnum Int
4 = OperationRelational
OperationRelationalMore
toEnum Int
5 = OperationRelational
OperationRelationalMoreeq
toEnum Int
6 = OperationRelational
OperationRelationalLast
toEnum Int
k = Int -> OperationRelational
AnotherOperationRelational Int
k
instance P.Ord OperationRelational where
compare :: OperationRelational -> OperationRelational -> Ordering
compare OperationRelational
a OperationRelational
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (OperationRelational -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationRelational
a) (OperationRelational -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationRelational
b)
type instance O.ParentTypes OperationRelational = '[]
instance O.HasParentTypes OperationRelational
foreign import ccall "vips_operation_relational_get_type" c_vips_operation_relational_get_type ::
IO GType
instance B.Types.TypedObject OperationRelational where
glibType :: IO GType
glibType = IO GType
c_vips_operation_relational_get_type
instance B.Types.BoxedEnum OperationRelational
data OperationMorphology =
OperationMorphologyErode
| OperationMorphologyDilate
| OperationMorphologyLast
| AnotherOperationMorphology Int
deriving (Int -> OperationMorphology -> ShowS
[OperationMorphology] -> ShowS
OperationMorphology -> String
(Int -> OperationMorphology -> ShowS)
-> (OperationMorphology -> String)
-> ([OperationMorphology] -> ShowS)
-> Show OperationMorphology
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OperationMorphology] -> ShowS
$cshowList :: [OperationMorphology] -> ShowS
show :: OperationMorphology -> String
$cshow :: OperationMorphology -> String
showsPrec :: Int -> OperationMorphology -> ShowS
$cshowsPrec :: Int -> OperationMorphology -> ShowS
Show, OperationMorphology -> OperationMorphology -> Bool
(OperationMorphology -> OperationMorphology -> Bool)
-> (OperationMorphology -> OperationMorphology -> Bool)
-> Eq OperationMorphology
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OperationMorphology -> OperationMorphology -> Bool
$c/= :: OperationMorphology -> OperationMorphology -> Bool
== :: OperationMorphology -> OperationMorphology -> Bool
$c== :: OperationMorphology -> OperationMorphology -> Bool
Eq)
instance P.Enum OperationMorphology where
fromEnum :: OperationMorphology -> Int
fromEnum OperationMorphology
OperationMorphologyErode = Int
0
fromEnum OperationMorphology
OperationMorphologyDilate = Int
1
fromEnum OperationMorphology
OperationMorphologyLast = Int
2
fromEnum (AnotherOperationMorphology Int
k) = Int
k
toEnum :: Int -> OperationMorphology
toEnum Int
0 = OperationMorphology
OperationMorphologyErode
toEnum Int
1 = OperationMorphology
OperationMorphologyDilate
toEnum Int
2 = OperationMorphology
OperationMorphologyLast
toEnum Int
k = Int -> OperationMorphology
AnotherOperationMorphology Int
k
instance P.Ord OperationMorphology where
compare :: OperationMorphology -> OperationMorphology -> Ordering
compare OperationMorphology
a OperationMorphology
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (OperationMorphology -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationMorphology
a) (OperationMorphology -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationMorphology
b)
type instance O.ParentTypes OperationMorphology = '[]
instance O.HasParentTypes OperationMorphology
foreign import ccall "vips_operation_morphology_get_type" c_vips_operation_morphology_get_type ::
IO GType
instance B.Types.TypedObject OperationMorphology where
glibType :: IO GType
glibType = IO GType
c_vips_operation_morphology_get_type
instance B.Types.BoxedEnum OperationMorphology
data OperationMath2 =
OperationMath2Pow
| OperationMath2Wop
| OperationMath2Last
| AnotherOperationMath2 Int
deriving (Int -> OperationMath2 -> ShowS
[OperationMath2] -> ShowS
OperationMath2 -> String
(Int -> OperationMath2 -> ShowS)
-> (OperationMath2 -> String)
-> ([OperationMath2] -> ShowS)
-> Show OperationMath2
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OperationMath2] -> ShowS
$cshowList :: [OperationMath2] -> ShowS
show :: OperationMath2 -> String
$cshow :: OperationMath2 -> String
showsPrec :: Int -> OperationMath2 -> ShowS
$cshowsPrec :: Int -> OperationMath2 -> ShowS
Show, OperationMath2 -> OperationMath2 -> Bool
(OperationMath2 -> OperationMath2 -> Bool)
-> (OperationMath2 -> OperationMath2 -> Bool) -> Eq OperationMath2
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OperationMath2 -> OperationMath2 -> Bool
$c/= :: OperationMath2 -> OperationMath2 -> Bool
== :: OperationMath2 -> OperationMath2 -> Bool
$c== :: OperationMath2 -> OperationMath2 -> Bool
Eq)
instance P.Enum OperationMath2 where
fromEnum :: OperationMath2 -> Int
fromEnum OperationMath2
OperationMath2Pow = Int
0
fromEnum OperationMath2
OperationMath2Wop = Int
1
fromEnum OperationMath2
OperationMath2Last = Int
2
fromEnum (AnotherOperationMath2 Int
k) = Int
k
toEnum :: Int -> OperationMath2
toEnum Int
0 = OperationMath2
OperationMath2Pow
toEnum Int
1 = OperationMath2
OperationMath2Wop
toEnum Int
2 = OperationMath2
OperationMath2Last
toEnum Int
k = Int -> OperationMath2
AnotherOperationMath2 Int
k
instance P.Ord OperationMath2 where
compare :: OperationMath2 -> OperationMath2 -> Ordering
compare OperationMath2
a OperationMath2
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (OperationMath2 -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationMath2
a) (OperationMath2 -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationMath2
b)
type instance O.ParentTypes OperationMath2 = '[]
instance O.HasParentTypes OperationMath2
foreign import ccall "vips_operation_math2_get_type" c_vips_operation_math2_get_type ::
IO GType
instance B.Types.TypedObject OperationMath2 where
glibType :: IO GType
glibType = IO GType
c_vips_operation_math2_get_type
instance B.Types.BoxedEnum OperationMath2
data OperationMath =
OperationMathSin
| OperationMathCos
| OperationMathTan
| OperationMathAsin
| OperationMathAcos
| OperationMathAtan
| OperationMathLog
| OperationMathLog10
| OperationMathExp
| OperationMathExp10
| OperationMathLast
| AnotherOperationMath Int
deriving (Int -> OperationMath -> ShowS
[OperationMath] -> ShowS
OperationMath -> String
(Int -> OperationMath -> ShowS)
-> (OperationMath -> String)
-> ([OperationMath] -> ShowS)
-> Show OperationMath
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OperationMath] -> ShowS
$cshowList :: [OperationMath] -> ShowS
show :: OperationMath -> String
$cshow :: OperationMath -> String
showsPrec :: Int -> OperationMath -> ShowS
$cshowsPrec :: Int -> OperationMath -> ShowS
Show, OperationMath -> OperationMath -> Bool
(OperationMath -> OperationMath -> Bool)
-> (OperationMath -> OperationMath -> Bool) -> Eq OperationMath
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OperationMath -> OperationMath -> Bool
$c/= :: OperationMath -> OperationMath -> Bool
== :: OperationMath -> OperationMath -> Bool
$c== :: OperationMath -> OperationMath -> Bool
Eq)
instance P.Enum OperationMath where
fromEnum :: OperationMath -> Int
fromEnum OperationMath
OperationMathSin = Int
0
fromEnum OperationMath
OperationMathCos = Int
1
fromEnum OperationMath
OperationMathTan = Int
2
fromEnum OperationMath
OperationMathAsin = Int
3
fromEnum OperationMath
OperationMathAcos = Int
4
fromEnum OperationMath
OperationMathAtan = Int
5
fromEnum OperationMath
OperationMathLog = Int
6
fromEnum OperationMath
OperationMathLog10 = Int
7
fromEnum OperationMath
OperationMathExp = Int
8
fromEnum OperationMath
OperationMathExp10 = Int
9
fromEnum OperationMath
OperationMathLast = Int
10
fromEnum (AnotherOperationMath Int
k) = Int
k
toEnum :: Int -> OperationMath
toEnum Int
0 = OperationMath
OperationMathSin
toEnum Int
1 = OperationMath
OperationMathCos
toEnum Int
2 = OperationMath
OperationMathTan
toEnum Int
3 = OperationMath
OperationMathAsin
toEnum Int
4 = OperationMath
OperationMathAcos
toEnum Int
5 = OperationMath
OperationMathAtan
toEnum Int
6 = OperationMath
OperationMathLog
toEnum Int
7 = OperationMath
OperationMathLog10
toEnum Int
8 = OperationMath
OperationMathExp
toEnum Int
9 = OperationMath
OperationMathExp10
toEnum Int
10 = OperationMath
OperationMathLast
toEnum Int
k = Int -> OperationMath
AnotherOperationMath Int
k
instance P.Ord OperationMath where
compare :: OperationMath -> OperationMath -> Ordering
compare OperationMath
a OperationMath
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (OperationMath -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationMath
a) (OperationMath -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationMath
b)
type instance O.ParentTypes OperationMath = '[]
instance O.HasParentTypes OperationMath
foreign import ccall "vips_operation_math_get_type" c_vips_operation_math_get_type ::
IO GType
instance B.Types.TypedObject OperationMath where
glibType :: IO GType
glibType = IO GType
c_vips_operation_math_get_type
instance B.Types.BoxedEnum OperationMath
data OperationComplexget =
OperationComplexgetReal
| OperationComplexgetImag
| OperationComplexgetLast
| AnotherOperationComplexget Int
deriving (Int -> OperationComplexget -> ShowS
[OperationComplexget] -> ShowS
OperationComplexget -> String
(Int -> OperationComplexget -> ShowS)
-> (OperationComplexget -> String)
-> ([OperationComplexget] -> ShowS)
-> Show OperationComplexget
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OperationComplexget] -> ShowS
$cshowList :: [OperationComplexget] -> ShowS
show :: OperationComplexget -> String
$cshow :: OperationComplexget -> String
showsPrec :: Int -> OperationComplexget -> ShowS
$cshowsPrec :: Int -> OperationComplexget -> ShowS
Show, OperationComplexget -> OperationComplexget -> Bool
(OperationComplexget -> OperationComplexget -> Bool)
-> (OperationComplexget -> OperationComplexget -> Bool)
-> Eq OperationComplexget
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OperationComplexget -> OperationComplexget -> Bool
$c/= :: OperationComplexget -> OperationComplexget -> Bool
== :: OperationComplexget -> OperationComplexget -> Bool
$c== :: OperationComplexget -> OperationComplexget -> Bool
Eq)
instance P.Enum OperationComplexget where
fromEnum :: OperationComplexget -> Int
fromEnum OperationComplexget
OperationComplexgetReal = Int
0
fromEnum OperationComplexget
OperationComplexgetImag = Int
1
fromEnum OperationComplexget
OperationComplexgetLast = Int
2
fromEnum (AnotherOperationComplexget Int
k) = Int
k
toEnum :: Int -> OperationComplexget
toEnum Int
0 = OperationComplexget
OperationComplexgetReal
toEnum Int
1 = OperationComplexget
OperationComplexgetImag
toEnum Int
2 = OperationComplexget
OperationComplexgetLast
toEnum Int
k = Int -> OperationComplexget
AnotherOperationComplexget Int
k
instance P.Ord OperationComplexget where
compare :: OperationComplexget -> OperationComplexget -> Ordering
compare OperationComplexget
a OperationComplexget
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (OperationComplexget -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationComplexget
a) (OperationComplexget -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationComplexget
b)
type instance O.ParentTypes OperationComplexget = '[]
instance O.HasParentTypes OperationComplexget
foreign import ccall "vips_operation_complexget_get_type" c_vips_operation_complexget_get_type ::
IO GType
instance B.Types.TypedObject OperationComplexget where
glibType :: IO GType
glibType = IO GType
c_vips_operation_complexget_get_type
instance B.Types.BoxedEnum OperationComplexget
data OperationComplex2 =
OperationComplex2CrossPhase
| OperationComplex2Last
| AnotherOperationComplex2 Int
deriving (Int -> OperationComplex2 -> ShowS
[OperationComplex2] -> ShowS
OperationComplex2 -> String
(Int -> OperationComplex2 -> ShowS)
-> (OperationComplex2 -> String)
-> ([OperationComplex2] -> ShowS)
-> Show OperationComplex2
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OperationComplex2] -> ShowS
$cshowList :: [OperationComplex2] -> ShowS
show :: OperationComplex2 -> String
$cshow :: OperationComplex2 -> String
showsPrec :: Int -> OperationComplex2 -> ShowS
$cshowsPrec :: Int -> OperationComplex2 -> ShowS
Show, OperationComplex2 -> OperationComplex2 -> Bool
(OperationComplex2 -> OperationComplex2 -> Bool)
-> (OperationComplex2 -> OperationComplex2 -> Bool)
-> Eq OperationComplex2
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OperationComplex2 -> OperationComplex2 -> Bool
$c/= :: OperationComplex2 -> OperationComplex2 -> Bool
== :: OperationComplex2 -> OperationComplex2 -> Bool
$c== :: OperationComplex2 -> OperationComplex2 -> Bool
Eq)
instance P.Enum OperationComplex2 where
fromEnum :: OperationComplex2 -> Int
fromEnum OperationComplex2
OperationComplex2CrossPhase = Int
0
fromEnum OperationComplex2
OperationComplex2Last = Int
1
fromEnum (AnotherOperationComplex2 Int
k) = Int
k
toEnum :: Int -> OperationComplex2
toEnum Int
0 = OperationComplex2
OperationComplex2CrossPhase
toEnum Int
1 = OperationComplex2
OperationComplex2Last
toEnum Int
k = Int -> OperationComplex2
AnotherOperationComplex2 Int
k
instance P.Ord OperationComplex2 where
compare :: OperationComplex2 -> OperationComplex2 -> Ordering
compare OperationComplex2
a OperationComplex2
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (OperationComplex2 -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationComplex2
a) (OperationComplex2 -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationComplex2
b)
type instance O.ParentTypes OperationComplex2 = '[]
instance O.HasParentTypes OperationComplex2
foreign import ccall "vips_operation_complex2_get_type" c_vips_operation_complex2_get_type ::
IO GType
instance B.Types.TypedObject OperationComplex2 where
glibType :: IO GType
glibType = IO GType
c_vips_operation_complex2_get_type
instance B.Types.BoxedEnum OperationComplex2
data OperationComplex =
OperationComplexPolar
| OperationComplexRect
| OperationComplexConj
| OperationComplexLast
| AnotherOperationComplex Int
deriving (Int -> OperationComplex -> ShowS
[OperationComplex] -> ShowS
OperationComplex -> String
(Int -> OperationComplex -> ShowS)
-> (OperationComplex -> String)
-> ([OperationComplex] -> ShowS)
-> Show OperationComplex
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OperationComplex] -> ShowS
$cshowList :: [OperationComplex] -> ShowS
show :: OperationComplex -> String
$cshow :: OperationComplex -> String
showsPrec :: Int -> OperationComplex -> ShowS
$cshowsPrec :: Int -> OperationComplex -> ShowS
Show, OperationComplex -> OperationComplex -> Bool
(OperationComplex -> OperationComplex -> Bool)
-> (OperationComplex -> OperationComplex -> Bool)
-> Eq OperationComplex
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OperationComplex -> OperationComplex -> Bool
$c/= :: OperationComplex -> OperationComplex -> Bool
== :: OperationComplex -> OperationComplex -> Bool
$c== :: OperationComplex -> OperationComplex -> Bool
Eq)
instance P.Enum OperationComplex where
fromEnum :: OperationComplex -> Int
fromEnum OperationComplex
OperationComplexPolar = Int
0
fromEnum OperationComplex
OperationComplexRect = Int
1
fromEnum OperationComplex
OperationComplexConj = Int
2
fromEnum OperationComplex
OperationComplexLast = Int
3
fromEnum (AnotherOperationComplex Int
k) = Int
k
toEnum :: Int -> OperationComplex
toEnum Int
0 = OperationComplex
OperationComplexPolar
toEnum Int
1 = OperationComplex
OperationComplexRect
toEnum Int
2 = OperationComplex
OperationComplexConj
toEnum Int
3 = OperationComplex
OperationComplexLast
toEnum Int
k = Int -> OperationComplex
AnotherOperationComplex Int
k
instance P.Ord OperationComplex where
compare :: OperationComplex -> OperationComplex -> Ordering
compare OperationComplex
a OperationComplex
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (OperationComplex -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationComplex
a) (OperationComplex -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationComplex
b)
type instance O.ParentTypes OperationComplex = '[]
instance O.HasParentTypes OperationComplex
foreign import ccall "vips_operation_complex_get_type" c_vips_operation_complex_get_type ::
IO GType
instance B.Types.TypedObject OperationComplex where
glibType :: IO GType
glibType = IO GType
c_vips_operation_complex_get_type
instance B.Types.BoxedEnum OperationComplex
data OperationBoolean =
OperationBooleanAnd
| OperationBooleanOr
| OperationBooleanEor
| OperationBooleanLshift
| OperationBooleanRshift
| OperationBooleanLast
| AnotherOperationBoolean Int
deriving (Int -> OperationBoolean -> ShowS
[OperationBoolean] -> ShowS
OperationBoolean -> String
(Int -> OperationBoolean -> ShowS)
-> (OperationBoolean -> String)
-> ([OperationBoolean] -> ShowS)
-> Show OperationBoolean
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OperationBoolean] -> ShowS
$cshowList :: [OperationBoolean] -> ShowS
show :: OperationBoolean -> String
$cshow :: OperationBoolean -> String
showsPrec :: Int -> OperationBoolean -> ShowS
$cshowsPrec :: Int -> OperationBoolean -> ShowS
Show, OperationBoolean -> OperationBoolean -> Bool
(OperationBoolean -> OperationBoolean -> Bool)
-> (OperationBoolean -> OperationBoolean -> Bool)
-> Eq OperationBoolean
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OperationBoolean -> OperationBoolean -> Bool
$c/= :: OperationBoolean -> OperationBoolean -> Bool
== :: OperationBoolean -> OperationBoolean -> Bool
$c== :: OperationBoolean -> OperationBoolean -> Bool
Eq)
instance P.Enum OperationBoolean where
fromEnum :: OperationBoolean -> Int
fromEnum OperationBoolean
OperationBooleanAnd = Int
0
fromEnum OperationBoolean
OperationBooleanOr = Int
1
fromEnum OperationBoolean
OperationBooleanEor = Int
2
fromEnum OperationBoolean
OperationBooleanLshift = Int
3
fromEnum OperationBoolean
OperationBooleanRshift = Int
4
fromEnum OperationBoolean
OperationBooleanLast = Int
5
fromEnum (AnotherOperationBoolean Int
k) = Int
k
toEnum :: Int -> OperationBoolean
toEnum Int
0 = OperationBoolean
OperationBooleanAnd
toEnum Int
1 = OperationBoolean
OperationBooleanOr
toEnum Int
2 = OperationBoolean
OperationBooleanEor
toEnum Int
3 = OperationBoolean
OperationBooleanLshift
toEnum Int
4 = OperationBoolean
OperationBooleanRshift
toEnum Int
5 = OperationBoolean
OperationBooleanLast
toEnum Int
k = Int -> OperationBoolean
AnotherOperationBoolean Int
k
instance P.Ord OperationBoolean where
compare :: OperationBoolean -> OperationBoolean -> Ordering
compare OperationBoolean
a OperationBoolean
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (OperationBoolean -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationBoolean
a) (OperationBoolean -> Int
forall a. Enum a => a -> Int
P.fromEnum OperationBoolean
b)
type instance O.ParentTypes OperationBoolean = '[]
instance O.HasParentTypes OperationBoolean
foreign import ccall "vips_operation_boolean_get_type" c_vips_operation_boolean_get_type ::
IO GType
instance B.Types.TypedObject OperationBoolean where
glibType :: IO GType
glibType = IO GType
c_vips_operation_boolean_get_type
instance B.Types.BoxedEnum OperationBoolean
data Kernel =
KernelNearest
| KernelLinear
| KernelCubic
| KernelMitchell
| KernelLanczos2
| KernelLanczos3
| KernelLast
| AnotherKernel Int
deriving (Int -> Kernel -> ShowS
[Kernel] -> ShowS
Kernel -> String
(Int -> Kernel -> ShowS)
-> (Kernel -> String) -> ([Kernel] -> ShowS) -> Show Kernel
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Kernel] -> ShowS
$cshowList :: [Kernel] -> ShowS
show :: Kernel -> String
$cshow :: Kernel -> String
showsPrec :: Int -> Kernel -> ShowS
$cshowsPrec :: Int -> Kernel -> ShowS
Show, Kernel -> Kernel -> Bool
(Kernel -> Kernel -> Bool)
-> (Kernel -> Kernel -> Bool) -> Eq Kernel
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Kernel -> Kernel -> Bool
$c/= :: Kernel -> Kernel -> Bool
== :: Kernel -> Kernel -> Bool
$c== :: Kernel -> Kernel -> Bool
Eq)
instance P.Enum Kernel where
fromEnum :: Kernel -> Int
fromEnum Kernel
KernelNearest = Int
0
fromEnum Kernel
KernelLinear = Int
1
fromEnum Kernel
KernelCubic = Int
2
fromEnum Kernel
KernelMitchell = Int
3
fromEnum Kernel
KernelLanczos2 = Int
4
fromEnum Kernel
KernelLanczos3 = Int
5
fromEnum Kernel
KernelLast = Int
6
fromEnum (AnotherKernel Int
k) = Int
k
toEnum :: Int -> Kernel
toEnum Int
0 = Kernel
KernelNearest
toEnum Int
1 = Kernel
KernelLinear
toEnum Int
2 = Kernel
KernelCubic
toEnum Int
3 = Kernel
KernelMitchell
toEnum Int
4 = Kernel
KernelLanczos2
toEnum Int
5 = Kernel
KernelLanczos3
toEnum Int
6 = Kernel
KernelLast
toEnum Int
k = Int -> Kernel
AnotherKernel Int
k
instance P.Ord Kernel where
compare :: Kernel -> Kernel -> Ordering
compare Kernel
a Kernel
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Kernel -> Int
forall a. Enum a => a -> Int
P.fromEnum Kernel
a) (Kernel -> Int
forall a. Enum a => a -> Int
P.fromEnum Kernel
b)
type instance O.ParentTypes Kernel = '[]
instance O.HasParentTypes Kernel
foreign import ccall "vips_kernel_get_type" c_vips_kernel_get_type ::
IO GType
instance B.Types.TypedObject Kernel where
glibType :: IO GType
glibType = IO GType
c_vips_kernel_get_type
instance B.Types.BoxedEnum Kernel
data Interpretation =
InterpretationError
| InterpretationMultiband
| InterpretationBW
| InterpretationHistogram
| InterpretationXyz
| InterpretationLab
| InterpretationCmyk
| InterpretationLabq
| InterpretationRgb
| InterpretationCmc
| InterpretationLch
| InterpretationLabs
| InterpretationSrgb
| InterpretationYxy
| InterpretationFourier
| InterpretationRgb16
| InterpretationGrey16
| InterpretationMatrix
| InterpretationScrgb
| InterpretationHsv
| InterpretationLast
| AnotherInterpretation Int
deriving (Int -> Interpretation -> ShowS
[Interpretation] -> ShowS
Interpretation -> String
(Int -> Interpretation -> ShowS)
-> (Interpretation -> String)
-> ([Interpretation] -> ShowS)
-> Show Interpretation
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Interpretation] -> ShowS
$cshowList :: [Interpretation] -> ShowS
show :: Interpretation -> String
$cshow :: Interpretation -> String
showsPrec :: Int -> Interpretation -> ShowS
$cshowsPrec :: Int -> Interpretation -> ShowS
Show, Interpretation -> Interpretation -> Bool
(Interpretation -> Interpretation -> Bool)
-> (Interpretation -> Interpretation -> Bool) -> Eq Interpretation
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Interpretation -> Interpretation -> Bool
$c/= :: Interpretation -> Interpretation -> Bool
== :: Interpretation -> Interpretation -> Bool
$c== :: Interpretation -> Interpretation -> Bool
Eq)
instance P.Enum Interpretation where
fromEnum :: Interpretation -> Int
fromEnum Interpretation
InterpretationError = Int
-1
fromEnum Interpretation
InterpretationMultiband = Int
0
fromEnum Interpretation
InterpretationBW = Int
1
fromEnum Interpretation
InterpretationHistogram = Int
10
fromEnum Interpretation
InterpretationXyz = Int
12
fromEnum Interpretation
InterpretationLab = Int
13
fromEnum Interpretation
InterpretationCmyk = Int
15
fromEnum Interpretation
InterpretationLabq = Int
16
fromEnum Interpretation
InterpretationRgb = Int
17
fromEnum Interpretation
InterpretationCmc = Int
18
fromEnum Interpretation
InterpretationLch = Int
19
fromEnum Interpretation
InterpretationLabs = Int
21
fromEnum Interpretation
InterpretationSrgb = Int
22
fromEnum Interpretation
InterpretationYxy = Int
23
fromEnum Interpretation
InterpretationFourier = Int
24
fromEnum Interpretation
InterpretationRgb16 = Int
25
fromEnum Interpretation
InterpretationGrey16 = Int
26
fromEnum Interpretation
InterpretationMatrix = Int
27
fromEnum Interpretation
InterpretationScrgb = Int
28
fromEnum Interpretation
InterpretationHsv = Int
29
fromEnum Interpretation
InterpretationLast = Int
30
fromEnum (AnotherInterpretation Int
k) = Int
k
toEnum :: Int -> Interpretation
toEnum Int
-1 = Interpretation
InterpretationError
toEnum Int
0 = Interpretation
InterpretationMultiband
toEnum Int
1 = Interpretation
InterpretationBW
toEnum Int
10 = Interpretation
InterpretationHistogram
toEnum Int
12 = Interpretation
InterpretationXyz
toEnum Int
13 = Interpretation
InterpretationLab
toEnum Int
15 = Interpretation
InterpretationCmyk
toEnum Int
16 = Interpretation
InterpretationLabq
toEnum Int
17 = Interpretation
InterpretationRgb
toEnum Int
18 = Interpretation
InterpretationCmc
toEnum Int
19 = Interpretation
InterpretationLch
toEnum Int
21 = Interpretation
InterpretationLabs
toEnum Int
22 = Interpretation
InterpretationSrgb
toEnum Int
23 = Interpretation
InterpretationYxy
toEnum Int
24 = Interpretation
InterpretationFourier
toEnum Int
25 = Interpretation
InterpretationRgb16
toEnum Int
26 = Interpretation
InterpretationGrey16
toEnum Int
27 = Interpretation
InterpretationMatrix
toEnum Int
28 = Interpretation
InterpretationScrgb
toEnum Int
29 = Interpretation
InterpretationHsv
toEnum Int
30 = Interpretation
InterpretationLast
toEnum Int
k = Int -> Interpretation
AnotherInterpretation Int
k
instance P.Ord Interpretation where
compare :: Interpretation -> Interpretation -> Ordering
compare Interpretation
a Interpretation
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Interpretation -> Int
forall a. Enum a => a -> Int
P.fromEnum Interpretation
a) (Interpretation -> Int
forall a. Enum a => a -> Int
P.fromEnum Interpretation
b)
type instance O.ParentTypes Interpretation = '[]
instance O.HasParentTypes Interpretation
foreign import ccall "vips_interpretation_get_type" c_vips_interpretation_get_type ::
IO GType
instance B.Types.TypedObject Interpretation where
glibType :: IO GType
glibType = IO GType
c_vips_interpretation_get_type
instance B.Types.BoxedEnum Interpretation
data Interesting =
InterestingNone
| InterestingCentre
| InterestingEntropy
| InterestingAttention
| InterestingLow
| InterestingHigh
| InterestingAll
| InterestingLast
| AnotherInteresting Int
deriving (Int -> Interesting -> ShowS
[Interesting] -> ShowS
Interesting -> String
(Int -> Interesting -> ShowS)
-> (Interesting -> String)
-> ([Interesting] -> ShowS)
-> Show Interesting
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Interesting] -> ShowS
$cshowList :: [Interesting] -> ShowS
show :: Interesting -> String
$cshow :: Interesting -> String
showsPrec :: Int -> Interesting -> ShowS
$cshowsPrec :: Int -> Interesting -> ShowS
Show, Interesting -> Interesting -> Bool
(Interesting -> Interesting -> Bool)
-> (Interesting -> Interesting -> Bool) -> Eq Interesting
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Interesting -> Interesting -> Bool
$c/= :: Interesting -> Interesting -> Bool
== :: Interesting -> Interesting -> Bool
$c== :: Interesting -> Interesting -> Bool
Eq)
instance P.Enum Interesting where
fromEnum :: Interesting -> Int
fromEnum Interesting
InterestingNone = Int
0
fromEnum Interesting
InterestingCentre = Int
1
fromEnum Interesting
InterestingEntropy = Int
2
fromEnum Interesting
InterestingAttention = Int
3
fromEnum Interesting
InterestingLow = Int
4
fromEnum Interesting
InterestingHigh = Int
5
fromEnum Interesting
InterestingAll = Int
6
fromEnum Interesting
InterestingLast = Int
7
fromEnum (AnotherInteresting Int
k) = Int
k
toEnum :: Int -> Interesting
toEnum Int
0 = Interesting
InterestingNone
toEnum Int
1 = Interesting
InterestingCentre
toEnum Int
2 = Interesting
InterestingEntropy
toEnum Int
3 = Interesting
InterestingAttention
toEnum Int
4 = Interesting
InterestingLow
toEnum Int
5 = Interesting
InterestingHigh
toEnum Int
6 = Interesting
InterestingAll
toEnum Int
7 = Interesting
InterestingLast
toEnum Int
k = Int -> Interesting
AnotherInteresting Int
k
instance P.Ord Interesting where
compare :: Interesting -> Interesting -> Ordering
compare Interesting
a Interesting
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Interesting -> Int
forall a. Enum a => a -> Int
P.fromEnum Interesting
a) (Interesting -> Int
forall a. Enum a => a -> Int
P.fromEnum Interesting
b)
type instance O.ParentTypes Interesting = '[]
instance O.HasParentTypes Interesting
foreign import ccall "vips_interesting_get_type" c_vips_interesting_get_type ::
IO GType
instance B.Types.TypedObject Interesting where
glibType :: IO GType
glibType = IO GType
c_vips_interesting_get_type
instance B.Types.BoxedEnum Interesting
data Intent =
IntentPerceptual
| IntentRelative
| IntentSaturation
| IntentAbsolute
| IntentLast
| AnotherIntent Int
deriving (Int -> Intent -> ShowS
[Intent] -> ShowS
Intent -> String
(Int -> Intent -> ShowS)
-> (Intent -> String) -> ([Intent] -> ShowS) -> Show Intent
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Intent] -> ShowS
$cshowList :: [Intent] -> ShowS
show :: Intent -> String
$cshow :: Intent -> String
showsPrec :: Int -> Intent -> ShowS
$cshowsPrec :: Int -> Intent -> ShowS
Show, Intent -> Intent -> Bool
(Intent -> Intent -> Bool)
-> (Intent -> Intent -> Bool) -> Eq Intent
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Intent -> Intent -> Bool
$c/= :: Intent -> Intent -> Bool
== :: Intent -> Intent -> Bool
$c== :: Intent -> Intent -> Bool
Eq)
instance P.Enum Intent where
fromEnum :: Intent -> Int
fromEnum Intent
IntentPerceptual = Int
0
fromEnum Intent
IntentRelative = Int
1
fromEnum Intent
IntentSaturation = Int
2
fromEnum Intent
IntentAbsolute = Int
3
fromEnum Intent
IntentLast = Int
4
fromEnum (AnotherIntent Int
k) = Int
k
toEnum :: Int -> Intent
toEnum Int
0 = Intent
IntentPerceptual
toEnum Int
1 = Intent
IntentRelative
toEnum Int
2 = Intent
IntentSaturation
toEnum Int
3 = Intent
IntentAbsolute
toEnum Int
4 = Intent
IntentLast
toEnum Int
k = Int -> Intent
AnotherIntent Int
k
instance P.Ord Intent where
compare :: Intent -> Intent -> Ordering
compare Intent
a Intent
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Intent -> Int
forall a. Enum a => a -> Int
P.fromEnum Intent
a) (Intent -> Int
forall a. Enum a => a -> Int
P.fromEnum Intent
b)
type instance O.ParentTypes Intent = '[]
instance O.HasParentTypes Intent
foreign import ccall "vips_intent_get_type" c_vips_intent_get_type ::
IO GType
instance B.Types.TypedObject Intent where
glibType :: IO GType
glibType = IO GType
c_vips_intent_get_type
instance B.Types.BoxedEnum Intent
data ImageType =
ImageTypeError
| ImageTypeNone
| ImageTypeSetbuf
| ImageTypeSetbufForeign
| ImageTypeOpenin
| ImageTypeMmapin
| ImageTypeMmapinrw
| ImageTypeOpenout
| ImageTypePartial
| AnotherImageType Int
deriving (Int -> ImageType -> ShowS
[ImageType] -> ShowS
ImageType -> String
(Int -> ImageType -> ShowS)
-> (ImageType -> String)
-> ([ImageType] -> ShowS)
-> Show ImageType
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ImageType] -> ShowS
$cshowList :: [ImageType] -> ShowS
show :: ImageType -> String
$cshow :: ImageType -> String
showsPrec :: Int -> ImageType -> ShowS
$cshowsPrec :: Int -> ImageType -> ShowS
Show, ImageType -> ImageType -> Bool
(ImageType -> ImageType -> Bool)
-> (ImageType -> ImageType -> Bool) -> Eq ImageType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ImageType -> ImageType -> Bool
$c/= :: ImageType -> ImageType -> Bool
== :: ImageType -> ImageType -> Bool
$c== :: ImageType -> ImageType -> Bool
Eq)
instance P.Enum ImageType where
fromEnum :: ImageType -> Int
fromEnum ImageType
ImageTypeError = Int
-1
fromEnum ImageType
ImageTypeNone = Int
0
fromEnum ImageType
ImageTypeSetbuf = Int
1
fromEnum ImageType
ImageTypeSetbufForeign = Int
2
fromEnum ImageType
ImageTypeOpenin = Int
3
fromEnum ImageType
ImageTypeMmapin = Int
4
fromEnum ImageType
ImageTypeMmapinrw = Int
5
fromEnum ImageType
ImageTypeOpenout = Int
6
fromEnum ImageType
ImageTypePartial = Int
7
fromEnum (AnotherImageType Int
k) = Int
k
toEnum :: Int -> ImageType
toEnum Int
-1 = ImageType
ImageTypeError
toEnum Int
0 = ImageType
ImageTypeNone
toEnum Int
1 = ImageType
ImageTypeSetbuf
toEnum Int
2 = ImageType
ImageTypeSetbufForeign
toEnum Int
3 = ImageType
ImageTypeOpenin
toEnum Int
4 = ImageType
ImageTypeMmapin
toEnum Int
5 = ImageType
ImageTypeMmapinrw
toEnum Int
6 = ImageType
ImageTypeOpenout
toEnum Int
7 = ImageType
ImageTypePartial
toEnum Int
k = Int -> ImageType
AnotherImageType Int
k
instance P.Ord ImageType where
compare :: ImageType -> ImageType -> Ordering
compare ImageType
a ImageType
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ImageType -> Int
forall a. Enum a => a -> Int
P.fromEnum ImageType
a) (ImageType -> Int
forall a. Enum a => a -> Int
P.fromEnum ImageType
b)
type instance O.ParentTypes ImageType = '[]
instance O.HasParentTypes ImageType
foreign import ccall "vips_image_type_get_type" c_vips_image_type_get_type ::
IO GType
instance B.Types.TypedObject ImageType where
glibType :: IO GType
glibType = IO GType
c_vips_image_type_get_type
instance B.Types.BoxedEnum ImageType
data ForeignWebpPreset =
ForeignWebpPresetDefault
| ForeignWebpPresetPicture
| ForeignWebpPresetPhoto
| ForeignWebpPresetDrawing
| ForeignWebpPresetIcon
| ForeignWebpPresetText
| ForeignWebpPresetLast
| AnotherForeignWebpPreset Int
deriving (Int -> ForeignWebpPreset -> ShowS
[ForeignWebpPreset] -> ShowS
ForeignWebpPreset -> String
(Int -> ForeignWebpPreset -> ShowS)
-> (ForeignWebpPreset -> String)
-> ([ForeignWebpPreset] -> ShowS)
-> Show ForeignWebpPreset
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ForeignWebpPreset] -> ShowS
$cshowList :: [ForeignWebpPreset] -> ShowS
show :: ForeignWebpPreset -> String
$cshow :: ForeignWebpPreset -> String
showsPrec :: Int -> ForeignWebpPreset -> ShowS
$cshowsPrec :: Int -> ForeignWebpPreset -> ShowS
Show, ForeignWebpPreset -> ForeignWebpPreset -> Bool
(ForeignWebpPreset -> ForeignWebpPreset -> Bool)
-> (ForeignWebpPreset -> ForeignWebpPreset -> Bool)
-> Eq ForeignWebpPreset
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ForeignWebpPreset -> ForeignWebpPreset -> Bool
$c/= :: ForeignWebpPreset -> ForeignWebpPreset -> Bool
== :: ForeignWebpPreset -> ForeignWebpPreset -> Bool
$c== :: ForeignWebpPreset -> ForeignWebpPreset -> Bool
Eq)
instance P.Enum ForeignWebpPreset where
fromEnum :: ForeignWebpPreset -> Int
fromEnum ForeignWebpPreset
ForeignWebpPresetDefault = Int
0
fromEnum ForeignWebpPreset
ForeignWebpPresetPicture = Int
1
fromEnum ForeignWebpPreset
ForeignWebpPresetPhoto = Int
2
fromEnum ForeignWebpPreset
ForeignWebpPresetDrawing = Int
3
fromEnum ForeignWebpPreset
ForeignWebpPresetIcon = Int
4
fromEnum ForeignWebpPreset
ForeignWebpPresetText = Int
5
fromEnum ForeignWebpPreset
ForeignWebpPresetLast = Int
6
fromEnum (AnotherForeignWebpPreset Int
k) = Int
k
toEnum :: Int -> ForeignWebpPreset
toEnum Int
0 = ForeignWebpPreset
ForeignWebpPresetDefault
toEnum Int
1 = ForeignWebpPreset
ForeignWebpPresetPicture
toEnum Int
2 = ForeignWebpPreset
ForeignWebpPresetPhoto
toEnum Int
3 = ForeignWebpPreset
ForeignWebpPresetDrawing
toEnum Int
4 = ForeignWebpPreset
ForeignWebpPresetIcon
toEnum Int
5 = ForeignWebpPreset
ForeignWebpPresetText
toEnum Int
6 = ForeignWebpPreset
ForeignWebpPresetLast
toEnum Int
k = Int -> ForeignWebpPreset
AnotherForeignWebpPreset Int
k
instance P.Ord ForeignWebpPreset where
compare :: ForeignWebpPreset -> ForeignWebpPreset -> Ordering
compare ForeignWebpPreset
a ForeignWebpPreset
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ForeignWebpPreset -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignWebpPreset
a) (ForeignWebpPreset -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignWebpPreset
b)
type instance O.ParentTypes ForeignWebpPreset = '[]
instance O.HasParentTypes ForeignWebpPreset
foreign import ccall "vips_foreign_webp_preset_get_type" c_vips_foreign_webp_preset_get_type ::
IO GType
instance B.Types.TypedObject ForeignWebpPreset where
glibType :: IO GType
glibType = IO GType
c_vips_foreign_webp_preset_get_type
instance B.Types.BoxedEnum ForeignWebpPreset
data ForeignTiffResunit =
ForeignTiffResunitCm
| ForeignTiffResunitInch
| ForeignTiffResunitLast
| AnotherForeignTiffResunit Int
deriving (Int -> ForeignTiffResunit -> ShowS
[ForeignTiffResunit] -> ShowS
ForeignTiffResunit -> String
(Int -> ForeignTiffResunit -> ShowS)
-> (ForeignTiffResunit -> String)
-> ([ForeignTiffResunit] -> ShowS)
-> Show ForeignTiffResunit
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ForeignTiffResunit] -> ShowS
$cshowList :: [ForeignTiffResunit] -> ShowS
show :: ForeignTiffResunit -> String
$cshow :: ForeignTiffResunit -> String
showsPrec :: Int -> ForeignTiffResunit -> ShowS
$cshowsPrec :: Int -> ForeignTiffResunit -> ShowS
Show, ForeignTiffResunit -> ForeignTiffResunit -> Bool
(ForeignTiffResunit -> ForeignTiffResunit -> Bool)
-> (ForeignTiffResunit -> ForeignTiffResunit -> Bool)
-> Eq ForeignTiffResunit
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ForeignTiffResunit -> ForeignTiffResunit -> Bool
$c/= :: ForeignTiffResunit -> ForeignTiffResunit -> Bool
== :: ForeignTiffResunit -> ForeignTiffResunit -> Bool
$c== :: ForeignTiffResunit -> ForeignTiffResunit -> Bool
Eq)
instance P.Enum ForeignTiffResunit where
fromEnum :: ForeignTiffResunit -> Int
fromEnum ForeignTiffResunit
ForeignTiffResunitCm = Int
0
fromEnum ForeignTiffResunit
ForeignTiffResunitInch = Int
1
fromEnum ForeignTiffResunit
ForeignTiffResunitLast = Int
2
fromEnum (AnotherForeignTiffResunit Int
k) = Int
k
toEnum :: Int -> ForeignTiffResunit
toEnum Int
0 = ForeignTiffResunit
ForeignTiffResunitCm
toEnum Int
1 = ForeignTiffResunit
ForeignTiffResunitInch
toEnum Int
2 = ForeignTiffResunit
ForeignTiffResunitLast
toEnum Int
k = Int -> ForeignTiffResunit
AnotherForeignTiffResunit Int
k
instance P.Ord ForeignTiffResunit where
compare :: ForeignTiffResunit -> ForeignTiffResunit -> Ordering
compare ForeignTiffResunit
a ForeignTiffResunit
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ForeignTiffResunit -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignTiffResunit
a) (ForeignTiffResunit -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignTiffResunit
b)
type instance O.ParentTypes ForeignTiffResunit = '[]
instance O.HasParentTypes ForeignTiffResunit
foreign import ccall "vips_foreign_tiff_resunit_get_type" c_vips_foreign_tiff_resunit_get_type ::
IO GType
instance B.Types.TypedObject ForeignTiffResunit where
glibType :: IO GType
glibType = IO GType
c_vips_foreign_tiff_resunit_get_type
instance B.Types.BoxedEnum ForeignTiffResunit
data ForeignTiffPredictor =
ForeignTiffPredictorNone
| ForeignTiffPredictorHorizontal
| ForeignTiffPredictorFloat
| ForeignTiffPredictorLast
| AnotherForeignTiffPredictor Int
deriving (Int -> ForeignTiffPredictor -> ShowS
[ForeignTiffPredictor] -> ShowS
ForeignTiffPredictor -> String
(Int -> ForeignTiffPredictor -> ShowS)
-> (ForeignTiffPredictor -> String)
-> ([ForeignTiffPredictor] -> ShowS)
-> Show ForeignTiffPredictor
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ForeignTiffPredictor] -> ShowS
$cshowList :: [ForeignTiffPredictor] -> ShowS
show :: ForeignTiffPredictor -> String
$cshow :: ForeignTiffPredictor -> String
showsPrec :: Int -> ForeignTiffPredictor -> ShowS
$cshowsPrec :: Int -> ForeignTiffPredictor -> ShowS
Show, ForeignTiffPredictor -> ForeignTiffPredictor -> Bool
(ForeignTiffPredictor -> ForeignTiffPredictor -> Bool)
-> (ForeignTiffPredictor -> ForeignTiffPredictor -> Bool)
-> Eq ForeignTiffPredictor
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ForeignTiffPredictor -> ForeignTiffPredictor -> Bool
$c/= :: ForeignTiffPredictor -> ForeignTiffPredictor -> Bool
== :: ForeignTiffPredictor -> ForeignTiffPredictor -> Bool
$c== :: ForeignTiffPredictor -> ForeignTiffPredictor -> Bool
Eq)
instance P.Enum ForeignTiffPredictor where
fromEnum :: ForeignTiffPredictor -> Int
fromEnum ForeignTiffPredictor
ForeignTiffPredictorNone = Int
1
fromEnum ForeignTiffPredictor
ForeignTiffPredictorHorizontal = Int
2
fromEnum ForeignTiffPredictor
ForeignTiffPredictorFloat = Int
3
fromEnum ForeignTiffPredictor
ForeignTiffPredictorLast = Int
4
fromEnum (AnotherForeignTiffPredictor Int
k) = Int
k
toEnum :: Int -> ForeignTiffPredictor
toEnum Int
1 = ForeignTiffPredictor
ForeignTiffPredictorNone
toEnum Int
2 = ForeignTiffPredictor
ForeignTiffPredictorHorizontal
toEnum Int
3 = ForeignTiffPredictor
ForeignTiffPredictorFloat
toEnum Int
4 = ForeignTiffPredictor
ForeignTiffPredictorLast
toEnum Int
k = Int -> ForeignTiffPredictor
AnotherForeignTiffPredictor Int
k
instance P.Ord ForeignTiffPredictor where
compare :: ForeignTiffPredictor -> ForeignTiffPredictor -> Ordering
compare ForeignTiffPredictor
a ForeignTiffPredictor
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ForeignTiffPredictor -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignTiffPredictor
a) (ForeignTiffPredictor -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignTiffPredictor
b)
type instance O.ParentTypes ForeignTiffPredictor = '[]
instance O.HasParentTypes ForeignTiffPredictor
foreign import ccall "vips_foreign_tiff_predictor_get_type" c_vips_foreign_tiff_predictor_get_type ::
IO GType
instance B.Types.TypedObject ForeignTiffPredictor where
glibType :: IO GType
glibType = IO GType
c_vips_foreign_tiff_predictor_get_type
instance B.Types.BoxedEnum ForeignTiffPredictor
data ForeignTiffCompression =
ForeignTiffCompressionNone
| ForeignTiffCompressionJpeg
| ForeignTiffCompressionDeflate
| ForeignTiffCompressionPackbits
| ForeignTiffCompressionCcittfax4
| ForeignTiffCompressionLzw
| ForeignTiffCompressionWebp
| ForeignTiffCompressionZstd
| ForeignTiffCompressionJp2k
| ForeignTiffCompressionLast
| AnotherForeignTiffCompression Int
deriving (Int -> ForeignTiffCompression -> ShowS
[ForeignTiffCompression] -> ShowS
ForeignTiffCompression -> String
(Int -> ForeignTiffCompression -> ShowS)
-> (ForeignTiffCompression -> String)
-> ([ForeignTiffCompression] -> ShowS)
-> Show ForeignTiffCompression
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ForeignTiffCompression] -> ShowS
$cshowList :: [ForeignTiffCompression] -> ShowS
show :: ForeignTiffCompression -> String
$cshow :: ForeignTiffCompression -> String
showsPrec :: Int -> ForeignTiffCompression -> ShowS
$cshowsPrec :: Int -> ForeignTiffCompression -> ShowS
Show, ForeignTiffCompression -> ForeignTiffCompression -> Bool
(ForeignTiffCompression -> ForeignTiffCompression -> Bool)
-> (ForeignTiffCompression -> ForeignTiffCompression -> Bool)
-> Eq ForeignTiffCompression
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ForeignTiffCompression -> ForeignTiffCompression -> Bool
$c/= :: ForeignTiffCompression -> ForeignTiffCompression -> Bool
== :: ForeignTiffCompression -> ForeignTiffCompression -> Bool
$c== :: ForeignTiffCompression -> ForeignTiffCompression -> Bool
Eq)
instance P.Enum ForeignTiffCompression where
fromEnum :: ForeignTiffCompression -> Int
fromEnum ForeignTiffCompression
ForeignTiffCompressionNone = Int
0
fromEnum ForeignTiffCompression
ForeignTiffCompressionJpeg = Int
1
fromEnum ForeignTiffCompression
ForeignTiffCompressionDeflate = Int
2
fromEnum ForeignTiffCompression
ForeignTiffCompressionPackbits = Int
3
fromEnum ForeignTiffCompression
ForeignTiffCompressionCcittfax4 = Int
4
fromEnum ForeignTiffCompression
ForeignTiffCompressionLzw = Int
5
fromEnum ForeignTiffCompression
ForeignTiffCompressionWebp = Int
6
fromEnum ForeignTiffCompression
ForeignTiffCompressionZstd = Int
7
fromEnum ForeignTiffCompression
ForeignTiffCompressionJp2k = Int
8
fromEnum ForeignTiffCompression
ForeignTiffCompressionLast = Int
9
fromEnum (AnotherForeignTiffCompression Int
k) = Int
k
toEnum :: Int -> ForeignTiffCompression
toEnum Int
0 = ForeignTiffCompression
ForeignTiffCompressionNone
toEnum Int
1 = ForeignTiffCompression
ForeignTiffCompressionJpeg
toEnum Int
2 = ForeignTiffCompression
ForeignTiffCompressionDeflate
toEnum Int
3 = ForeignTiffCompression
ForeignTiffCompressionPackbits
toEnum Int
4 = ForeignTiffCompression
ForeignTiffCompressionCcittfax4
toEnum Int
5 = ForeignTiffCompression
ForeignTiffCompressionLzw
toEnum Int
6 = ForeignTiffCompression
ForeignTiffCompressionWebp
toEnum Int
7 = ForeignTiffCompression
ForeignTiffCompressionZstd
toEnum Int
8 = ForeignTiffCompression
ForeignTiffCompressionJp2k
toEnum Int
9 = ForeignTiffCompression
ForeignTiffCompressionLast
toEnum Int
k = Int -> ForeignTiffCompression
AnotherForeignTiffCompression Int
k
instance P.Ord ForeignTiffCompression where
compare :: ForeignTiffCompression -> ForeignTiffCompression -> Ordering
compare ForeignTiffCompression
a ForeignTiffCompression
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ForeignTiffCompression -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignTiffCompression
a) (ForeignTiffCompression -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignTiffCompression
b)
type instance O.ParentTypes ForeignTiffCompression = '[]
instance O.HasParentTypes ForeignTiffCompression
foreign import ccall "vips_foreign_tiff_compression_get_type" c_vips_foreign_tiff_compression_get_type ::
IO GType
instance B.Types.TypedObject ForeignTiffCompression where
glibType :: IO GType
glibType = IO GType
c_vips_foreign_tiff_compression_get_type
instance B.Types.BoxedEnum ForeignTiffCompression
data ForeignSubsample =
ForeignSubsampleAuto
| ForeignSubsampleOn
| ForeignSubsampleOff
| ForeignSubsampleLast
| AnotherForeignSubsample Int
deriving (Int -> ForeignSubsample -> ShowS
[ForeignSubsample] -> ShowS
ForeignSubsample -> String
(Int -> ForeignSubsample -> ShowS)
-> (ForeignSubsample -> String)
-> ([ForeignSubsample] -> ShowS)
-> Show ForeignSubsample
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ForeignSubsample] -> ShowS
$cshowList :: [ForeignSubsample] -> ShowS
show :: ForeignSubsample -> String
$cshow :: ForeignSubsample -> String
showsPrec :: Int -> ForeignSubsample -> ShowS
$cshowsPrec :: Int -> ForeignSubsample -> ShowS
Show, ForeignSubsample -> ForeignSubsample -> Bool
(ForeignSubsample -> ForeignSubsample -> Bool)
-> (ForeignSubsample -> ForeignSubsample -> Bool)
-> Eq ForeignSubsample
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ForeignSubsample -> ForeignSubsample -> Bool
$c/= :: ForeignSubsample -> ForeignSubsample -> Bool
== :: ForeignSubsample -> ForeignSubsample -> Bool
$c== :: ForeignSubsample -> ForeignSubsample -> Bool
Eq)
instance P.Enum ForeignSubsample where
fromEnum :: ForeignSubsample -> Int
fromEnum ForeignSubsample
ForeignSubsampleAuto = Int
0
fromEnum ForeignSubsample
ForeignSubsampleOn = Int
1
fromEnum ForeignSubsample
ForeignSubsampleOff = Int
2
fromEnum ForeignSubsample
ForeignSubsampleLast = Int
3
fromEnum (AnotherForeignSubsample Int
k) = Int
k
toEnum :: Int -> ForeignSubsample
toEnum Int
0 = ForeignSubsample
ForeignSubsampleAuto
toEnum Int
1 = ForeignSubsample
ForeignSubsampleOn
toEnum Int
2 = ForeignSubsample
ForeignSubsampleOff
toEnum Int
3 = ForeignSubsample
ForeignSubsampleLast
toEnum Int
k = Int -> ForeignSubsample
AnotherForeignSubsample Int
k
instance P.Ord ForeignSubsample where
compare :: ForeignSubsample -> ForeignSubsample -> Ordering
compare ForeignSubsample
a ForeignSubsample
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ForeignSubsample -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignSubsample
a) (ForeignSubsample -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignSubsample
b)
type instance O.ParentTypes ForeignSubsample = '[]
instance O.HasParentTypes ForeignSubsample
foreign import ccall "vips_foreign_subsample_get_type" c_vips_foreign_subsample_get_type ::
IO GType
instance B.Types.TypedObject ForeignSubsample where
glibType :: IO GType
glibType = IO GType
c_vips_foreign_subsample_get_type
instance B.Types.BoxedEnum ForeignSubsample
{-# DEPRECATED ForeignJpegSubsample ["use t'GI.Vips.Enums.ForeignSubsample'"] #-}
data ForeignJpegSubsample =
ForeignJpegSubsampleAuto
| ForeignJpegSubsampleOn
| ForeignJpegSubsampleOff
| ForeignJpegSubsampleLast
| AnotherForeignJpegSubsample Int
deriving (Int -> ForeignJpegSubsample -> ShowS
[ForeignJpegSubsample] -> ShowS
ForeignJpegSubsample -> String
(Int -> ForeignJpegSubsample -> ShowS)
-> (ForeignJpegSubsample -> String)
-> ([ForeignJpegSubsample] -> ShowS)
-> Show ForeignJpegSubsample
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ForeignJpegSubsample] -> ShowS
$cshowList :: [ForeignJpegSubsample] -> ShowS
show :: ForeignJpegSubsample -> String
$cshow :: ForeignJpegSubsample -> String
showsPrec :: Int -> ForeignJpegSubsample -> ShowS
$cshowsPrec :: Int -> ForeignJpegSubsample -> ShowS
Show, ForeignJpegSubsample -> ForeignJpegSubsample -> Bool
(ForeignJpegSubsample -> ForeignJpegSubsample -> Bool)
-> (ForeignJpegSubsample -> ForeignJpegSubsample -> Bool)
-> Eq ForeignJpegSubsample
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ForeignJpegSubsample -> ForeignJpegSubsample -> Bool
$c/= :: ForeignJpegSubsample -> ForeignJpegSubsample -> Bool
== :: ForeignJpegSubsample -> ForeignJpegSubsample -> Bool
$c== :: ForeignJpegSubsample -> ForeignJpegSubsample -> Bool
Eq)
instance P.Enum ForeignJpegSubsample where
fromEnum :: ForeignJpegSubsample -> Int
fromEnum ForeignJpegSubsample
ForeignJpegSubsampleAuto = Int
0
fromEnum ForeignJpegSubsample
ForeignJpegSubsampleOn = Int
1
fromEnum ForeignJpegSubsample
ForeignJpegSubsampleOff = Int
2
fromEnum ForeignJpegSubsample
ForeignJpegSubsampleLast = Int
3
fromEnum (AnotherForeignJpegSubsample Int
k) = Int
k
toEnum :: Int -> ForeignJpegSubsample
toEnum Int
0 = ForeignJpegSubsample
ForeignJpegSubsampleAuto
toEnum Int
1 = ForeignJpegSubsample
ForeignJpegSubsampleOn
toEnum Int
2 = ForeignJpegSubsample
ForeignJpegSubsampleOff
toEnum Int
3 = ForeignJpegSubsample
ForeignJpegSubsampleLast
toEnum Int
k = Int -> ForeignJpegSubsample
AnotherForeignJpegSubsample Int
k
instance P.Ord ForeignJpegSubsample where
compare :: ForeignJpegSubsample -> ForeignJpegSubsample -> Ordering
compare ForeignJpegSubsample
a ForeignJpegSubsample
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ForeignJpegSubsample -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignJpegSubsample
a) (ForeignJpegSubsample -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignJpegSubsample
b)
type instance O.ParentTypes ForeignJpegSubsample = '[]
instance O.HasParentTypes ForeignJpegSubsample
foreign import ccall "vips_foreign_jpeg_subsample_get_type" c_vips_foreign_jpeg_subsample_get_type ::
IO GType
instance B.Types.TypedObject ForeignJpegSubsample where
glibType :: IO GType
glibType = IO GType
c_vips_foreign_jpeg_subsample_get_type
instance B.Types.BoxedEnum ForeignJpegSubsample
data ForeignHeifCompression =
ForeignHeifCompressionHevc
| ForeignHeifCompressionAvc
| ForeignHeifCompressionJpeg
| ForeignHeifCompressionAv1
| ForeignHeifCompressionLast
| AnotherForeignHeifCompression Int
deriving (Int -> ForeignHeifCompression -> ShowS
[ForeignHeifCompression] -> ShowS
ForeignHeifCompression -> String
(Int -> ForeignHeifCompression -> ShowS)
-> (ForeignHeifCompression -> String)
-> ([ForeignHeifCompression] -> ShowS)
-> Show ForeignHeifCompression
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ForeignHeifCompression] -> ShowS
$cshowList :: [ForeignHeifCompression] -> ShowS
show :: ForeignHeifCompression -> String
$cshow :: ForeignHeifCompression -> String
showsPrec :: Int -> ForeignHeifCompression -> ShowS
$cshowsPrec :: Int -> ForeignHeifCompression -> ShowS
Show, ForeignHeifCompression -> ForeignHeifCompression -> Bool
(ForeignHeifCompression -> ForeignHeifCompression -> Bool)
-> (ForeignHeifCompression -> ForeignHeifCompression -> Bool)
-> Eq ForeignHeifCompression
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ForeignHeifCompression -> ForeignHeifCompression -> Bool
$c/= :: ForeignHeifCompression -> ForeignHeifCompression -> Bool
== :: ForeignHeifCompression -> ForeignHeifCompression -> Bool
$c== :: ForeignHeifCompression -> ForeignHeifCompression -> Bool
Eq)
instance P.Enum ForeignHeifCompression where
fromEnum :: ForeignHeifCompression -> Int
fromEnum ForeignHeifCompression
ForeignHeifCompressionHevc = Int
1
fromEnum ForeignHeifCompression
ForeignHeifCompressionAvc = Int
2
fromEnum ForeignHeifCompression
ForeignHeifCompressionJpeg = Int
3
fromEnum ForeignHeifCompression
ForeignHeifCompressionAv1 = Int
4
fromEnum ForeignHeifCompression
ForeignHeifCompressionLast = Int
5
fromEnum (AnotherForeignHeifCompression Int
k) = Int
k
toEnum :: Int -> ForeignHeifCompression
toEnum Int
1 = ForeignHeifCompression
ForeignHeifCompressionHevc
toEnum Int
2 = ForeignHeifCompression
ForeignHeifCompressionAvc
toEnum Int
3 = ForeignHeifCompression
ForeignHeifCompressionJpeg
toEnum Int
4 = ForeignHeifCompression
ForeignHeifCompressionAv1
toEnum Int
5 = ForeignHeifCompression
ForeignHeifCompressionLast
toEnum Int
k = Int -> ForeignHeifCompression
AnotherForeignHeifCompression Int
k
instance P.Ord ForeignHeifCompression where
compare :: ForeignHeifCompression -> ForeignHeifCompression -> Ordering
compare ForeignHeifCompression
a ForeignHeifCompression
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ForeignHeifCompression -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignHeifCompression
a) (ForeignHeifCompression -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignHeifCompression
b)
type instance O.ParentTypes ForeignHeifCompression = '[]
instance O.HasParentTypes ForeignHeifCompression
foreign import ccall "vips_foreign_heif_compression_get_type" c_vips_foreign_heif_compression_get_type ::
IO GType
instance B.Types.TypedObject ForeignHeifCompression where
glibType :: IO GType
glibType = IO GType
c_vips_foreign_heif_compression_get_type
instance B.Types.BoxedEnum ForeignHeifCompression
data ForeignDzLayout =
ForeignDzLayoutDz
| ForeignDzLayoutZoomify
| ForeignDzLayoutGoogle
| ForeignDzLayoutIiif
| ForeignDzLayoutLast
| AnotherForeignDzLayout Int
deriving (Int -> ForeignDzLayout -> ShowS
[ForeignDzLayout] -> ShowS
ForeignDzLayout -> String
(Int -> ForeignDzLayout -> ShowS)
-> (ForeignDzLayout -> String)
-> ([ForeignDzLayout] -> ShowS)
-> Show ForeignDzLayout
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ForeignDzLayout] -> ShowS
$cshowList :: [ForeignDzLayout] -> ShowS
show :: ForeignDzLayout -> String
$cshow :: ForeignDzLayout -> String
showsPrec :: Int -> ForeignDzLayout -> ShowS
$cshowsPrec :: Int -> ForeignDzLayout -> ShowS
Show, ForeignDzLayout -> ForeignDzLayout -> Bool
(ForeignDzLayout -> ForeignDzLayout -> Bool)
-> (ForeignDzLayout -> ForeignDzLayout -> Bool)
-> Eq ForeignDzLayout
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ForeignDzLayout -> ForeignDzLayout -> Bool
$c/= :: ForeignDzLayout -> ForeignDzLayout -> Bool
== :: ForeignDzLayout -> ForeignDzLayout -> Bool
$c== :: ForeignDzLayout -> ForeignDzLayout -> Bool
Eq)
instance P.Enum ForeignDzLayout where
fromEnum :: ForeignDzLayout -> Int
fromEnum ForeignDzLayout
ForeignDzLayoutDz = Int
0
fromEnum ForeignDzLayout
ForeignDzLayoutZoomify = Int
1
fromEnum ForeignDzLayout
ForeignDzLayoutGoogle = Int
2
fromEnum ForeignDzLayout
ForeignDzLayoutIiif = Int
3
fromEnum ForeignDzLayout
ForeignDzLayoutLast = Int
4
fromEnum (AnotherForeignDzLayout Int
k) = Int
k
toEnum :: Int -> ForeignDzLayout
toEnum Int
0 = ForeignDzLayout
ForeignDzLayoutDz
toEnum Int
1 = ForeignDzLayout
ForeignDzLayoutZoomify
toEnum Int
2 = ForeignDzLayout
ForeignDzLayoutGoogle
toEnum Int
3 = ForeignDzLayout
ForeignDzLayoutIiif
toEnum Int
4 = ForeignDzLayout
ForeignDzLayoutLast
toEnum Int
k = Int -> ForeignDzLayout
AnotherForeignDzLayout Int
k
instance P.Ord ForeignDzLayout where
compare :: ForeignDzLayout -> ForeignDzLayout -> Ordering
compare ForeignDzLayout
a ForeignDzLayout
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ForeignDzLayout -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignDzLayout
a) (ForeignDzLayout -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignDzLayout
b)
type instance O.ParentTypes ForeignDzLayout = '[]
instance O.HasParentTypes ForeignDzLayout
foreign import ccall "vips_foreign_dz_layout_get_type" c_vips_foreign_dz_layout_get_type ::
IO GType
instance B.Types.TypedObject ForeignDzLayout where
glibType :: IO GType
glibType = IO GType
c_vips_foreign_dz_layout_get_type
instance B.Types.BoxedEnum ForeignDzLayout
data ForeignDzDepth =
ForeignDzDepthOnepixel
| ForeignDzDepthOnetile
| ForeignDzDepthOne
| ForeignDzDepthLast
| AnotherForeignDzDepth Int
deriving (Int -> ForeignDzDepth -> ShowS
[ForeignDzDepth] -> ShowS
ForeignDzDepth -> String
(Int -> ForeignDzDepth -> ShowS)
-> (ForeignDzDepth -> String)
-> ([ForeignDzDepth] -> ShowS)
-> Show ForeignDzDepth
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ForeignDzDepth] -> ShowS
$cshowList :: [ForeignDzDepth] -> ShowS
show :: ForeignDzDepth -> String
$cshow :: ForeignDzDepth -> String
showsPrec :: Int -> ForeignDzDepth -> ShowS
$cshowsPrec :: Int -> ForeignDzDepth -> ShowS
Show, ForeignDzDepth -> ForeignDzDepth -> Bool
(ForeignDzDepth -> ForeignDzDepth -> Bool)
-> (ForeignDzDepth -> ForeignDzDepth -> Bool) -> Eq ForeignDzDepth
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ForeignDzDepth -> ForeignDzDepth -> Bool
$c/= :: ForeignDzDepth -> ForeignDzDepth -> Bool
== :: ForeignDzDepth -> ForeignDzDepth -> Bool
$c== :: ForeignDzDepth -> ForeignDzDepth -> Bool
Eq)
instance P.Enum ForeignDzDepth where
fromEnum :: ForeignDzDepth -> Int
fromEnum ForeignDzDepth
ForeignDzDepthOnepixel = Int
0
fromEnum ForeignDzDepth
ForeignDzDepthOnetile = Int
1
fromEnum ForeignDzDepth
ForeignDzDepthOne = Int
2
fromEnum ForeignDzDepth
ForeignDzDepthLast = Int
3
fromEnum (AnotherForeignDzDepth Int
k) = Int
k
toEnum :: Int -> ForeignDzDepth
toEnum Int
0 = ForeignDzDepth
ForeignDzDepthOnepixel
toEnum Int
1 = ForeignDzDepth
ForeignDzDepthOnetile
toEnum Int
2 = ForeignDzDepth
ForeignDzDepthOne
toEnum Int
3 = ForeignDzDepth
ForeignDzDepthLast
toEnum Int
k = Int -> ForeignDzDepth
AnotherForeignDzDepth Int
k
instance P.Ord ForeignDzDepth where
compare :: ForeignDzDepth -> ForeignDzDepth -> Ordering
compare ForeignDzDepth
a ForeignDzDepth
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ForeignDzDepth -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignDzDepth
a) (ForeignDzDepth -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignDzDepth
b)
type instance O.ParentTypes ForeignDzDepth = '[]
instance O.HasParentTypes ForeignDzDepth
foreign import ccall "vips_foreign_dz_depth_get_type" c_vips_foreign_dz_depth_get_type ::
IO GType
instance B.Types.TypedObject ForeignDzDepth where
glibType :: IO GType
glibType = IO GType
c_vips_foreign_dz_depth_get_type
instance B.Types.BoxedEnum ForeignDzDepth
data ForeignDzContainer =
ForeignDzContainerFs
| ForeignDzContainerZip
| ForeignDzContainerSzi
| ForeignDzContainerLast
| AnotherForeignDzContainer Int
deriving (Int -> ForeignDzContainer -> ShowS
[ForeignDzContainer] -> ShowS
ForeignDzContainer -> String
(Int -> ForeignDzContainer -> ShowS)
-> (ForeignDzContainer -> String)
-> ([ForeignDzContainer] -> ShowS)
-> Show ForeignDzContainer
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ForeignDzContainer] -> ShowS
$cshowList :: [ForeignDzContainer] -> ShowS
show :: ForeignDzContainer -> String
$cshow :: ForeignDzContainer -> String
showsPrec :: Int -> ForeignDzContainer -> ShowS
$cshowsPrec :: Int -> ForeignDzContainer -> ShowS
Show, ForeignDzContainer -> ForeignDzContainer -> Bool
(ForeignDzContainer -> ForeignDzContainer -> Bool)
-> (ForeignDzContainer -> ForeignDzContainer -> Bool)
-> Eq ForeignDzContainer
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ForeignDzContainer -> ForeignDzContainer -> Bool
$c/= :: ForeignDzContainer -> ForeignDzContainer -> Bool
== :: ForeignDzContainer -> ForeignDzContainer -> Bool
$c== :: ForeignDzContainer -> ForeignDzContainer -> Bool
Eq)
instance P.Enum ForeignDzContainer where
fromEnum :: ForeignDzContainer -> Int
fromEnum ForeignDzContainer
ForeignDzContainerFs = Int
0
fromEnum ForeignDzContainer
ForeignDzContainerZip = Int
1
fromEnum ForeignDzContainer
ForeignDzContainerSzi = Int
2
fromEnum ForeignDzContainer
ForeignDzContainerLast = Int
3
fromEnum (AnotherForeignDzContainer Int
k) = Int
k
toEnum :: Int -> ForeignDzContainer
toEnum Int
0 = ForeignDzContainer
ForeignDzContainerFs
toEnum Int
1 = ForeignDzContainer
ForeignDzContainerZip
toEnum Int
2 = ForeignDzContainer
ForeignDzContainerSzi
toEnum Int
3 = ForeignDzContainer
ForeignDzContainerLast
toEnum Int
k = Int -> ForeignDzContainer
AnotherForeignDzContainer Int
k
instance P.Ord ForeignDzContainer where
compare :: ForeignDzContainer -> ForeignDzContainer -> Ordering
compare ForeignDzContainer
a ForeignDzContainer
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (ForeignDzContainer -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignDzContainer
a) (ForeignDzContainer -> Int
forall a. Enum a => a -> Int
P.fromEnum ForeignDzContainer
b)
type instance O.ParentTypes ForeignDzContainer = '[]
instance O.HasParentTypes ForeignDzContainer
foreign import ccall "vips_foreign_dz_container_get_type" c_vips_foreign_dz_container_get_type ::
IO GType
instance B.Types.TypedObject ForeignDzContainer where
glibType :: IO GType
glibType = IO GType
c_vips_foreign_dz_container_get_type
instance B.Types.BoxedEnum ForeignDzContainer
data Extend =
ExtendBlack
| ExtendCopy
| ExtendRepeat
| ExtendMirror
| ExtendWhite
| ExtendBackground
| ExtendLast
| AnotherExtend Int
deriving (Int -> Extend -> ShowS
[Extend] -> ShowS
Extend -> String
(Int -> Extend -> ShowS)
-> (Extend -> String) -> ([Extend] -> ShowS) -> Show Extend
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Extend] -> ShowS
$cshowList :: [Extend] -> ShowS
show :: Extend -> String
$cshow :: Extend -> String
showsPrec :: Int -> Extend -> ShowS
$cshowsPrec :: Int -> Extend -> ShowS
Show, Extend -> Extend -> Bool
(Extend -> Extend -> Bool)
-> (Extend -> Extend -> Bool) -> Eq Extend
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Extend -> Extend -> Bool
$c/= :: Extend -> Extend -> Bool
== :: Extend -> Extend -> Bool
$c== :: Extend -> Extend -> Bool
Eq)
instance P.Enum Extend where
fromEnum :: Extend -> Int
fromEnum Extend
ExtendBlack = Int
0
fromEnum Extend
ExtendCopy = Int
1
fromEnum Extend
ExtendRepeat = Int
2
fromEnum Extend
ExtendMirror = Int
3
fromEnum Extend
ExtendWhite = Int
4
fromEnum Extend
ExtendBackground = Int
5
fromEnum Extend
ExtendLast = Int
6
fromEnum (AnotherExtend Int
k) = Int
k
toEnum :: Int -> Extend
toEnum Int
0 = Extend
ExtendBlack
toEnum Int
1 = Extend
ExtendCopy
toEnum Int
2 = Extend
ExtendRepeat
toEnum Int
3 = Extend
ExtendMirror
toEnum Int
4 = Extend
ExtendWhite
toEnum Int
5 = Extend
ExtendBackground
toEnum Int
6 = Extend
ExtendLast
toEnum Int
k = Int -> Extend
AnotherExtend Int
k
instance P.Ord Extend where
compare :: Extend -> Extend -> Ordering
compare Extend
a Extend
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Extend -> Int
forall a. Enum a => a -> Int
P.fromEnum Extend
a) (Extend -> Int
forall a. Enum a => a -> Int
P.fromEnum Extend
b)
type instance O.ParentTypes Extend = '[]
instance O.HasParentTypes Extend
foreign import ccall "vips_extend_get_type" c_vips_extend_get_type ::
IO GType
instance B.Types.TypedObject Extend where
glibType :: IO GType
glibType = IO GType
c_vips_extend_get_type
instance B.Types.BoxedEnum Extend
data Direction =
DirectionHorizontal
| DirectionVertical
| DirectionLast
| AnotherDirection Int
deriving (Int -> Direction -> ShowS
[Direction] -> ShowS
Direction -> String
(Int -> Direction -> ShowS)
-> (Direction -> String)
-> ([Direction] -> ShowS)
-> Show Direction
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Direction] -> ShowS
$cshowList :: [Direction] -> ShowS
show :: Direction -> String
$cshow :: Direction -> String
showsPrec :: Int -> Direction -> ShowS
$cshowsPrec :: Int -> Direction -> ShowS
Show, Direction -> Direction -> Bool
(Direction -> Direction -> Bool)
-> (Direction -> Direction -> Bool) -> Eq Direction
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Direction -> Direction -> Bool
$c/= :: Direction -> Direction -> Bool
== :: Direction -> Direction -> Bool
$c== :: Direction -> Direction -> Bool
Eq)
instance P.Enum Direction where
fromEnum :: Direction -> Int
fromEnum Direction
DirectionHorizontal = Int
0
fromEnum Direction
DirectionVertical = Int
1
fromEnum Direction
DirectionLast = Int
2
fromEnum (AnotherDirection Int
k) = Int
k
toEnum :: Int -> Direction
toEnum Int
0 = Direction
DirectionHorizontal
toEnum Int
1 = Direction
DirectionVertical
toEnum Int
2 = Direction
DirectionLast
toEnum Int
k = Int -> Direction
AnotherDirection Int
k
instance P.Ord Direction where
compare :: Direction -> Direction -> Ordering
compare Direction
a Direction
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Direction -> Int
forall a. Enum a => a -> Int
P.fromEnum Direction
a) (Direction -> Int
forall a. Enum a => a -> Int
P.fromEnum Direction
b)
type instance O.ParentTypes Direction = '[]
instance O.HasParentTypes Direction
foreign import ccall "vips_direction_get_type" c_vips_direction_get_type ::
IO GType
instance B.Types.TypedObject Direction where
glibType :: IO GType
glibType = IO GType
c_vips_direction_get_type
instance B.Types.BoxedEnum Direction
data DemandStyle =
DemandStyleError
| DemandStyleSmalltile
| DemandStyleFatstrip
| DemandStyleThinstrip
| DemandStyleAny
| AnotherDemandStyle Int
deriving (Int -> DemandStyle -> ShowS
[DemandStyle] -> ShowS
DemandStyle -> String
(Int -> DemandStyle -> ShowS)
-> (DemandStyle -> String)
-> ([DemandStyle] -> ShowS)
-> Show DemandStyle
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DemandStyle] -> ShowS
$cshowList :: [DemandStyle] -> ShowS
show :: DemandStyle -> String
$cshow :: DemandStyle -> String
showsPrec :: Int -> DemandStyle -> ShowS
$cshowsPrec :: Int -> DemandStyle -> ShowS
Show, DemandStyle -> DemandStyle -> Bool
(DemandStyle -> DemandStyle -> Bool)
-> (DemandStyle -> DemandStyle -> Bool) -> Eq DemandStyle
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DemandStyle -> DemandStyle -> Bool
$c/= :: DemandStyle -> DemandStyle -> Bool
== :: DemandStyle -> DemandStyle -> Bool
$c== :: DemandStyle -> DemandStyle -> Bool
Eq)
instance P.Enum DemandStyle where
fromEnum :: DemandStyle -> Int
fromEnum DemandStyle
DemandStyleError = Int
-1
fromEnum DemandStyle
DemandStyleSmalltile = Int
0
fromEnum DemandStyle
DemandStyleFatstrip = Int
1
fromEnum DemandStyle
DemandStyleThinstrip = Int
2
fromEnum DemandStyle
DemandStyleAny = Int
3
fromEnum (AnotherDemandStyle Int
k) = Int
k
toEnum :: Int -> DemandStyle
toEnum Int
-1 = DemandStyle
DemandStyleError
toEnum Int
0 = DemandStyle
DemandStyleSmalltile
toEnum Int
1 = DemandStyle
DemandStyleFatstrip
toEnum Int
2 = DemandStyle
DemandStyleThinstrip
toEnum Int
3 = DemandStyle
DemandStyleAny
toEnum Int
k = Int -> DemandStyle
AnotherDemandStyle Int
k
instance P.Ord DemandStyle where
compare :: DemandStyle -> DemandStyle -> Ordering
compare DemandStyle
a DemandStyle
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (DemandStyle -> Int
forall a. Enum a => a -> Int
P.fromEnum DemandStyle
a) (DemandStyle -> Int
forall a. Enum a => a -> Int
P.fromEnum DemandStyle
b)
type instance O.ParentTypes DemandStyle = '[]
instance O.HasParentTypes DemandStyle
foreign import ccall "vips_demand_style_get_type" c_vips_demand_style_get_type ::
IO GType
instance B.Types.TypedObject DemandStyle where
glibType :: IO GType
glibType = IO GType
c_vips_demand_style_get_type
instance B.Types.BoxedEnum DemandStyle
data CompassDirection =
CompassDirectionCentre
| CompassDirectionNorth
| CompassDirectionEast
| CompassDirectionSouth
| CompassDirectionWest
| CompassDirectionNorthEast
| CompassDirectionSouthEast
| CompassDirectionSouthWest
| CompassDirectionNorthWest
| CompassDirectionLast
| AnotherCompassDirection Int
deriving (Int -> CompassDirection -> ShowS
[CompassDirection] -> ShowS
CompassDirection -> String
(Int -> CompassDirection -> ShowS)
-> (CompassDirection -> String)
-> ([CompassDirection] -> ShowS)
-> Show CompassDirection
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CompassDirection] -> ShowS
$cshowList :: [CompassDirection] -> ShowS
show :: CompassDirection -> String
$cshow :: CompassDirection -> String
showsPrec :: Int -> CompassDirection -> ShowS
$cshowsPrec :: Int -> CompassDirection -> ShowS
Show, CompassDirection -> CompassDirection -> Bool
(CompassDirection -> CompassDirection -> Bool)
-> (CompassDirection -> CompassDirection -> Bool)
-> Eq CompassDirection
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CompassDirection -> CompassDirection -> Bool
$c/= :: CompassDirection -> CompassDirection -> Bool
== :: CompassDirection -> CompassDirection -> Bool
$c== :: CompassDirection -> CompassDirection -> Bool
Eq)
instance P.Enum CompassDirection where
fromEnum :: CompassDirection -> Int
fromEnum CompassDirection
CompassDirectionCentre = Int
0
fromEnum CompassDirection
CompassDirectionNorth = Int
1
fromEnum CompassDirection
CompassDirectionEast = Int
2
fromEnum CompassDirection
CompassDirectionSouth = Int
3
fromEnum CompassDirection
CompassDirectionWest = Int
4
fromEnum CompassDirection
CompassDirectionNorthEast = Int
5
fromEnum CompassDirection
CompassDirectionSouthEast = Int
6
fromEnum CompassDirection
CompassDirectionSouthWest = Int
7
fromEnum CompassDirection
CompassDirectionNorthWest = Int
8
fromEnum CompassDirection
CompassDirectionLast = Int
9
fromEnum (AnotherCompassDirection Int
k) = Int
k
toEnum :: Int -> CompassDirection
toEnum Int
0 = CompassDirection
CompassDirectionCentre
toEnum Int
1 = CompassDirection
CompassDirectionNorth
toEnum Int
2 = CompassDirection
CompassDirectionEast
toEnum Int
3 = CompassDirection
CompassDirectionSouth
toEnum Int
4 = CompassDirection
CompassDirectionWest
toEnum Int
5 = CompassDirection
CompassDirectionNorthEast
toEnum Int
6 = CompassDirection
CompassDirectionSouthEast
toEnum Int
7 = CompassDirection
CompassDirectionSouthWest
toEnum Int
8 = CompassDirection
CompassDirectionNorthWest
toEnum Int
9 = CompassDirection
CompassDirectionLast
toEnum Int
k = Int -> CompassDirection
AnotherCompassDirection Int
k
instance P.Ord CompassDirection where
compare :: CompassDirection -> CompassDirection -> Ordering
compare CompassDirection
a CompassDirection
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (CompassDirection -> Int
forall a. Enum a => a -> Int
P.fromEnum CompassDirection
a) (CompassDirection -> Int
forall a. Enum a => a -> Int
P.fromEnum CompassDirection
b)
type instance O.ParentTypes CompassDirection = '[]
instance O.HasParentTypes CompassDirection
foreign import ccall "vips_compass_direction_get_type" c_vips_compass_direction_get_type ::
IO GType
instance B.Types.TypedObject CompassDirection where
glibType :: IO GType
glibType = IO GType
c_vips_compass_direction_get_type
instance B.Types.BoxedEnum CompassDirection
data CombineMode =
CombineModeSet
| CombineModeAdd
| CombineModeLast
| AnotherCombineMode Int
deriving (Int -> CombineMode -> ShowS
[CombineMode] -> ShowS
CombineMode -> String
(Int -> CombineMode -> ShowS)
-> (CombineMode -> String)
-> ([CombineMode] -> ShowS)
-> Show CombineMode
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CombineMode] -> ShowS
$cshowList :: [CombineMode] -> ShowS
show :: CombineMode -> String
$cshow :: CombineMode -> String
showsPrec :: Int -> CombineMode -> ShowS
$cshowsPrec :: Int -> CombineMode -> ShowS
Show, CombineMode -> CombineMode -> Bool
(CombineMode -> CombineMode -> Bool)
-> (CombineMode -> CombineMode -> Bool) -> Eq CombineMode
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CombineMode -> CombineMode -> Bool
$c/= :: CombineMode -> CombineMode -> Bool
== :: CombineMode -> CombineMode -> Bool
$c== :: CombineMode -> CombineMode -> Bool
Eq)
instance P.Enum CombineMode where
fromEnum :: CombineMode -> Int
fromEnum CombineMode
CombineModeSet = Int
0
fromEnum CombineMode
CombineModeAdd = Int
1
fromEnum CombineMode
CombineModeLast = Int
2
fromEnum (AnotherCombineMode Int
k) = Int
k
toEnum :: Int -> CombineMode
toEnum Int
0 = CombineMode
CombineModeSet
toEnum Int
1 = CombineMode
CombineModeAdd
toEnum Int
2 = CombineMode
CombineModeLast
toEnum Int
k = Int -> CombineMode
AnotherCombineMode Int
k
instance P.Ord CombineMode where
compare :: CombineMode -> CombineMode -> Ordering
compare CombineMode
a CombineMode
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (CombineMode -> Int
forall a. Enum a => a -> Int
P.fromEnum CombineMode
a) (CombineMode -> Int
forall a. Enum a => a -> Int
P.fromEnum CombineMode
b)
type instance O.ParentTypes CombineMode = '[]
instance O.HasParentTypes CombineMode
foreign import ccall "vips_combine_mode_get_type" c_vips_combine_mode_get_type ::
IO GType
instance B.Types.TypedObject CombineMode where
glibType :: IO GType
glibType = IO GType
c_vips_combine_mode_get_type
instance B.Types.BoxedEnum CombineMode
data Combine =
CombineMax
| CombineSum
| CombineMin
| CombineLast
| AnotherCombine Int
deriving (Int -> Combine -> ShowS
[Combine] -> ShowS
Combine -> String
(Int -> Combine -> ShowS)
-> (Combine -> String) -> ([Combine] -> ShowS) -> Show Combine
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Combine] -> ShowS
$cshowList :: [Combine] -> ShowS
show :: Combine -> String
$cshow :: Combine -> String
showsPrec :: Int -> Combine -> ShowS
$cshowsPrec :: Int -> Combine -> ShowS
Show, Combine -> Combine -> Bool
(Combine -> Combine -> Bool)
-> (Combine -> Combine -> Bool) -> Eq Combine
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Combine -> Combine -> Bool
$c/= :: Combine -> Combine -> Bool
== :: Combine -> Combine -> Bool
$c== :: Combine -> Combine -> Bool
Eq)
instance P.Enum Combine where
fromEnum :: Combine -> Int
fromEnum Combine
CombineMax = Int
0
fromEnum Combine
CombineSum = Int
1
fromEnum Combine
CombineMin = Int
2
fromEnum Combine
CombineLast = Int
3
fromEnum (AnotherCombine Int
k) = Int
k
toEnum :: Int -> Combine
toEnum Int
0 = Combine
CombineMax
toEnum Int
1 = Combine
CombineSum
toEnum Int
2 = Combine
CombineMin
toEnum Int
3 = Combine
CombineLast
toEnum Int
k = Int -> Combine
AnotherCombine Int
k
instance P.Ord Combine where
compare :: Combine -> Combine -> Ordering
compare Combine
a Combine
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Combine -> Int
forall a. Enum a => a -> Int
P.fromEnum Combine
a) (Combine -> Int
forall a. Enum a => a -> Int
P.fromEnum Combine
b)
type instance O.ParentTypes Combine = '[]
instance O.HasParentTypes Combine
foreign import ccall "vips_combine_get_type" c_vips_combine_get_type ::
IO GType
instance B.Types.TypedObject Combine where
glibType :: IO GType
glibType = IO GType
c_vips_combine_get_type
instance B.Types.BoxedEnum Combine
data Coding =
CodingError
| CodingNone
| CodingLabq
| CodingRad
| CodingLast
| AnotherCoding Int
deriving (Int -> Coding -> ShowS
[Coding] -> ShowS
Coding -> String
(Int -> Coding -> ShowS)
-> (Coding -> String) -> ([Coding] -> ShowS) -> Show Coding
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Coding] -> ShowS
$cshowList :: [Coding] -> ShowS
show :: Coding -> String
$cshow :: Coding -> String
showsPrec :: Int -> Coding -> ShowS
$cshowsPrec :: Int -> Coding -> ShowS
Show, Coding -> Coding -> Bool
(Coding -> Coding -> Bool)
-> (Coding -> Coding -> Bool) -> Eq Coding
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Coding -> Coding -> Bool
$c/= :: Coding -> Coding -> Bool
== :: Coding -> Coding -> Bool
$c== :: Coding -> Coding -> Bool
Eq)
instance P.Enum Coding where
fromEnum :: Coding -> Int
fromEnum Coding
CodingError = Int
-1
fromEnum Coding
CodingNone = Int
0
fromEnum Coding
CodingLabq = Int
2
fromEnum Coding
CodingRad = Int
6
fromEnum Coding
CodingLast = Int
7
fromEnum (AnotherCoding Int
k) = Int
k
toEnum :: Int -> Coding
toEnum Int
-1 = Coding
CodingError
toEnum Int
0 = Coding
CodingNone
toEnum Int
2 = Coding
CodingLabq
toEnum Int
6 = Coding
CodingRad
toEnum Int
7 = Coding
CodingLast
toEnum Int
k = Int -> Coding
AnotherCoding Int
k
instance P.Ord Coding where
compare :: Coding -> Coding -> Ordering
compare Coding
a Coding
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Coding -> Int
forall a. Enum a => a -> Int
P.fromEnum Coding
a) (Coding -> Int
forall a. Enum a => a -> Int
P.fromEnum Coding
b)
type instance O.ParentTypes Coding = '[]
instance O.HasParentTypes Coding
foreign import ccall "vips_coding_get_type" c_vips_coding_get_type ::
IO GType
instance B.Types.TypedObject Coding where
glibType :: IO GType
glibType = IO GType
c_vips_coding_get_type
instance B.Types.BoxedEnum Coding
data BlendMode =
BlendModeClear
| BlendModeSource
| BlendModeOver
| BlendModeIn
| BlendModeOut
| BlendModeAtop
| BlendModeDest
| BlendModeDestOver
| BlendModeDestIn
| BlendModeDestOut
| BlendModeDestAtop
| BlendModeXor
| BlendModeAdd
| BlendModeSaturate
| BlendModeMultiply
| BlendModeScreen
| BlendModeOverlay
| BlendModeDarken
| BlendModeLighten
| BlendModeColourDodge
| BlendModeColourBurn
| BlendModeHardLight
| BlendModeSoftLight
| BlendModeDifference
| BlendModeExclusion
| BlendModeLast
| AnotherBlendMode Int
deriving (Int -> BlendMode -> ShowS
[BlendMode] -> ShowS
BlendMode -> String
(Int -> BlendMode -> ShowS)
-> (BlendMode -> String)
-> ([BlendMode] -> ShowS)
-> Show BlendMode
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [BlendMode] -> ShowS
$cshowList :: [BlendMode] -> ShowS
show :: BlendMode -> String
$cshow :: BlendMode -> String
showsPrec :: Int -> BlendMode -> ShowS
$cshowsPrec :: Int -> BlendMode -> ShowS
Show, BlendMode -> BlendMode -> Bool
(BlendMode -> BlendMode -> Bool)
-> (BlendMode -> BlendMode -> Bool) -> Eq BlendMode
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: BlendMode -> BlendMode -> Bool
$c/= :: BlendMode -> BlendMode -> Bool
== :: BlendMode -> BlendMode -> Bool
$c== :: BlendMode -> BlendMode -> Bool
Eq)
instance P.Enum BlendMode where
fromEnum :: BlendMode -> Int
fromEnum BlendMode
BlendModeClear = Int
0
fromEnum BlendMode
BlendModeSource = Int
1
fromEnum BlendMode
BlendModeOver = Int
2
fromEnum BlendMode
BlendModeIn = Int
3
fromEnum BlendMode
BlendModeOut = Int
4
fromEnum BlendMode
BlendModeAtop = Int
5
fromEnum BlendMode
BlendModeDest = Int
6
fromEnum BlendMode
BlendModeDestOver = Int
7
fromEnum BlendMode
BlendModeDestIn = Int
8
fromEnum BlendMode
BlendModeDestOut = Int
9
fromEnum BlendMode
BlendModeDestAtop = Int
10
fromEnum BlendMode
BlendModeXor = Int
11
fromEnum BlendMode
BlendModeAdd = Int
12
fromEnum BlendMode
BlendModeSaturate = Int
13
fromEnum BlendMode
BlendModeMultiply = Int
14
fromEnum BlendMode
BlendModeScreen = Int
15
fromEnum BlendMode
BlendModeOverlay = Int
16
fromEnum BlendMode
BlendModeDarken = Int
17
fromEnum BlendMode
BlendModeLighten = Int
18
fromEnum BlendMode
BlendModeColourDodge = Int
19
fromEnum BlendMode
BlendModeColourBurn = Int
20
fromEnum BlendMode
BlendModeHardLight = Int
21
fromEnum BlendMode
BlendModeSoftLight = Int
22
fromEnum BlendMode
BlendModeDifference = Int
23
fromEnum BlendMode
BlendModeExclusion = Int
24
fromEnum BlendMode
BlendModeLast = Int
25
fromEnum (AnotherBlendMode Int
k) = Int
k
toEnum :: Int -> BlendMode
toEnum Int
0 = BlendMode
BlendModeClear
toEnum Int
1 = BlendMode
BlendModeSource
toEnum Int
2 = BlendMode
BlendModeOver
toEnum Int
3 = BlendMode
BlendModeIn
toEnum Int
4 = BlendMode
BlendModeOut
toEnum Int
5 = BlendMode
BlendModeAtop
toEnum Int
6 = BlendMode
BlendModeDest
toEnum Int
7 = BlendMode
BlendModeDestOver
toEnum Int
8 = BlendMode
BlendModeDestIn
toEnum Int
9 = BlendMode
BlendModeDestOut
toEnum Int
10 = BlendMode
BlendModeDestAtop
toEnum Int
11 = BlendMode
BlendModeXor
toEnum Int
12 = BlendMode
BlendModeAdd
toEnum Int
13 = BlendMode
BlendModeSaturate
toEnum Int
14 = BlendMode
BlendModeMultiply
toEnum Int
15 = BlendMode
BlendModeScreen
toEnum Int
16 = BlendMode
BlendModeOverlay
toEnum Int
17 = BlendMode
BlendModeDarken
toEnum Int
18 = BlendMode
BlendModeLighten
toEnum Int
19 = BlendMode
BlendModeColourDodge
toEnum Int
20 = BlendMode
BlendModeColourBurn
toEnum Int
21 = BlendMode
BlendModeHardLight
toEnum Int
22 = BlendMode
BlendModeSoftLight
toEnum Int
23 = BlendMode
BlendModeDifference
toEnum Int
24 = BlendMode
BlendModeExclusion
toEnum Int
25 = BlendMode
BlendModeLast
toEnum Int
k = Int -> BlendMode
AnotherBlendMode Int
k
instance P.Ord BlendMode where
compare :: BlendMode -> BlendMode -> Ordering
compare BlendMode
a BlendMode
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (BlendMode -> Int
forall a. Enum a => a -> Int
P.fromEnum BlendMode
a) (BlendMode -> Int
forall a. Enum a => a -> Int
P.fromEnum BlendMode
b)
type instance O.ParentTypes BlendMode = '[]
instance O.HasParentTypes BlendMode
foreign import ccall "vips_blend_mode_get_type" c_vips_blend_mode_get_type ::
IO GType
instance B.Types.TypedObject BlendMode where
glibType :: IO GType
glibType = IO GType
c_vips_blend_mode_get_type
instance B.Types.BoxedEnum BlendMode
data BandFormat =
BandFormatNotset
| BandFormatUchar
| BandFormatChar
| BandFormatUshort
| BandFormatShort
| BandFormatUint
| BandFormatInt
| BandFormatFloat
| BandFormatComplex
| BandFormatDouble
| BandFormatDpcomplex
| BandFormatLast
| AnotherBandFormat Int
deriving (Int -> BandFormat -> ShowS
[BandFormat] -> ShowS
BandFormat -> String
(Int -> BandFormat -> ShowS)
-> (BandFormat -> String)
-> ([BandFormat] -> ShowS)
-> Show BandFormat
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [BandFormat] -> ShowS
$cshowList :: [BandFormat] -> ShowS
show :: BandFormat -> String
$cshow :: BandFormat -> String
showsPrec :: Int -> BandFormat -> ShowS
$cshowsPrec :: Int -> BandFormat -> ShowS
Show, BandFormat -> BandFormat -> Bool
(BandFormat -> BandFormat -> Bool)
-> (BandFormat -> BandFormat -> Bool) -> Eq BandFormat
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: BandFormat -> BandFormat -> Bool
$c/= :: BandFormat -> BandFormat -> Bool
== :: BandFormat -> BandFormat -> Bool
$c== :: BandFormat -> BandFormat -> Bool
Eq)
instance P.Enum BandFormat where
fromEnum :: BandFormat -> Int
fromEnum BandFormat
BandFormatNotset = Int
-1
fromEnum BandFormat
BandFormatUchar = Int
0
fromEnum BandFormat
BandFormatChar = Int
1
fromEnum BandFormat
BandFormatUshort = Int
2
fromEnum BandFormat
BandFormatShort = Int
3
fromEnum BandFormat
BandFormatUint = Int
4
fromEnum BandFormat
BandFormatInt = Int
5
fromEnum BandFormat
BandFormatFloat = Int
6
fromEnum BandFormat
BandFormatComplex = Int
7
fromEnum BandFormat
BandFormatDouble = Int
8
fromEnum BandFormat
BandFormatDpcomplex = Int
9
fromEnum BandFormat
BandFormatLast = Int
10
fromEnum (AnotherBandFormat Int
k) = Int
k
toEnum :: Int -> BandFormat
toEnum Int
-1 = BandFormat
BandFormatNotset
toEnum Int
0 = BandFormat
BandFormatUchar
toEnum Int
1 = BandFormat
BandFormatChar
toEnum Int
2 = BandFormat
BandFormatUshort
toEnum Int
3 = BandFormat
BandFormatShort
toEnum Int
4 = BandFormat
BandFormatUint
toEnum Int
5 = BandFormat
BandFormatInt
toEnum Int
6 = BandFormat
BandFormatFloat
toEnum Int
7 = BandFormat
BandFormatComplex
toEnum Int
8 = BandFormat
BandFormatDouble
toEnum Int
9 = BandFormat
BandFormatDpcomplex
toEnum Int
10 = BandFormat
BandFormatLast
toEnum Int
k = Int -> BandFormat
AnotherBandFormat Int
k
instance P.Ord BandFormat where
compare :: BandFormat -> BandFormat -> Ordering
compare BandFormat
a BandFormat
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (BandFormat -> Int
forall a. Enum a => a -> Int
P.fromEnum BandFormat
a) (BandFormat -> Int
forall a. Enum a => a -> Int
P.fromEnum BandFormat
b)
type instance O.ParentTypes BandFormat = '[]
instance O.HasParentTypes BandFormat
foreign import ccall "vips_band_format_get_type" c_vips_band_format_get_type ::
IO GType
instance B.Types.TypedObject BandFormat where
glibType :: IO GType
glibType = IO GType
c_vips_band_format_get_type
instance B.Types.BoxedEnum BandFormat
data Angle45 =
Angle45D0
| Angle45D45
| Angle45D90
| Angle45D135
| Angle45D180
| Angle45D225
| Angle45D270
| Angle45D315
| Angle45Last
| AnotherAngle45 Int
deriving (Int -> Angle45 -> ShowS
[Angle45] -> ShowS
Angle45 -> String
(Int -> Angle45 -> ShowS)
-> (Angle45 -> String) -> ([Angle45] -> ShowS) -> Show Angle45
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Angle45] -> ShowS
$cshowList :: [Angle45] -> ShowS
show :: Angle45 -> String
$cshow :: Angle45 -> String
showsPrec :: Int -> Angle45 -> ShowS
$cshowsPrec :: Int -> Angle45 -> ShowS
Show, Angle45 -> Angle45 -> Bool
(Angle45 -> Angle45 -> Bool)
-> (Angle45 -> Angle45 -> Bool) -> Eq Angle45
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Angle45 -> Angle45 -> Bool
$c/= :: Angle45 -> Angle45 -> Bool
== :: Angle45 -> Angle45 -> Bool
$c== :: Angle45 -> Angle45 -> Bool
Eq)
instance P.Enum Angle45 where
fromEnum :: Angle45 -> Int
fromEnum Angle45
Angle45D0 = Int
0
fromEnum Angle45
Angle45D45 = Int
1
fromEnum Angle45
Angle45D90 = Int
2
fromEnum Angle45
Angle45D135 = Int
3
fromEnum Angle45
Angle45D180 = Int
4
fromEnum Angle45
Angle45D225 = Int
5
fromEnum Angle45
Angle45D270 = Int
6
fromEnum Angle45
Angle45D315 = Int
7
fromEnum Angle45
Angle45Last = Int
8
fromEnum (AnotherAngle45 Int
k) = Int
k
toEnum :: Int -> Angle45
toEnum Int
0 = Angle45
Angle45D0
toEnum Int
1 = Angle45
Angle45D45
toEnum Int
2 = Angle45
Angle45D90
toEnum Int
3 = Angle45
Angle45D135
toEnum Int
4 = Angle45
Angle45D180
toEnum Int
5 = Angle45
Angle45D225
toEnum Int
6 = Angle45
Angle45D270
toEnum Int
7 = Angle45
Angle45D315
toEnum Int
8 = Angle45
Angle45Last
toEnum Int
k = Int -> Angle45
AnotherAngle45 Int
k
instance P.Ord Angle45 where
compare :: Angle45 -> Angle45 -> Ordering
compare Angle45
a Angle45
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Angle45 -> Int
forall a. Enum a => a -> Int
P.fromEnum Angle45
a) (Angle45 -> Int
forall a. Enum a => a -> Int
P.fromEnum Angle45
b)
type instance O.ParentTypes Angle45 = '[]
instance O.HasParentTypes Angle45
foreign import ccall "vips_angle45_get_type" c_vips_angle45_get_type ::
IO GType
instance B.Types.TypedObject Angle45 where
glibType :: IO GType
glibType = IO GType
c_vips_angle45_get_type
instance B.Types.BoxedEnum Angle45
data Angle =
AngleD0
| AngleD90
| AngleD180
| AngleD270
| AngleLast
| AnotherAngle Int
deriving (Int -> Angle -> ShowS
[Angle] -> ShowS
Angle -> String
(Int -> Angle -> ShowS)
-> (Angle -> String) -> ([Angle] -> ShowS) -> Show Angle
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Angle] -> ShowS
$cshowList :: [Angle] -> ShowS
show :: Angle -> String
$cshow :: Angle -> String
showsPrec :: Int -> Angle -> ShowS
$cshowsPrec :: Int -> Angle -> ShowS
Show, Angle -> Angle -> Bool
(Angle -> Angle -> Bool) -> (Angle -> Angle -> Bool) -> Eq Angle
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Angle -> Angle -> Bool
$c/= :: Angle -> Angle -> Bool
== :: Angle -> Angle -> Bool
$c== :: Angle -> Angle -> Bool
Eq)
instance P.Enum Angle where
fromEnum :: Angle -> Int
fromEnum Angle
AngleD0 = Int
0
fromEnum Angle
AngleD90 = Int
1
fromEnum Angle
AngleD180 = Int
2
fromEnum Angle
AngleD270 = Int
3
fromEnum Angle
AngleLast = Int
4
fromEnum (AnotherAngle Int
k) = Int
k
toEnum :: Int -> Angle
toEnum Int
0 = Angle
AngleD0
toEnum Int
1 = Angle
AngleD90
toEnum Int
2 = Angle
AngleD180
toEnum Int
3 = Angle
AngleD270
toEnum Int
4 = Angle
AngleLast
toEnum Int
k = Int -> Angle
AnotherAngle Int
k
instance P.Ord Angle where
compare :: Angle -> Angle -> Ordering
compare Angle
a Angle
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Angle -> Int
forall a. Enum a => a -> Int
P.fromEnum Angle
a) (Angle -> Int
forall a. Enum a => a -> Int
P.fromEnum Angle
b)
type instance O.ParentTypes Angle = '[]
instance O.HasParentTypes Angle
foreign import ccall "vips_angle_get_type" c_vips_angle_get_type ::
IO GType
instance B.Types.TypedObject Angle where
glibType :: IO GType
glibType = IO GType
c_vips_angle_get_type
instance B.Types.BoxedEnum Angle
data Align =
AlignLow
| AlignCentre
| AlignHigh
| AlignLast
| AnotherAlign Int
deriving (Int -> Align -> ShowS
[Align] -> ShowS
Align -> String
(Int -> Align -> ShowS)
-> (Align -> String) -> ([Align] -> ShowS) -> Show Align
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Align] -> ShowS
$cshowList :: [Align] -> ShowS
show :: Align -> String
$cshow :: Align -> String
showsPrec :: Int -> Align -> ShowS
$cshowsPrec :: Int -> Align -> ShowS
Show, Align -> Align -> Bool
(Align -> Align -> Bool) -> (Align -> Align -> Bool) -> Eq Align
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Align -> Align -> Bool
$c/= :: Align -> Align -> Bool
== :: Align -> Align -> Bool
$c== :: Align -> Align -> Bool
Eq)
instance P.Enum Align where
fromEnum :: Align -> Int
fromEnum Align
AlignLow = Int
0
fromEnum Align
AlignCentre = Int
1
fromEnum Align
AlignHigh = Int
2
fromEnum Align
AlignLast = Int
3
fromEnum (AnotherAlign Int
k) = Int
k
toEnum :: Int -> Align
toEnum Int
0 = Align
AlignLow
toEnum Int
1 = Align
AlignCentre
toEnum Int
2 = Align
AlignHigh
toEnum Int
3 = Align
AlignLast
toEnum Int
k = Int -> Align
AnotherAlign Int
k
instance P.Ord Align where
compare :: Align -> Align -> Ordering
compare Align
a Align
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Align -> Int
forall a. Enum a => a -> Int
P.fromEnum Align
a) (Align -> Int
forall a. Enum a => a -> Int
P.fromEnum Align
b)
type instance O.ParentTypes Align = '[]
instance O.HasParentTypes Align
foreign import ccall "vips_align_get_type" c_vips_align_get_type ::
IO GType
instance B.Types.TypedObject Align where
glibType :: IO GType
glibType = IO GType
c_vips_align_get_type
instance B.Types.BoxedEnum Align
data Access =
AccessRandom
| AccessSequential
| AccessSequentialUnbuffered
| AccessLast
| AnotherAccess Int
deriving (Int -> Access -> ShowS
[Access] -> ShowS
Access -> String
(Int -> Access -> ShowS)
-> (Access -> String) -> ([Access] -> ShowS) -> Show Access
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Access] -> ShowS
$cshowList :: [Access] -> ShowS
show :: Access -> String
$cshow :: Access -> String
showsPrec :: Int -> Access -> ShowS
$cshowsPrec :: Int -> Access -> ShowS
Show, Access -> Access -> Bool
(Access -> Access -> Bool)
-> (Access -> Access -> Bool) -> Eq Access
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Access -> Access -> Bool
$c/= :: Access -> Access -> Bool
== :: Access -> Access -> Bool
$c== :: Access -> Access -> Bool
Eq)
instance P.Enum Access where
fromEnum :: Access -> Int
fromEnum Access
AccessRandom = Int
0
fromEnum Access
AccessSequential = Int
1
fromEnum Access
AccessSequentialUnbuffered = Int
2
fromEnum Access
AccessLast = Int
3
fromEnum (AnotherAccess Int
k) = Int
k
toEnum :: Int -> Access
toEnum Int
0 = Access
AccessRandom
toEnum Int
1 = Access
AccessSequential
toEnum Int
2 = Access
AccessSequentialUnbuffered
toEnum Int
3 = Access
AccessLast
toEnum Int
k = Int -> Access
AnotherAccess Int
k
instance P.Ord Access where
compare :: Access -> Access -> Ordering
compare Access
a Access
b = Int -> Int -> Ordering
forall a. Ord a => a -> a -> Ordering
P.compare (Access -> Int
forall a. Enum a => a -> Int
P.fromEnum Access
a) (Access -> Int
forall a. Enum a => a -> Int
P.fromEnum Access
b)
type instance O.ParentTypes Access = '[]
instance O.HasParentTypes Access
foreign import ccall "vips_access_get_type" c_vips_access_get_type ::
IO GType
instance B.Types.TypedObject Access where
glibType :: IO GType
glibType = IO GType
c_vips_access_get_type
instance B.Types.BoxedEnum Access