{-
Copyright (c) 2008, 2009
Russell O'Connor

Permission is hereby granted, free of charge, to any person obtaining a copy
of this software and associated documentation files (the "Software"), to deal
in the Software without restriction, including without limitation the rights
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
copies of the Software, and to permit persons to whom the Software is
furnished to do so, subject to the following conditions:

The above copyright notice and this permission notice shall be included in
all copies or substantial portions of the Software.

THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
THE SOFTWARE.
-}

-- |Names for colours.
-- Names taken from SVG 1.1 specification,
-- <http://www.w3.org/TR/SVG11/types.html#ColorKeywords>.
--
-- 'readColourName' takes a string naming a colour (must be all lowercase)
-- and returns the colour.
-- Fails if the name is not recognized.
module Data.Colour.Names
 (
  readColourName
 ,aliceblue
 ,antiquewhite
 ,aqua
 ,aquamarine
 ,azure
 ,beige
 ,bisque
 ,black
 ,blanchedalmond
 ,blue
 ,blueviolet
 ,brown
 ,burlywood
 ,cadetblue
 ,chartreuse
 ,chocolate
 ,coral
 ,cornflowerblue
 ,cornsilk
 ,crimson
 ,cyan
 ,darkblue
 ,darkcyan
 ,darkgoldenrod
 ,darkgray
 ,darkgreen
 ,darkgrey
 ,darkkhaki
 ,darkmagenta
 ,darkolivegreen
 ,darkorange
 ,darkorchid
 ,darkred
 ,darksalmon
 ,darkseagreen
 ,darkslateblue
 ,darkslategray
 ,darkslategrey
 ,darkturquoise
 ,darkviolet
 ,deeppink
 ,deepskyblue
 ,dimgray
 ,dimgrey
 ,dodgerblue
 ,firebrick
 ,floralwhite
 ,forestgreen
 ,fuchsia
 ,gainsboro
 ,ghostwhite
 ,gold
 ,goldenrod
 ,gray
 ,grey
 ,green
 ,greenyellow
 ,honeydew
 ,hotpink
 ,indianred
 ,indigo
 ,ivory
 ,khaki
 ,lavender
 ,lavenderblush
 ,lawngreen
 ,lemonchiffon
 ,lightblue
 ,lightcoral
 ,lightcyan
 ,lightgoldenrodyellow
 ,lightgray
 ,lightgreen
 ,lightgrey
 ,lightpink
 ,lightsalmon
 ,lightseagreen
 ,lightskyblue
 ,lightslategray
 ,lightslategrey
 ,lightsteelblue
 ,lightyellow
 ,lime
 ,limegreen
 ,linen
 ,magenta
 ,maroon
 ,mediumaquamarine
 ,mediumblue
 ,mediumorchid
 ,mediumpurple
 ,mediumseagreen
 ,mediumslateblue
 ,mediumspringgreen
 ,mediumturquoise
 ,mediumvioletred
 ,midnightblue
 ,mintcream
 ,mistyrose
 ,moccasin
 ,navajowhite
 ,navy
 ,oldlace
 ,olive
 ,olivedrab
 ,orange
 ,orangered
 ,orchid
 ,palegoldenrod
 ,palegreen
 ,paleturquoise
 ,palevioletred
 ,papayawhip
 ,peachpuff
 ,peru
 ,pink
 ,plum
 ,powderblue
 ,purple
 ,red
 ,rosybrown
 ,royalblue
 ,saddlebrown
 ,salmon
 ,sandybrown
 ,seagreen
 ,seashell
 ,sienna
 ,silver
 ,skyblue
 ,slateblue
 ,slategray
 ,slategrey
 ,snow
 ,springgreen
 ,steelblue
 ,tan
 ,teal
 ,thistle
 ,tomato
 ,turquoise
 ,violet
 ,wheat
 ,white
 ,whitesmoke
 ,yellow
 ,yellowgreen
 )
where

import Prelude hiding (tan)
import qualified Control.Monad.Fail as Fail
import Data.Colour.SRGB
import Data.Colour (black)

readColourName :: (Fail.MonadFail m, Monad m, Ord a, Floating a) => String -> m (Colour a)
readColourName :: forall (m :: * -> *) a.
(MonadFail m, Monad m, Ord a, Floating a) =>
String -> m (Colour a)
readColourName String
"aliceblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
aliceblue
readColourName String
"antiquewhite" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
antiquewhite
readColourName String
"aqua" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
aqua
readColourName String
"aquamarine" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
aquamarine
readColourName String
"azure" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
azure
readColourName String
"beige" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
beige
readColourName String
"bisque" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
bisque
readColourName String
"black" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. Num a => Colour a
black
readColourName String
"blanchedalmond" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
blanchedalmond
readColourName String
"blue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
blue
readColourName String
"blueviolet" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
blueviolet
readColourName String
"brown" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
brown
readColourName String
"burlywood" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
burlywood
readColourName String
"cadetblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
cadetblue
readColourName String
"chartreuse" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
chartreuse
readColourName String
"chocolate" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
chocolate
readColourName String
"coral" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
coral
readColourName String
"cornflowerblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
cornflowerblue
readColourName String
"cornsilk" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
cornsilk
readColourName String
"crimson" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
crimson
readColourName String
"cyan" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
cyan
readColourName String
"darkblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkblue
readColourName String
"darkcyan" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkcyan
readColourName String
"darkgoldenrod" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkgoldenrod
readColourName String
"darkgray" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkgray
readColourName String
"darkgreen" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkgreen
readColourName String
"darkgrey" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkgrey
readColourName String
"darkkhaki" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkkhaki
readColourName String
"darkmagenta" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkmagenta
readColourName String
"darkolivegreen" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkolivegreen
readColourName String
"darkorange" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkorange
readColourName String
"darkorchid" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkorchid
readColourName String
"darkred" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkred
readColourName String
"darksalmon" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darksalmon
readColourName String
"darkseagreen" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkseagreen
readColourName String
"darkslateblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkslateblue
readColourName String
"darkslategray" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkslategray
readColourName String
"darkslategrey" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkslategrey
readColourName String
"darkturquoise" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkturquoise
readColourName String
"darkviolet" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
darkviolet
readColourName String
"deeppink" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
deeppink
readColourName String
"deepskyblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
deepskyblue
readColourName String
"dimgray" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
dimgray
readColourName String
"dimgrey" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
dimgrey
readColourName String
"dodgerblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
dodgerblue
readColourName String
"firebrick" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
firebrick
readColourName String
"floralwhite" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
floralwhite
readColourName String
"forestgreen" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
forestgreen
readColourName String
"fuchsia" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
fuchsia
readColourName String
"gainsboro" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
gainsboro
readColourName String
"ghostwhite" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
ghostwhite
readColourName String
"gold" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
gold
readColourName String
"goldenrod" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
goldenrod
readColourName String
"gray" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
gray
readColourName String
"grey" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
grey
readColourName String
"green" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
green
readColourName String
"greenyellow" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
greenyellow
readColourName String
"honeydew" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
honeydew
readColourName String
"hotpink" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
hotpink
readColourName String
"indianred" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
indianred
readColourName String
"indigo" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
indigo
readColourName String
"ivory" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
ivory
readColourName String
"khaki" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
khaki
readColourName String
"lavender" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lavender
readColourName String
"lavenderblush" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lavenderblush
readColourName String
"lawngreen" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lawngreen
readColourName String
"lemonchiffon" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lemonchiffon
readColourName String
"lightblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lightblue
readColourName String
"lightcoral" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lightcoral
readColourName String
"lightcyan" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lightcyan
readColourName String
"lightgoldenrodyellow" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lightgoldenrodyellow
readColourName String
"lightgray" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lightgray
readColourName String
"lightgreen" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lightgreen
readColourName String
"lightgrey" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lightgrey
readColourName String
"lightpink" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lightpink
readColourName String
"lightsalmon" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lightsalmon
readColourName String
"lightseagreen" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lightseagreen
readColourName String
"lightskyblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lightskyblue
readColourName String
"lightslategray" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lightslategray
readColourName String
"lightslategrey" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lightslategrey
readColourName String
"lightsteelblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lightsteelblue
readColourName String
"lightyellow" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lightyellow
readColourName String
"lime" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
lime
readColourName String
"limegreen" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
limegreen
readColourName String
"linen" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
linen
readColourName String
"magenta" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
magenta
readColourName String
"maroon" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
maroon
readColourName String
"mediumaquamarine" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
mediumaquamarine
readColourName String
"mediumblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
mediumblue
readColourName String
"mediumorchid" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
mediumorchid
readColourName String
"mediumpurple" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
mediumpurple
readColourName String
"mediumseagreen" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
mediumseagreen
readColourName String
"mediumslateblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
mediumslateblue
readColourName String
"mediumspringgreen" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
mediumspringgreen
readColourName String
"mediumturquoise" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
mediumturquoise
readColourName String
"mediumvioletred" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
mediumvioletred
readColourName String
"midnightblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
midnightblue
readColourName String
"mintcream" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
mintcream
readColourName String
"mistyrose" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
mistyrose
readColourName String
"moccasin" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
moccasin
readColourName String
"navajowhite" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
navajowhite
readColourName String
"navy" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
navy
readColourName String
"oldlace" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
oldlace
readColourName String
"olive" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
olive
readColourName String
"olivedrab" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
olivedrab
readColourName String
"orange" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
orange
readColourName String
"orangered" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
orangered
readColourName String
"orchid" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
orchid
readColourName String
"palegoldenrod" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
palegoldenrod
readColourName String
"palegreen" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
palegreen
readColourName String
"paleturquoise" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
paleturquoise
readColourName String
"palevioletred" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
palevioletred
readColourName String
"papayawhip" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
papayawhip
readColourName String
"peachpuff" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
peachpuff
readColourName String
"peru" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
peru
readColourName String
"pink" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
pink
readColourName String
"plum" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
plum
readColourName String
"powderblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
powderblue
readColourName String
"purple" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
purple
readColourName String
"red" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
red
readColourName String
"rosybrown" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
rosybrown
readColourName String
"royalblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
royalblue
readColourName String
"saddlebrown" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
saddlebrown
readColourName String
"salmon" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
salmon
readColourName String
"sandybrown" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
sandybrown
readColourName String
"seagreen" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
seagreen
readColourName String
"seashell" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
seashell
readColourName String
"sienna" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
sienna
readColourName String
"silver" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
silver
readColourName String
"skyblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
skyblue
readColourName String
"slateblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
slateblue
readColourName String
"slategray" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
slategray
readColourName String
"slategrey" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
slategrey
readColourName String
"snow" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
snow
readColourName String
"springgreen" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
springgreen
readColourName String
"steelblue" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
steelblue
readColourName String
"tan" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
tan
readColourName String
"teal" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
teal
readColourName String
"thistle" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
thistle
readColourName String
"tomato" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
tomato
readColourName String
"turquoise" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
turquoise
readColourName String
"violet" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
violet
readColourName String
"wheat" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
wheat
readColourName String
"white" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
white
readColourName String
"whitesmoke" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
whitesmoke
readColourName String
"yellow" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
yellow
readColourName String
"yellowgreen" = forall (m :: * -> *) a. Monad m => a -> m a
return forall a. (Ord a, Floating a) => Colour a
yellowgreen
readColourName String
x = forall (m :: * -> *) a. MonadFail m => String -> m a
fail forall a b. (a -> b) -> a -> b
$
  String
"Data.Colour.Names.readColourName: Unknown colour name "forall a. [a] -> [a] -> [a]
++forall a. Show a => a -> String
show String
x

aliceblue :: (Ord a, Floating a) => Colour a
aliceblue :: forall a. (Ord a, Floating a) => Colour a
aliceblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
240 Word8
248 Word8
255

antiquewhite :: (Ord a, Floating a) => Colour a
antiquewhite :: forall a. (Ord a, Floating a) => Colour a
antiquewhite = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
250 Word8
235 Word8
215

aqua :: (Ord a, Floating a) => Colour a
aqua :: forall a. (Ord a, Floating a) => Colour a
aqua = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
0 Word8
255 Word8
255

aquamarine :: (Ord a, Floating a) => Colour a
aquamarine :: forall a. (Ord a, Floating a) => Colour a
aquamarine = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
127 Word8
255 Word8
212

azure :: (Ord a, Floating a) => Colour a
azure :: forall a. (Ord a, Floating a) => Colour a
azure = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
240 Word8
255 Word8
255

beige :: (Ord a, Floating a) => Colour a
beige :: forall a. (Ord a, Floating a) => Colour a
beige = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
245 Word8
245 Word8
220

bisque :: (Ord a, Floating a) => Colour a
bisque :: forall a. (Ord a, Floating a) => Colour a
bisque = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
228 Word8
196

-- black is reexported from Data.Colour

blanchedalmond :: (Ord a, Floating a) => Colour a
blanchedalmond :: forall a. (Ord a, Floating a) => Colour a
blanchedalmond = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
235 Word8
205

blue :: (Ord a, Floating a) => Colour a
blue :: forall a. (Ord a, Floating a) => Colour a
blue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
0 Word8
0 Word8
255

blueviolet :: (Ord a, Floating a) => Colour a
blueviolet :: forall a. (Ord a, Floating a) => Colour a
blueviolet = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
138 Word8
43 Word8
226

brown :: (Ord a, Floating a) => Colour a
brown :: forall a. (Ord a, Floating a) => Colour a
brown = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
165 Word8
42 Word8
42

burlywood :: (Ord a, Floating a) => Colour a
burlywood :: forall a. (Ord a, Floating a) => Colour a
burlywood = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
222 Word8
184 Word8
135

cadetblue :: (Ord a, Floating a) => Colour a
cadetblue :: forall a. (Ord a, Floating a) => Colour a
cadetblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
95 Word8
158 Word8
160

chartreuse :: (Ord a, Floating a) => Colour a
chartreuse :: forall a. (Ord a, Floating a) => Colour a
chartreuse = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
127 Word8
255 Word8
0

chocolate :: (Ord a, Floating a) => Colour a
chocolate :: forall a. (Ord a, Floating a) => Colour a
chocolate = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
210 Word8
105 Word8
30

coral :: (Ord a, Floating a) => Colour a
coral :: forall a. (Ord a, Floating a) => Colour a
coral = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
127 Word8
80

cornflowerblue :: (Ord a, Floating a) => Colour a
cornflowerblue :: forall a. (Ord a, Floating a) => Colour a
cornflowerblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
100 Word8
149 Word8
237

cornsilk :: (Ord a, Floating a) => Colour a
cornsilk :: forall a. (Ord a, Floating a) => Colour a
cornsilk = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
248 Word8
220

crimson :: (Ord a, Floating a) => Colour a
crimson :: forall a. (Ord a, Floating a) => Colour a
crimson = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
220 Word8
20 Word8
60

cyan :: (Ord a, Floating a) => Colour a
cyan :: forall a. (Ord a, Floating a) => Colour a
cyan = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
0 Word8
255 Word8
255

darkblue :: (Ord a, Floating a) => Colour a
darkblue :: forall a. (Ord a, Floating a) => Colour a
darkblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
0 Word8
0 Word8
139

darkcyan :: (Ord a, Floating a) => Colour a
darkcyan :: forall a. (Ord a, Floating a) => Colour a
darkcyan = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
0 Word8
139 Word8
139

darkgoldenrod :: (Ord a, Floating a) => Colour a
darkgoldenrod :: forall a. (Ord a, Floating a) => Colour a
darkgoldenrod = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
184 Word8
134 Word8
11

darkgray :: (Ord a, Floating a) => Colour a
darkgray :: forall a. (Ord a, Floating a) => Colour a
darkgray = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
169 Word8
169 Word8
169

darkgreen :: (Ord a, Floating a) => Colour a
darkgreen :: forall a. (Ord a, Floating a) => Colour a
darkgreen = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
0 Word8
100 Word8
0

darkgrey :: (Ord a, Floating a) => Colour a
darkgrey :: forall a. (Ord a, Floating a) => Colour a
darkgrey = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
169 Word8
169 Word8
169

darkkhaki :: (Ord a, Floating a) => Colour a
darkkhaki :: forall a. (Ord a, Floating a) => Colour a
darkkhaki = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
189 Word8
183 Word8
107

darkmagenta :: (Ord a, Floating a) => Colour a
darkmagenta :: forall a. (Ord a, Floating a) => Colour a
darkmagenta = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
139 Word8
0 Word8
139

darkolivegreen :: (Ord a, Floating a) => Colour a
darkolivegreen :: forall a. (Ord a, Floating a) => Colour a
darkolivegreen = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
85 Word8
107 Word8
47

darkorange :: (Ord a, Floating a) => Colour a
darkorange :: forall a. (Ord a, Floating a) => Colour a
darkorange = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
140 Word8
0

darkorchid :: (Ord a, Floating a) => Colour a
darkorchid :: forall a. (Ord a, Floating a) => Colour a
darkorchid = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
153 Word8
50 Word8
204

darkred :: (Ord a, Floating a) => Colour a
darkred :: forall a. (Ord a, Floating a) => Colour a
darkred = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
139 Word8
0 Word8
0

darksalmon :: (Ord a, Floating a) => Colour a
darksalmon :: forall a. (Ord a, Floating a) => Colour a
darksalmon = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
233 Word8
150 Word8
122

darkseagreen :: (Ord a, Floating a) => Colour a
darkseagreen :: forall a. (Ord a, Floating a) => Colour a
darkseagreen = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
143 Word8
188 Word8
143

darkslateblue :: (Ord a, Floating a) => Colour a
darkslateblue :: forall a. (Ord a, Floating a) => Colour a
darkslateblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
72 Word8
61 Word8
139

darkslategray :: (Ord a, Floating a) => Colour a
darkslategray :: forall a. (Ord a, Floating a) => Colour a
darkslategray = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
47 Word8
79 Word8
79

darkslategrey :: (Ord a, Floating a) => Colour a
darkslategrey :: forall a. (Ord a, Floating a) => Colour a
darkslategrey = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
47 Word8
79 Word8
79

darkturquoise :: (Ord a, Floating a) => Colour a
darkturquoise :: forall a. (Ord a, Floating a) => Colour a
darkturquoise = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
0 Word8
206 Word8
209

darkviolet :: (Ord a, Floating a) => Colour a
darkviolet :: forall a. (Ord a, Floating a) => Colour a
darkviolet = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
148 Word8
0 Word8
211

deeppink :: (Ord a, Floating a) => Colour a
deeppink :: forall a. (Ord a, Floating a) => Colour a
deeppink = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
20 Word8
147

deepskyblue :: (Ord a, Floating a) => Colour a
deepskyblue :: forall a. (Ord a, Floating a) => Colour a
deepskyblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
0 Word8
191 Word8
255

dimgray :: (Ord a, Floating a) => Colour a
dimgray :: forall a. (Ord a, Floating a) => Colour a
dimgray = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
105 Word8
105 Word8
105

dimgrey :: (Ord a, Floating a) => Colour a
dimgrey :: forall a. (Ord a, Floating a) => Colour a
dimgrey = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
105 Word8
105 Word8
105

dodgerblue :: (Ord a, Floating a) => Colour a
dodgerblue :: forall a. (Ord a, Floating a) => Colour a
dodgerblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
30 Word8
144 Word8
255

firebrick :: (Ord a, Floating a) => Colour a
firebrick :: forall a. (Ord a, Floating a) => Colour a
firebrick = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
178 Word8
34 Word8
34

floralwhite :: (Ord a, Floating a) => Colour a
floralwhite :: forall a. (Ord a, Floating a) => Colour a
floralwhite = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
250 Word8
240

forestgreen :: (Ord a, Floating a) => Colour a
forestgreen :: forall a. (Ord a, Floating a) => Colour a
forestgreen = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
34 Word8
139 Word8
34

fuchsia :: (Ord a, Floating a) => Colour a
fuchsia :: forall a. (Ord a, Floating a) => Colour a
fuchsia = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
0 Word8
255

gainsboro :: (Ord a, Floating a) => Colour a
gainsboro :: forall a. (Ord a, Floating a) => Colour a
gainsboro = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
220 Word8
220 Word8
220

ghostwhite :: (Ord a, Floating a) => Colour a
ghostwhite :: forall a. (Ord a, Floating a) => Colour a
ghostwhite = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
248 Word8
248 Word8
255

gold :: (Ord a, Floating a) => Colour a
gold :: forall a. (Ord a, Floating a) => Colour a
gold = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
215 Word8
0

goldenrod :: (Ord a, Floating a) => Colour a
goldenrod :: forall a. (Ord a, Floating a) => Colour a
goldenrod = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
218 Word8
165 Word8
32

gray :: (Ord a, Floating a) => Colour a
gray :: forall a. (Ord a, Floating a) => Colour a
gray = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
128 Word8
128 Word8
128

grey :: (Ord a, Floating a) => Colour a
grey :: forall a. (Ord a, Floating a) => Colour a
grey = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
128 Word8
128 Word8
128

green :: (Ord a, Floating a) => Colour a
green :: forall a. (Ord a, Floating a) => Colour a
green = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
0 Word8
128 Word8
0

greenyellow :: (Ord a, Floating a) => Colour a
greenyellow :: forall a. (Ord a, Floating a) => Colour a
greenyellow = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
173 Word8
255 Word8
47

honeydew :: (Ord a, Floating a) => Colour a
honeydew :: forall a. (Ord a, Floating a) => Colour a
honeydew = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
240 Word8
255 Word8
240

hotpink :: (Ord a, Floating a) => Colour a
hotpink :: forall a. (Ord a, Floating a) => Colour a
hotpink = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
105 Word8
180

indianred :: (Ord a, Floating a) => Colour a
indianred :: forall a. (Ord a, Floating a) => Colour a
indianred = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
205 Word8
92 Word8
92

indigo :: (Ord a, Floating a) => Colour a
indigo :: forall a. (Ord a, Floating a) => Colour a
indigo = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
75 Word8
0 Word8
130

ivory :: (Ord a, Floating a) => Colour a
ivory :: forall a. (Ord a, Floating a) => Colour a
ivory = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
255 Word8
240

khaki :: (Ord a, Floating a) => Colour a
khaki :: forall a. (Ord a, Floating a) => Colour a
khaki = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
240 Word8
230 Word8
140

lavender :: (Ord a, Floating a) => Colour a
lavender :: forall a. (Ord a, Floating a) => Colour a
lavender = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
230 Word8
230 Word8
250

lavenderblush :: (Ord a, Floating a) => Colour a
lavenderblush :: forall a. (Ord a, Floating a) => Colour a
lavenderblush = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
240 Word8
245

lawngreen :: (Ord a, Floating a) => Colour a
lawngreen :: forall a. (Ord a, Floating a) => Colour a
lawngreen = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
124 Word8
252 Word8
0

lemonchiffon :: (Ord a, Floating a) => Colour a
lemonchiffon :: forall a. (Ord a, Floating a) => Colour a
lemonchiffon = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
250 Word8
205

lightblue :: (Ord a, Floating a) => Colour a
lightblue :: forall a. (Ord a, Floating a) => Colour a
lightblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
173 Word8
216 Word8
230

lightcoral :: (Ord a, Floating a) => Colour a
lightcoral :: forall a. (Ord a, Floating a) => Colour a
lightcoral = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
240 Word8
128 Word8
128

lightcyan :: (Ord a, Floating a) => Colour a
lightcyan :: forall a. (Ord a, Floating a) => Colour a
lightcyan = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
224 Word8
255 Word8
255

lightgoldenrodyellow :: (Ord a, Floating a) => Colour a
lightgoldenrodyellow :: forall a. (Ord a, Floating a) => Colour a
lightgoldenrodyellow = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
250 Word8
250 Word8
210

lightgray :: (Ord a, Floating a) => Colour a
lightgray :: forall a. (Ord a, Floating a) => Colour a
lightgray = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
211 Word8
211 Word8
211

lightgreen :: (Ord a, Floating a) => Colour a
lightgreen :: forall a. (Ord a, Floating a) => Colour a
lightgreen = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
144 Word8
238 Word8
144

lightgrey :: (Ord a, Floating a) => Colour a
lightgrey :: forall a. (Ord a, Floating a) => Colour a
lightgrey = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
211 Word8
211 Word8
211

lightpink :: (Ord a, Floating a) => Colour a
lightpink :: forall a. (Ord a, Floating a) => Colour a
lightpink = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
182 Word8
193

lightsalmon :: (Ord a, Floating a) => Colour a
lightsalmon :: forall a. (Ord a, Floating a) => Colour a
lightsalmon = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
160 Word8
122

lightseagreen :: (Ord a, Floating a) => Colour a
lightseagreen :: forall a. (Ord a, Floating a) => Colour a
lightseagreen = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
32 Word8
178 Word8
170

lightskyblue :: (Ord a, Floating a) => Colour a
lightskyblue :: forall a. (Ord a, Floating a) => Colour a
lightskyblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
135 Word8
206 Word8
250

lightslategray :: (Ord a, Floating a) => Colour a
lightslategray :: forall a. (Ord a, Floating a) => Colour a
lightslategray = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
119 Word8
136 Word8
153

lightslategrey :: (Ord a, Floating a) => Colour a
lightslategrey :: forall a. (Ord a, Floating a) => Colour a
lightslategrey = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
119 Word8
136 Word8
153

lightsteelblue :: (Ord a, Floating a) => Colour a
lightsteelblue :: forall a. (Ord a, Floating a) => Colour a
lightsteelblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
176 Word8
196 Word8
222

lightyellow :: (Ord a, Floating a) => Colour a
lightyellow :: forall a. (Ord a, Floating a) => Colour a
lightyellow = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
255 Word8
224

lime :: (Ord a, Floating a) => Colour a
lime :: forall a. (Ord a, Floating a) => Colour a
lime = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
0 Word8
255 Word8
0

limegreen :: (Ord a, Floating a) => Colour a
limegreen :: forall a. (Ord a, Floating a) => Colour a
limegreen = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
50 Word8
205 Word8
50

linen :: (Ord a, Floating a) => Colour a
linen :: forall a. (Ord a, Floating a) => Colour a
linen = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
250 Word8
240 Word8
230

magenta :: (Ord a, Floating a) => Colour a
magenta :: forall a. (Ord a, Floating a) => Colour a
magenta = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
0 Word8
255

maroon :: (Ord a, Floating a) => Colour a
maroon :: forall a. (Ord a, Floating a) => Colour a
maroon = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
128 Word8
0 Word8
0

mediumaquamarine :: (Ord a, Floating a) => Colour a
mediumaquamarine :: forall a. (Ord a, Floating a) => Colour a
mediumaquamarine = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
102 Word8
205 Word8
170

mediumblue :: (Ord a, Floating a) => Colour a
mediumblue :: forall a. (Ord a, Floating a) => Colour a
mediumblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
0 Word8
0 Word8
205

mediumorchid :: (Ord a, Floating a) => Colour a
mediumorchid :: forall a. (Ord a, Floating a) => Colour a
mediumorchid = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
186 Word8
85 Word8
211

mediumpurple :: (Ord a, Floating a) => Colour a
mediumpurple :: forall a. (Ord a, Floating a) => Colour a
mediumpurple = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
147 Word8
112 Word8
219

mediumseagreen :: (Ord a, Floating a) => Colour a
mediumseagreen :: forall a. (Ord a, Floating a) => Colour a
mediumseagreen = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
60 Word8
179 Word8
113

mediumslateblue :: (Ord a, Floating a) => Colour a
mediumslateblue :: forall a. (Ord a, Floating a) => Colour a
mediumslateblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
123 Word8
104 Word8
238

mediumspringgreen :: (Ord a, Floating a) => Colour a
mediumspringgreen :: forall a. (Ord a, Floating a) => Colour a
mediumspringgreen = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
0 Word8
250 Word8
154

mediumturquoise :: (Ord a, Floating a) => Colour a
mediumturquoise :: forall a. (Ord a, Floating a) => Colour a
mediumturquoise = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
72 Word8
209 Word8
204

mediumvioletred :: (Ord a, Floating a) => Colour a
mediumvioletred :: forall a. (Ord a, Floating a) => Colour a
mediumvioletred = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
199 Word8
21 Word8
133

midnightblue :: (Ord a, Floating a) => Colour a
midnightblue :: forall a. (Ord a, Floating a) => Colour a
midnightblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
25 Word8
25 Word8
112

mintcream :: (Ord a, Floating a) => Colour a
mintcream :: forall a. (Ord a, Floating a) => Colour a
mintcream = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
245 Word8
255 Word8
250

mistyrose :: (Ord a, Floating a) => Colour a
mistyrose :: forall a. (Ord a, Floating a) => Colour a
mistyrose = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
228 Word8
225

moccasin :: (Ord a, Floating a) => Colour a
moccasin :: forall a. (Ord a, Floating a) => Colour a
moccasin = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
228 Word8
181

navajowhite :: (Ord a, Floating a) => Colour a
navajowhite :: forall a. (Ord a, Floating a) => Colour a
navajowhite = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
222 Word8
173

navy :: (Ord a, Floating a) => Colour a
navy :: forall a. (Ord a, Floating a) => Colour a
navy = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
0 Word8
0 Word8
128

oldlace :: (Ord a, Floating a) => Colour a
oldlace :: forall a. (Ord a, Floating a) => Colour a
oldlace = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
253 Word8
245 Word8
230

olive :: (Ord a, Floating a) => Colour a
olive :: forall a. (Ord a, Floating a) => Colour a
olive = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
128 Word8
128 Word8
0

olivedrab :: (Ord a, Floating a) => Colour a
olivedrab :: forall a. (Ord a, Floating a) => Colour a
olivedrab = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
107 Word8
142 Word8
35

orange :: (Ord a, Floating a) => Colour a
orange :: forall a. (Ord a, Floating a) => Colour a
orange = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
165 Word8
0

orangered :: (Ord a, Floating a) => Colour a
orangered :: forall a. (Ord a, Floating a) => Colour a
orangered = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
69 Word8
0

orchid :: (Ord a, Floating a) => Colour a
orchid :: forall a. (Ord a, Floating a) => Colour a
orchid = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
218 Word8
112 Word8
214

palegoldenrod :: (Ord a, Floating a) => Colour a
palegoldenrod :: forall a. (Ord a, Floating a) => Colour a
palegoldenrod = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
238 Word8
232 Word8
170

palegreen :: (Ord a, Floating a) => Colour a
palegreen :: forall a. (Ord a, Floating a) => Colour a
palegreen = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
152 Word8
251 Word8
152

paleturquoise :: (Ord a, Floating a) => Colour a
paleturquoise :: forall a. (Ord a, Floating a) => Colour a
paleturquoise = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
175 Word8
238 Word8
238

palevioletred :: (Ord a, Floating a) => Colour a
palevioletred :: forall a. (Ord a, Floating a) => Colour a
palevioletred = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
219 Word8
112 Word8
147

papayawhip :: (Ord a, Floating a) => Colour a
papayawhip :: forall a. (Ord a, Floating a) => Colour a
papayawhip = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
239 Word8
213

peachpuff :: (Ord a, Floating a) => Colour a
peachpuff :: forall a. (Ord a, Floating a) => Colour a
peachpuff = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
218 Word8
185

peru :: (Ord a, Floating a) => Colour a
peru :: forall a. (Ord a, Floating a) => Colour a
peru = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
205 Word8
133 Word8
63

pink :: (Ord a, Floating a) => Colour a
pink :: forall a. (Ord a, Floating a) => Colour a
pink = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
192 Word8
203

plum :: (Ord a, Floating a) => Colour a
plum :: forall a. (Ord a, Floating a) => Colour a
plum = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
221 Word8
160 Word8
221

powderblue :: (Ord a, Floating a) => Colour a
powderblue :: forall a. (Ord a, Floating a) => Colour a
powderblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
176 Word8
224 Word8
230

purple :: (Ord a, Floating a) => Colour a
purple :: forall a. (Ord a, Floating a) => Colour a
purple = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
128 Word8
0 Word8
128

red :: (Ord a, Floating a) => Colour a
red :: forall a. (Ord a, Floating a) => Colour a
red = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
0 Word8
0

rosybrown :: (Ord a, Floating a) => Colour a
rosybrown :: forall a. (Ord a, Floating a) => Colour a
rosybrown = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
188 Word8
143 Word8
143

royalblue :: (Ord a, Floating a) => Colour a
royalblue :: forall a. (Ord a, Floating a) => Colour a
royalblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
65 Word8
105 Word8
225

saddlebrown :: (Ord a, Floating a) => Colour a
saddlebrown :: forall a. (Ord a, Floating a) => Colour a
saddlebrown = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
139 Word8
69 Word8
19

salmon :: (Ord a, Floating a) => Colour a
salmon :: forall a. (Ord a, Floating a) => Colour a
salmon = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
250 Word8
128 Word8
114

sandybrown :: (Ord a, Floating a) => Colour a
sandybrown :: forall a. (Ord a, Floating a) => Colour a
sandybrown = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
244 Word8
164 Word8
96

seagreen :: (Ord a, Floating a) => Colour a
seagreen :: forall a. (Ord a, Floating a) => Colour a
seagreen = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
46 Word8
139 Word8
87

seashell :: (Ord a, Floating a) => Colour a
seashell :: forall a. (Ord a, Floating a) => Colour a
seashell = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
245 Word8
238

sienna :: (Ord a, Floating a) => Colour a
sienna :: forall a. (Ord a, Floating a) => Colour a
sienna = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
160 Word8
82 Word8
45

silver :: (Ord a, Floating a) => Colour a
silver :: forall a. (Ord a, Floating a) => Colour a
silver = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
192 Word8
192 Word8
192

skyblue :: (Ord a, Floating a) => Colour a
skyblue :: forall a. (Ord a, Floating a) => Colour a
skyblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
135 Word8
206 Word8
235

slateblue :: (Ord a, Floating a) => Colour a
slateblue :: forall a. (Ord a, Floating a) => Colour a
slateblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
106 Word8
90 Word8
205

slategray :: (Ord a, Floating a) => Colour a
slategray :: forall a. (Ord a, Floating a) => Colour a
slategray = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
112 Word8
128 Word8
144

slategrey :: (Ord a, Floating a) => Colour a
slategrey :: forall a. (Ord a, Floating a) => Colour a
slategrey = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
112 Word8
128 Word8
144

snow :: (Ord a, Floating a) => Colour a
snow :: forall a. (Ord a, Floating a) => Colour a
snow = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
250 Word8
250

springgreen :: (Ord a, Floating a) => Colour a
springgreen :: forall a. (Ord a, Floating a) => Colour a
springgreen = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
0 Word8
255 Word8
127

steelblue :: (Ord a, Floating a) => Colour a
steelblue :: forall a. (Ord a, Floating a) => Colour a
steelblue = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
70 Word8
130 Word8
180

tan :: (Ord a, Floating a) => Colour a
tan :: forall a. (Ord a, Floating a) => Colour a
tan = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
210 Word8
180 Word8
140

teal :: (Ord a, Floating a) => Colour a
teal :: forall a. (Ord a, Floating a) => Colour a
teal = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
0 Word8
128 Word8
128

thistle :: (Ord a, Floating a) => Colour a
thistle :: forall a. (Ord a, Floating a) => Colour a
thistle = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
216 Word8
191 Word8
216

tomato :: (Ord a, Floating a) => Colour a
tomato :: forall a. (Ord a, Floating a) => Colour a
tomato = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
99 Word8
71

turquoise :: (Ord a, Floating a) => Colour a
turquoise :: forall a. (Ord a, Floating a) => Colour a
turquoise = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
64 Word8
224 Word8
208

violet :: (Ord a, Floating a) => Colour a
violet :: forall a. (Ord a, Floating a) => Colour a
violet = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
238 Word8
130 Word8
238

wheat :: (Ord a, Floating a) => Colour a
wheat :: forall a. (Ord a, Floating a) => Colour a
wheat = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
245 Word8
222 Word8
179

white :: (Ord a, Floating a) => Colour a
white :: forall a. (Ord a, Floating a) => Colour a
white = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
255 Word8
255

whitesmoke :: (Ord a, Floating a) => Colour a
whitesmoke :: forall a. (Ord a, Floating a) => Colour a
whitesmoke = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
245 Word8
245 Word8
245

yellow :: (Ord a, Floating a) => Colour a
yellow :: forall a. (Ord a, Floating a) => Colour a
yellow = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
255 Word8
255 Word8
0

yellowgreen :: (Ord a, Floating a) => Colour a
yellowgreen :: forall a. (Ord a, Floating a) => Colour a
yellowgreen = forall b.
(Ord b, Floating b) =>
Word8 -> Word8 -> Word8 -> Colour b
sRGB24 Word8
154 Word8
205 Word8
50