-----------------------------------------------------------------------------
{-# LANGUAGE OverloadedStrings #-}
-----------------------------------------------------------------------------
-- |
-- Module      :  Miso.Style.Color
-- Copyright   :  (C) 2016-2025 David M. Johnson
-- License     :  BSD3-style (see the file LICENSE)
-- Maintainer  :  David M. Johnson <code@dmj.io>
-- Stability   :  experimental
-- Portability :  non-portable
-----------------------------------------------------------------------------
module Miso.Style.Color
  ( -- *** Types
    Color (RGBA, HSL, Hex)
    -- *** Smart constructor
  , rgba
  , hsl
  , hex
    -- *** Render
  , renderColor
    -- *** Colors
  , transparent
  , 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
  , green
  , greenyellow
  , grey
  , 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           Miso.String (MisoString)
import qualified Miso.String as MS
-----------------------------------------------------------------------------
import           Prelude hiding (tan)
-----------------------------------------------------------------------------
data Color
  = RGBA Int Int Int Double
  | HSL Int Int Int
  | Hex MisoString
  deriving (Int -> Color -> ShowS
[Color] -> ShowS
Color -> String
(Int -> Color -> ShowS)
-> (Color -> String) -> ([Color] -> ShowS) -> Show Color
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> Color -> ShowS
showsPrec :: Int -> Color -> ShowS
$cshow :: Color -> String
show :: Color -> String
$cshowList :: [Color] -> ShowS
showList :: [Color] -> ShowS
Show, Color -> Color -> Bool
(Color -> Color -> Bool) -> (Color -> Color -> Bool) -> Eq Color
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Color -> Color -> Bool
== :: Color -> Color -> Bool
$c/= :: Color -> Color -> Bool
/= :: Color -> Color -> Bool
Eq)
-----------------------------------------------------------------------------
renderColor :: Color -> MisoString
renderColor :: Color -> MisoString
renderColor (RGBA Int
r Int
g Int
b Double
a) = MisoString
"rgba(" MisoString -> MisoString -> MisoString
forall a. Semigroup a => a -> a -> a
<> MisoString
values MisoString -> MisoString -> MisoString
forall a. Semigroup a => a -> a -> a
<> MisoString
")"
  where
    values :: MisoString
values = MisoString -> [MisoString] -> MisoString
MS.intercalate MisoString
","
      [ Int -> MisoString
forall str. ToMisoString str => str -> MisoString
MS.ms Int
r
      , Int -> MisoString
forall str. ToMisoString str => str -> MisoString
MS.ms Int
g
      , Int -> MisoString
forall str. ToMisoString str => str -> MisoString
MS.ms Int
b
      , Double -> MisoString
forall str. ToMisoString str => str -> MisoString
MS.ms Double
a
      ]
renderColor (HSL Int
h Int
s Int
l) = MisoString
"hsl(" MisoString -> MisoString -> MisoString
forall a. Semigroup a => a -> a -> a
<> MisoString
values MisoString -> MisoString -> MisoString
forall a. Semigroup a => a -> a -> a
<> MisoString
")"
  where
    values :: MisoString
values = MisoString -> [MisoString] -> MisoString
MS.intercalate MisoString
","
      [ Int -> MisoString
forall str. ToMisoString str => str -> MisoString
MS.ms Int
h
      , Int -> MisoString
forall str. ToMisoString str => str -> MisoString
MS.ms Int
s
      , Int -> MisoString
forall str. ToMisoString str => str -> MisoString
MS.ms Int
l
      ]
renderColor (Hex MisoString
s) = MisoString
"#" MisoString -> MisoString -> MisoString
forall a. Semigroup a => a -> a -> a
<> MisoString
s
-----------------------------------------------------------------------------
rgba :: Int -> Int -> Int -> Double -> Color
rgba :: Int -> Int -> Int -> Double -> Color
rgba = Int -> Int -> Int -> Double -> Color
RGBA
-----------------------------------------------------------------------------
hsl :: Int -> Int -> Int -> Color
hsl :: Int -> Int -> Int -> Color
hsl = Int -> Int -> Int -> Color
HSL
-----------------------------------------------------------------------------
hex :: MisoString -> Color
hex :: MisoString -> Color
hex = MisoString -> Color
Hex
-----------------------------------------------------------------------------
transparent :: Color
transparent :: Color
transparent = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
0 Int
0 Double
0
-----------------------------------------------------------------------------
aliceblue :: Color
aliceblue :: Color
aliceblue = Int -> Int -> Int -> Double -> Color
rgba Int
240 Int
248 Int
255 Double
1
-----------------------------------------------------------------------------
antiquewhite :: Color
antiquewhite :: Color
antiquewhite = Int -> Int -> Int -> Double -> Color
rgba Int
250 Int
235 Int
215 Double
1
-----------------------------------------------------------------------------
aqua :: Color
aqua :: Color
aqua = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
255 Int
255 Double
1
-----------------------------------------------------------------------------
aquamarine :: Color
aquamarine :: Color
aquamarine = Int -> Int -> Int -> Double -> Color
rgba Int
127 Int
255 Int
212 Double
1
-----------------------------------------------------------------------------
azure :: Color
azure :: Color
azure = Int -> Int -> Int -> Double -> Color
rgba Int
240 Int
255 Int
255 Double
1
-----------------------------------------------------------------------------
beige :: Color
beige :: Color
beige = Int -> Int -> Int -> Double -> Color
rgba Int
245 Int
245 Int
220 Double
1
-----------------------------------------------------------------------------
bisque :: Color
bisque :: Color
bisque = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
228 Int
196 Double
1
-----------------------------------------------------------------------------
black :: Color
black :: Color
black = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
0 Int
0 Double
1
-----------------------------------------------------------------------------
blanchedalmond :: Color
blanchedalmond :: Color
blanchedalmond = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
235 Int
205 Double
1
-----------------------------------------------------------------------------
blue :: Color
blue :: Color
blue = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
0 Int
255 Double
1
-----------------------------------------------------------------------------
blueviolet :: Color
blueviolet :: Color
blueviolet = Int -> Int -> Int -> Double -> Color
rgba Int
138 Int
43 Int
226 Double
1
-----------------------------------------------------------------------------
brown :: Color
brown :: Color
brown = Int -> Int -> Int -> Double -> Color
rgba Int
165 Int
42 Int
42 Double
1
-----------------------------------------------------------------------------
burlywood :: Color
burlywood :: Color
burlywood = Int -> Int -> Int -> Double -> Color
rgba Int
222 Int
184 Int
135 Double
1
-----------------------------------------------------------------------------
cadetblue :: Color
cadetblue :: Color
cadetblue = Int -> Int -> Int -> Double -> Color
rgba Int
95 Int
158 Int
160 Double
1
-----------------------------------------------------------------------------
chartreuse :: Color
chartreuse :: Color
chartreuse = Int -> Int -> Int -> Double -> Color
rgba Int
127 Int
255 Int
0 Double
1
-----------------------------------------------------------------------------
chocolate :: Color
chocolate :: Color
chocolate = Int -> Int -> Int -> Double -> Color
rgba Int
210 Int
105 Int
30 Double
1
-----------------------------------------------------------------------------
coral :: Color
coral :: Color
coral = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
127 Int
80 Double
1
-----------------------------------------------------------------------------
cornflowerblue :: Color
cornflowerblue :: Color
cornflowerblue = Int -> Int -> Int -> Double -> Color
rgba Int
100 Int
149 Int
237 Double
1
-----------------------------------------------------------------------------
cornsilk :: Color
cornsilk :: Color
cornsilk = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
248 Int
220 Double
1
-----------------------------------------------------------------------------
crimson :: Color
crimson :: Color
crimson = Int -> Int -> Int -> Double -> Color
rgba Int
220 Int
20 Int
60 Double
1
-----------------------------------------------------------------------------
cyan :: Color
cyan :: Color
cyan = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
255 Int
255 Double
1
-----------------------------------------------------------------------------
darkblue :: Color
darkblue :: Color
darkblue = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
0 Int
139 Double
1
-----------------------------------------------------------------------------
darkcyan :: Color
darkcyan :: Color
darkcyan = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
139 Int
139 Double
1
-----------------------------------------------------------------------------
darkgoldenrod :: Color
darkgoldenrod :: Color
darkgoldenrod = Int -> Int -> Int -> Double -> Color
rgba Int
184 Int
134 Int
11 Double
1
-----------------------------------------------------------------------------
darkgray :: Color
darkgray :: Color
darkgray = Int -> Int -> Int -> Double -> Color
rgba Int
169 Int
169 Int
169 Double
1
-----------------------------------------------------------------------------
darkgreen :: Color
darkgreen :: Color
darkgreen = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
100 Int
0 Double
1
-----------------------------------------------------------------------------
darkgrey :: Color
darkgrey :: Color
darkgrey = Int -> Int -> Int -> Double -> Color
rgba Int
169 Int
169 Int
169 Double
1
-----------------------------------------------------------------------------
darkkhaki :: Color
darkkhaki :: Color
darkkhaki = Int -> Int -> Int -> Double -> Color
rgba Int
189 Int
183 Int
107 Double
1
-----------------------------------------------------------------------------
darkmagenta :: Color
darkmagenta :: Color
darkmagenta = Int -> Int -> Int -> Double -> Color
rgba Int
139 Int
0 Int
139 Double
1
-----------------------------------------------------------------------------
darkolivegreen :: Color
darkolivegreen :: Color
darkolivegreen = Int -> Int -> Int -> Double -> Color
rgba Int
85 Int
107 Int
47 Double
1
-----------------------------------------------------------------------------
darkorange :: Color
darkorange :: Color
darkorange = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
140 Int
0 Double
1
-----------------------------------------------------------------------------
darkorchid :: Color
darkorchid :: Color
darkorchid = Int -> Int -> Int -> Double -> Color
rgba Int
153 Int
50 Int
204 Double
1
-----------------------------------------------------------------------------
darkred :: Color
darkred :: Color
darkred = Int -> Int -> Int -> Double -> Color
rgba Int
139 Int
0 Int
0 Double
1
-----------------------------------------------------------------------------
darksalmon :: Color
darksalmon :: Color
darksalmon = Int -> Int -> Int -> Double -> Color
rgba Int
233 Int
150 Int
122 Double
1
-----------------------------------------------------------------------------
darkseagreen :: Color
darkseagreen :: Color
darkseagreen = Int -> Int -> Int -> Double -> Color
rgba Int
143 Int
188 Int
143 Double
1
-----------------------------------------------------------------------------
darkslateblue :: Color
darkslateblue :: Color
darkslateblue = Int -> Int -> Int -> Double -> Color
rgba Int
72 Int
61 Int
139 Double
1
-----------------------------------------------------------------------------
darkslategray :: Color
darkslategray :: Color
darkslategray = Int -> Int -> Int -> Double -> Color
rgba Int
47 Int
79 Int
79 Double
1
-----------------------------------------------------------------------------
darkslategrey :: Color
darkslategrey :: Color
darkslategrey = Int -> Int -> Int -> Double -> Color
rgba Int
47 Int
79 Int
79 Double
1
-----------------------------------------------------------------------------
darkturquoise :: Color
darkturquoise :: Color
darkturquoise = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
206 Int
209 Double
1
-----------------------------------------------------------------------------
darkviolet :: Color
darkviolet :: Color
darkviolet = Int -> Int -> Int -> Double -> Color
rgba Int
148 Int
0 Int
211 Double
1
-----------------------------------------------------------------------------
deeppink :: Color
deeppink :: Color
deeppink = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
20 Int
147 Double
1
-----------------------------------------------------------------------------
deepskyblue :: Color
deepskyblue :: Color
deepskyblue = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
191 Int
255 Double
1
-----------------------------------------------------------------------------
dimgray :: Color
dimgray :: Color
dimgray = Int -> Int -> Int -> Double -> Color
rgba Int
105 Int
105 Int
105 Double
1
-----------------------------------------------------------------------------
dimgrey :: Color
dimgrey :: Color
dimgrey = Int -> Int -> Int -> Double -> Color
rgba Int
105 Int
105 Int
105 Double
1
-----------------------------------------------------------------------------
dodgerblue :: Color
dodgerblue :: Color
dodgerblue = Int -> Int -> Int -> Double -> Color
rgba Int
30 Int
144 Int
255 Double
1
-----------------------------------------------------------------------------
firebrick :: Color
firebrick :: Color
firebrick = Int -> Int -> Int -> Double -> Color
rgba Int
178 Int
34 Int
34 Double
1
-----------------------------------------------------------------------------
floralwhite :: Color
floralwhite :: Color
floralwhite = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
250 Int
240 Double
1
-----------------------------------------------------------------------------
forestgreen :: Color
forestgreen :: Color
forestgreen = Int -> Int -> Int -> Double -> Color
rgba Int
34 Int
139 Int
34 Double
1
-----------------------------------------------------------------------------
fuchsia :: Color
fuchsia :: Color
fuchsia = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
0 Int
255 Double
1
-----------------------------------------------------------------------------
gainsboro :: Color
gainsboro :: Color
gainsboro = Int -> Int -> Int -> Double -> Color
rgba Int
220 Int
220 Int
220 Double
1
-----------------------------------------------------------------------------
ghostwhite :: Color
ghostwhite :: Color
ghostwhite = Int -> Int -> Int -> Double -> Color
rgba Int
248 Int
248 Int
255 Double
1
-----------------------------------------------------------------------------
gold :: Color
gold :: Color
gold = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
215 Int
0 Double
1
-----------------------------------------------------------------------------
goldenrod :: Color
goldenrod :: Color
goldenrod = Int -> Int -> Int -> Double -> Color
rgba Int
218 Int
165 Int
32 Double
1
-----------------------------------------------------------------------------
gray :: Color
gray :: Color
gray = Int -> Int -> Int -> Double -> Color
rgba Int
128 Int
128 Int
128 Double
1
-----------------------------------------------------------------------------
green :: Color
green :: Color
green = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
128 Int
0 Double
1
-----------------------------------------------------------------------------
greenyellow :: Color
greenyellow :: Color
greenyellow = Int -> Int -> Int -> Double -> Color
rgba Int
173 Int
255 Int
47 Double
1
-----------------------------------------------------------------------------
grey :: Color
grey :: Color
grey = Int -> Int -> Int -> Double -> Color
rgba Int
128 Int
128 Int
128 Double
1
-----------------------------------------------------------------------------
honeydew :: Color
honeydew :: Color
honeydew = Int -> Int -> Int -> Double -> Color
rgba Int
240 Int
255 Int
240 Double
1
-----------------------------------------------------------------------------
hotpink :: Color
hotpink :: Color
hotpink = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
105 Int
180 Double
1
-----------------------------------------------------------------------------
indianred :: Color
indianred :: Color
indianred = Int -> Int -> Int -> Double -> Color
rgba Int
205 Int
92 Int
92 Double
1
-----------------------------------------------------------------------------
indigo :: Color
indigo :: Color
indigo = Int -> Int -> Int -> Double -> Color
rgba Int
75 Int
0 Int
130 Double
1
-----------------------------------------------------------------------------
ivory :: Color
ivory :: Color
ivory = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
255 Int
240 Double
1
-----------------------------------------------------------------------------
khaki :: Color
khaki :: Color
khaki = Int -> Int -> Int -> Double -> Color
rgba Int
240 Int
230 Int
140 Double
1
-----------------------------------------------------------------------------
lavender :: Color
lavender :: Color
lavender = Int -> Int -> Int -> Double -> Color
rgba Int
230 Int
230 Int
250 Double
1
-----------------------------------------------------------------------------
lavenderblush :: Color
lavenderblush :: Color
lavenderblush = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
240 Int
245 Double
1
-----------------------------------------------------------------------------
lawngreen :: Color
lawngreen :: Color
lawngreen = Int -> Int -> Int -> Double -> Color
rgba Int
124 Int
252 Int
0 Double
1
-----------------------------------------------------------------------------
lemonchiffon :: Color
lemonchiffon :: Color
lemonchiffon = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
250 Int
205 Double
1
-----------------------------------------------------------------------------
lightblue :: Color
lightblue :: Color
lightblue = Int -> Int -> Int -> Double -> Color
rgba Int
173 Int
216 Int
230 Double
1
-----------------------------------------------------------------------------
lightcoral :: Color
lightcoral :: Color
lightcoral = Int -> Int -> Int -> Double -> Color
rgba Int
240 Int
128 Int
128 Double
1
-----------------------------------------------------------------------------
lightcyan :: Color
lightcyan :: Color
lightcyan = Int -> Int -> Int -> Double -> Color
rgba Int
224 Int
255 Int
255 Double
1
-----------------------------------------------------------------------------
lightgoldenrodyellow :: Color
lightgoldenrodyellow :: Color
lightgoldenrodyellow = Int -> Int -> Int -> Double -> Color
rgba Int
250 Int
250 Int
210 Double
1
-----------------------------------------------------------------------------
lightgray :: Color
lightgray :: Color
lightgray = Int -> Int -> Int -> Double -> Color
rgba Int
211 Int
211 Int
211 Double
1
-----------------------------------------------------------------------------
lightgreen :: Color
lightgreen :: Color
lightgreen = Int -> Int -> Int -> Double -> Color
rgba Int
144 Int
238 Int
144 Double
1
-----------------------------------------------------------------------------
lightgrey :: Color
lightgrey :: Color
lightgrey = Int -> Int -> Int -> Double -> Color
rgba Int
211 Int
211 Int
211 Double
1
-----------------------------------------------------------------------------
lightpink :: Color
lightpink :: Color
lightpink = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
182 Int
193 Double
1
-----------------------------------------------------------------------------
lightsalmon :: Color
lightsalmon :: Color
lightsalmon = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
160 Int
122 Double
1
-----------------------------------------------------------------------------
lightseagreen :: Color
lightseagreen :: Color
lightseagreen = Int -> Int -> Int -> Double -> Color
rgba Int
32 Int
178 Int
170 Double
1
-----------------------------------------------------------------------------
lightskyblue :: Color
lightskyblue :: Color
lightskyblue = Int -> Int -> Int -> Double -> Color
rgba Int
135 Int
206 Int
250 Double
1
-----------------------------------------------------------------------------
lightslategray :: Color
lightslategray :: Color
lightslategray = Int -> Int -> Int -> Double -> Color
rgba Int
119 Int
136 Int
153 Double
1
-----------------------------------------------------------------------------
lightslategrey :: Color
lightslategrey :: Color
lightslategrey = Int -> Int -> Int -> Double -> Color
rgba Int
119 Int
136 Int
153 Double
1
-----------------------------------------------------------------------------
lightsteelblue :: Color
lightsteelblue :: Color
lightsteelblue = Int -> Int -> Int -> Double -> Color
rgba Int
176 Int
196 Int
222 Double
1
-----------------------------------------------------------------------------
lightyellow :: Color
lightyellow :: Color
lightyellow = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
255 Int
224 Double
1
-----------------------------------------------------------------------------
lime :: Color
lime :: Color
lime = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
255 Int
0 Double
1
-----------------------------------------------------------------------------
limegreen :: Color
limegreen :: Color
limegreen = Int -> Int -> Int -> Double -> Color
rgba Int
50 Int
205 Int
50 Double
1
-----------------------------------------------------------------------------
linen :: Color
linen :: Color
linen = Int -> Int -> Int -> Double -> Color
rgba Int
250 Int
240 Int
230 Double
1
-----------------------------------------------------------------------------
magenta :: Color
magenta :: Color
magenta = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
0 Int
255 Double
1
-----------------------------------------------------------------------------
maroon :: Color
maroon :: Color
maroon = Int -> Int -> Int -> Double -> Color
rgba Int
128 Int
0 Int
0 Double
1
-----------------------------------------------------------------------------
mediumaquamarine :: Color
mediumaquamarine :: Color
mediumaquamarine = Int -> Int -> Int -> Double -> Color
rgba Int
102 Int
205 Int
170 Double
1
-----------------------------------------------------------------------------
mediumblue :: Color
mediumblue :: Color
mediumblue = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
0 Int
205 Double
1
-----------------------------------------------------------------------------
mediumorchid :: Color
mediumorchid :: Color
mediumorchid = Int -> Int -> Int -> Double -> Color
rgba Int
186 Int
85 Int
211 Double
1
-----------------------------------------------------------------------------
mediumpurple :: Color
mediumpurple :: Color
mediumpurple = Int -> Int -> Int -> Double -> Color
rgba Int
147 Int
112 Int
219 Double
1
-----------------------------------------------------------------------------
mediumseagreen :: Color
mediumseagreen :: Color
mediumseagreen = Int -> Int -> Int -> Double -> Color
rgba Int
60 Int
179 Int
113 Double
1
-----------------------------------------------------------------------------
mediumslateblue :: Color
mediumslateblue :: Color
mediumslateblue = Int -> Int -> Int -> Double -> Color
rgba Int
123 Int
104 Int
238 Double
1
-----------------------------------------------------------------------------
mediumspringgreen :: Color
mediumspringgreen :: Color
mediumspringgreen = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
250 Int
154 Double
1
-----------------------------------------------------------------------------
mediumturquoise :: Color
mediumturquoise :: Color
mediumturquoise = Int -> Int -> Int -> Double -> Color
rgba Int
72 Int
209 Int
204 Double
1
-----------------------------------------------------------------------------
mediumvioletred :: Color
mediumvioletred :: Color
mediumvioletred = Int -> Int -> Int -> Double -> Color
rgba Int
199 Int
21 Int
133 Double
1
-----------------------------------------------------------------------------
midnightblue :: Color
midnightblue :: Color
midnightblue = Int -> Int -> Int -> Double -> Color
rgba Int
25 Int
25 Int
112 Double
1
-----------------------------------------------------------------------------
mintcream :: Color
mintcream :: Color
mintcream = Int -> Int -> Int -> Double -> Color
rgba Int
245 Int
255 Int
250 Double
1
-----------------------------------------------------------------------------
mistyrose :: Color
mistyrose :: Color
mistyrose = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
228 Int
225 Double
1
-----------------------------------------------------------------------------
moccasin :: Color
moccasin :: Color
moccasin = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
228 Int
181 Double
1
-----------------------------------------------------------------------------
navajowhite :: Color
navajowhite :: Color
navajowhite = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
222 Int
173 Double
1
-----------------------------------------------------------------------------
navy :: Color
navy :: Color
navy = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
0 Int
128 Double
1
-----------------------------------------------------------------------------
oldlace :: Color
oldlace :: Color
oldlace = Int -> Int -> Int -> Double -> Color
rgba Int
253 Int
245 Int
230 Double
1
-----------------------------------------------------------------------------
olive :: Color
olive :: Color
olive = Int -> Int -> Int -> Double -> Color
rgba Int
128 Int
128 Int
0 Double
1
-----------------------------------------------------------------------------
olivedrab :: Color
olivedrab :: Color
olivedrab = Int -> Int -> Int -> Double -> Color
rgba Int
107 Int
142 Int
35 Double
1
-----------------------------------------------------------------------------
orange :: Color
orange :: Color
orange = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
165 Int
0 Double
1
-----------------------------------------------------------------------------
orangered :: Color
orangered :: Color
orangered = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
69 Int
0 Double
1
-----------------------------------------------------------------------------
orchid :: Color
orchid :: Color
orchid = Int -> Int -> Int -> Double -> Color
rgba Int
218 Int
112 Int
214 Double
1
-----------------------------------------------------------------------------
palegoldenrod :: Color
palegoldenrod :: Color
palegoldenrod = Int -> Int -> Int -> Double -> Color
rgba Int
238 Int
232 Int
170 Double
1
-----------------------------------------------------------------------------
palegreen :: Color
palegreen :: Color
palegreen = Int -> Int -> Int -> Double -> Color
rgba Int
152 Int
251 Int
152 Double
1
-----------------------------------------------------------------------------
paleturquoise :: Color
paleturquoise :: Color
paleturquoise = Int -> Int -> Int -> Double -> Color
rgba Int
175 Int
238 Int
238 Double
1
-----------------------------------------------------------------------------
palevioletred :: Color
palevioletred :: Color
palevioletred = Int -> Int -> Int -> Double -> Color
rgba Int
219 Int
112 Int
147 Double
1
-----------------------------------------------------------------------------
papayawhip :: Color
papayawhip :: Color
papayawhip = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
239 Int
213 Double
1
-----------------------------------------------------------------------------
peachpuff :: Color
peachpuff :: Color
peachpuff = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
218 Int
185 Double
1
-----------------------------------------------------------------------------
peru :: Color
peru :: Color
peru = Int -> Int -> Int -> Double -> Color
rgba Int
205 Int
133 Int
63 Double
1
-----------------------------------------------------------------------------
pink :: Color
pink :: Color
pink = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
192 Int
203 Double
1
-----------------------------------------------------------------------------
plum :: Color
plum :: Color
plum = Int -> Int -> Int -> Double -> Color
rgba Int
221 Int
160 Int
221 Double
1
-----------------------------------------------------------------------------
powderblue :: Color
powderblue :: Color
powderblue = Int -> Int -> Int -> Double -> Color
rgba Int
176 Int
224 Int
230 Double
1
-----------------------------------------------------------------------------
purple :: Color
purple :: Color
purple = Int -> Int -> Int -> Double -> Color
rgba Int
128 Int
0 Int
128 Double
1
-----------------------------------------------------------------------------
red :: Color
red :: Color
red = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
0 Int
0 Double
1
-----------------------------------------------------------------------------
rosybrown :: Color
rosybrown :: Color
rosybrown = Int -> Int -> Int -> Double -> Color
rgba Int
188 Int
143 Int
143 Double
1
-----------------------------------------------------------------------------
royalblue :: Color
royalblue :: Color
royalblue = Int -> Int -> Int -> Double -> Color
rgba Int
65 Int
105 Int
225 Double
1
-----------------------------------------------------------------------------
saddlebrown :: Color
saddlebrown :: Color
saddlebrown = Int -> Int -> Int -> Double -> Color
rgba Int
139 Int
69 Int
19 Double
1
-----------------------------------------------------------------------------
salmon :: Color
salmon :: Color
salmon = Int -> Int -> Int -> Double -> Color
rgba Int
250 Int
128 Int
114 Double
1
-----------------------------------------------------------------------------
sandybrown :: Color
sandybrown :: Color
sandybrown = Int -> Int -> Int -> Double -> Color
rgba Int
244 Int
164 Int
96 Double
1
-----------------------------------------------------------------------------
seagreen :: Color
seagreen :: Color
seagreen = Int -> Int -> Int -> Double -> Color
rgba Int
46 Int
139 Int
87 Double
1
-----------------------------------------------------------------------------
seashell :: Color
seashell :: Color
seashell = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
245 Int
238 Double
1
-----------------------------------------------------------------------------
sienna :: Color
sienna :: Color
sienna = Int -> Int -> Int -> Double -> Color
rgba Int
160 Int
82 Int
45 Double
1
-----------------------------------------------------------------------------
silver :: Color
silver :: Color
silver = Int -> Int -> Int -> Double -> Color
rgba Int
192 Int
192 Int
192 Double
1
-----------------------------------------------------------------------------
skyblue :: Color
skyblue :: Color
skyblue = Int -> Int -> Int -> Double -> Color
rgba Int
135 Int
206 Int
235 Double
1
-----------------------------------------------------------------------------
slateblue :: Color
slateblue :: Color
slateblue = Int -> Int -> Int -> Double -> Color
rgba Int
106 Int
90 Int
205 Double
1
-----------------------------------------------------------------------------
slategray :: Color
slategray :: Color
slategray = Int -> Int -> Int -> Double -> Color
rgba Int
112 Int
128 Int
144 Double
1
-----------------------------------------------------------------------------
slategrey :: Color
slategrey :: Color
slategrey = Int -> Int -> Int -> Double -> Color
rgba Int
112 Int
128 Int
144 Double
1
-----------------------------------------------------------------------------
snow :: Color
snow :: Color
snow = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
250 Int
250 Double
1
-----------------------------------------------------------------------------
springgreen :: Color
springgreen :: Color
springgreen = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
255 Int
127 Double
1
-----------------------------------------------------------------------------
steelblue :: Color
steelblue :: Color
steelblue = Int -> Int -> Int -> Double -> Color
rgba Int
70 Int
130 Int
180 Double
1
-----------------------------------------------------------------------------
tan :: Color
tan :: Color
tan = Int -> Int -> Int -> Double -> Color
rgba Int
210 Int
180 Int
140 Double
1
-----------------------------------------------------------------------------
teal :: Color
teal :: Color
teal = Int -> Int -> Int -> Double -> Color
rgba Int
0 Int
128 Int
128 Double
1
-----------------------------------------------------------------------------
thistle :: Color
thistle :: Color
thistle = Int -> Int -> Int -> Double -> Color
rgba Int
216 Int
191 Int
216 Double
1
-----------------------------------------------------------------------------
tomato :: Color
tomato :: Color
tomato = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
99 Int
71 Double
1
-----------------------------------------------------------------------------
turquoise :: Color
turquoise :: Color
turquoise = Int -> Int -> Int -> Double -> Color
rgba Int
64 Int
224 Int
208 Double
1
-----------------------------------------------------------------------------
violet :: Color
violet :: Color
violet = Int -> Int -> Int -> Double -> Color
rgba Int
238 Int
130 Int
238 Double
1
-----------------------------------------------------------------------------
wheat :: Color
wheat :: Color
wheat = Int -> Int -> Int -> Double -> Color
rgba Int
245 Int
222 Int
179 Double
1
-----------------------------------------------------------------------------
white :: Color
white :: Color
white = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
255 Int
255 Double
1
-----------------------------------------------------------------------------
whitesmoke :: Color
whitesmoke :: Color
whitesmoke = Int -> Int -> Int -> Double -> Color
rgba Int
245 Int
245 Int
245 Double
1
-----------------------------------------------------------------------------
yellow :: Color
yellow :: Color
yellow = Int -> Int -> Int -> Double -> Color
rgba Int
255 Int
255 Int
0 Double
1
-----------------------------------------------------------------------------
yellowgreen :: Color
yellowgreen :: Color
yellowgreen = Int -> Int -> Int -> Double -> Color
rgba Int
154 Int
205 Int
50 Double
1
-----------------------------------------------------------------------------