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