Graphics.Color.Adaptation.VonKries

Color conversion

convert :: (ColorSpace cs' i' e', ColorSpace cs i e) => Color cs' e' -> Color cs e

This function allows conversion of a color between any two color spaces. It uses a very common VonKries chromatic adaptation transform with Bradford matrix. One of more general functions convertWith or convertElevatedWith can be used for selecting another chromatic adaptation algorithm.

Since: 0.1.0

Von Kries adaptation

data VonKries

Constructors

VonKries

VonKries chromatic adaptation transform

>>> cat :: CAT 'VonKries Float
CAT VonKries 'VonKries Float
[ [ 0.400240, 0.707600,-0.080810 ]
, [-0.226300, 1.165320, 0.045700 ]
, [ 0.000000, 0.000000, 0.918220 ] ]
>>> icat :: ICAT 'VonKries Float
ICAT VonKries 'VonKries Float
[ [ 1.859936,-1.129382, 0.219897 ]
, [ 0.361191, 0.638812,-0.000006 ]
, [-0.000000,-0.000000, 1.089064 ] ]

Since: 0.1.0

Bradford

Bradford chromatic adaptation transform

>>> cat :: CAT 'Bradford Float
CAT VonKries 'Bradford Float
[ [ 0.895100, 0.266400,-0.161400 ]
, [-0.750200, 1.713500, 0.036700 ]
, [ 0.038900,-0.068500, 1.029600 ] ]
>>> icat :: ICAT 'Bradford Float
ICAT VonKries 'Bradford Float
[ [ 0.986993,-0.147054, 0.159963 ]
, [ 0.432305, 0.518360, 0.049291 ]
, [-0.008529, 0.040043, 0.968487 ] ]

Since: 0.1.0

Fairchild

Fairchild chromatic adaptation transform

>>> cat :: CAT 'Fairchild Float
CAT VonKries 'Fairchild Float
[ [ 0.856200, 0.337200,-0.193400 ]
, [-0.836000, 1.832700, 0.003300 ]
, [ 0.035700,-0.046900, 1.011200 ] ]
>>> icat :: ICAT 'Fairchild Float
ICAT VonKries 'Fairchild Float
[ [ 0.987400,-0.176825, 0.189425 ]
, [ 0.450435, 0.464933, 0.084632 ]
, [-0.013968, 0.027807, 0.986162 ] ]

Since: 0.1.0

CIECAT02

CIECAT02 chromatic adaptation transform

>>> cat :: CAT 'CIECAT02 Float
CAT VonKries 'CIECAT02 Float
[ [ 0.732800, 0.429600,-0.162400 ]
, [-0.703600, 1.697500, 0.006100 ]
, [ 0.003000, 0.013600, 0.983400 ] ]
>>> icat :: ICAT 'CIECAT02 Float
ICAT VonKries 'CIECAT02 Float
[ [ 1.096124,-0.278869, 0.182745 ]
, [ 0.454369, 0.473533, 0.072098 ]
, [-0.009628,-0.005698, 1.015326 ] ]

Since: 0.1.3

CMCCAT2000

CMCCAT2000 chromatic adaptation transform

>>> cat :: CAT 'CMCCAT2000 Float
CAT VonKries 'CMCCAT2000 Float
[ [ 0.798200, 0.338900,-0.137100 ]
, [-0.591800, 1.551200, 0.040600 ]
, [ 0.000800, 0.023900, 0.975300 ] ]
>>> icat :: ICAT 'CMCCAT2000 Float
ICAT VonKries 'CMCCAT2000 Float
[ [ 1.076450,-0.237662, 0.161212 ]
, [ 0.410964, 0.554342, 0.034694 ]
, [-0.010954,-0.013389, 1.024343 ] ]

Since: 0.1.3

Instances

(Illuminant it, Illuminant ir, Elevator e, RealFloat e) => ChromaticAdaptation (t :: VonKries) (it :: kt) (ir :: kr) e

Defined in Graphics.Color.Adaptation.VonKries

Associated Types

data Adaptation t it ir e :: Type

Methods

adaptColorXYZ :: Adaptation t it ir e -> Color (XYZ it) e -> Color (XYZ ir) e

Eq e => Eq (Adaptation t it ir e)

Defined in Graphics.Color.Adaptation.VonKries

Methods

(==) :: Adaptation t it ir e -> Adaptation t it ir e -> Bool

(/=) :: Adaptation t it ir e -> Adaptation t it ir e -> Bool

(Illuminant it, Illuminant ir, Elevator e) => Show (Adaptation t it ir e)

Defined in Graphics.Color.Adaptation.VonKries

Methods

showsPrec :: Int -> Adaptation t it ir e -> ShowS

show :: Adaptation t it ir e -> String

showList :: [Adaptation t it ir e] -> ShowS

newtype Adaptation (t :: VonKries) (it :: kt) (ir :: kr) e

Defined in Graphics.Color.Adaptation.VonKries

newtype Adaptation (t :: VonKries) (it :: kt) (ir :: kr) e = AdaptationMatrix (M3x3 e)

newtype CAT (t :: k) e

Chromatic adaptation transformation matrix

Constructors

CAT (M3x3 e)

Instances

Eq e => Eq (CAT t e)

Defined in Graphics.Color.Adaptation.VonKries

Methods

(==) :: CAT t e -> CAT t e -> Bool

(/=) :: CAT t e -> CAT t e -> Bool

(Typeable t, Typeable k, Elevator e) => Show (CAT t e)

Defined in Graphics.Color.Adaptation.VonKries

Methods

showsPrec :: Int -> CAT t e -> ShowS

show :: CAT t e -> String

showList :: [CAT t e] -> ShowS

newtype ICAT (t :: k) e

Inverse of chromatic adaptation transformation matrix

Constructors

ICAT (M3x3 e)

Instances

Eq e => Eq (ICAT t e)

Defined in Graphics.Color.Adaptation.VonKries

Methods

(==) :: ICAT t e -> ICAT t e -> Bool

(/=) :: ICAT t e -> ICAT t e -> Bool

(Typeable t, Typeable k, Elevator e) => Show (ICAT t e)

Defined in Graphics.Color.Adaptation.VonKries

Methods

showsPrec :: Int -> ICAT t e -> ShowS

show :: ICAT t e -> String

showList :: [ICAT t e] -> ShowS

class ChromaticAdaptationTransform (t :: VonKries)

Minimal complete definition

cat

Instances

ChromaticAdaptationTransform VonKries

Defined in Graphics.Color.Adaptation.VonKries

Methods

cat :: RealFloat e => CAT VonKries e

ChromaticAdaptationTransform Bradford

Defined in Graphics.Color.Adaptation.VonKries

Methods

cat :: RealFloat e => CAT Bradford e

ChromaticAdaptationTransform Fairchild

Defined in Graphics.Color.Adaptation.VonKries

Methods

cat :: RealFloat e => CAT Fairchild e

ChromaticAdaptationTransform CIECAT02

Defined in Graphics.Color.Adaptation.VonKries

Methods

cat :: RealFloat e => CAT CIECAT02 e

ChromaticAdaptationTransform CMCCAT2000

Defined in Graphics.Color.Adaptation.VonKries

Methods

cat :: RealFloat e => CAT CMCCAT2000 e

cat :: (ChromaticAdaptationTransform t, RealFloat e) => CAT t e

icat :: forall t e. (ChromaticAdaptationTransform t, RealFloat e) => ICAT t e

vonKriesAdaptation :: ChromaticAdaptation VonKries it ir e => Adaptation VonKries it ir e

VonKries chromatic adaptation transform.

Since: 0.1.2

bradfordAdaptation :: ChromaticAdaptation Bradford it ir e => Adaptation Bradford it ir e

Bradford chromatic adaptation transform, as defined in the CIECAM97s color appearance model.

Since: 0.1.2

fairchildAdaptation :: ChromaticAdaptation Fairchild it ir e => Adaptation Fairchild it ir e

Fairchild chromatic adaptation transform.

Since: 0.1.2

ciecat02Adaptation :: ChromaticAdaptation CIECAT02 it ir e => Adaptation CIECAT02 it ir e

CIECAT02 chromatic adaptation as defined it CIECAM02 color appearance model

Since: 0.1.3

cmccat2000Adaptation :: ChromaticAdaptation CMCCAT2000 it ir e => Adaptation CIECAT02 it ir e

CMCCAT2000 chromatic adaptation. Predecessor of CIECAT02. as defined it CIECAM02 color appearance model

Since: 0.1.3

adaptationMatrix :: forall t it ir e. (ChromaticAdaptationTransform t, ChromaticAdaptation t it ir e) => Adaptation (t :: VonKries) it ir e

Deprecated

type CIECAM02 = CIECAT02

Deprecated: In favor of a proper name CIECAT02

ciecam02Adaptation :: ChromaticAdaptation CIECAM02 it ir e => Adaptation CIECAM02 it ir e

Deprecated: In favor of a proper name ciecat02Adaptation