aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès2007-11-29 18:10:33 +0100
committerLudovic Courtès2007-11-29 18:10:33 +0100
commit64af8af18e48e9667bc406d936e83d61da5829ff (patch)
tree3eb4a62671aa469aea49cd3c5fd9ba9b46cb1e04
parent26be10e348d19ac5b373cc63c8e0c4bc9b39786a (diff)
downloadskribilo-64af8af18e48e9667bc406d936e83d61da5829ff.tar.gz
skribilo-64af8af18e48e9667bc406d936e83d61da5829ff.tar.lz
skribilo-64af8af18e48e9667bc406d936e83d61da5829ff.zip
color: Use vectors instead of strings for RGB values.
* src/guile/skribilo/color.scm (%rgb-alist): Change cdr to a vector instead of a string. (%convert-color): Adjust accordingly.
-rw-r--r--src/guile/skribilo/color.scm1091
1 files changed, 545 insertions, 546 deletions
diff --git a/src/guile/skribilo/color.scm b/src/guile/skribilo/color.scm
index 5c50e36..2f93cff 100644
--- a/src/guile/skribilo/color.scm
+++ b/src/guile/skribilo/color.scm
@@ -32,558 +32,557 @@
(define %rgb-alist '(
- ("snow" . "255 250 250")
- ("ghostwhite" . "248 248 255")
- ("whitesmoke" . "245 245 245")
- ("gainsboro" . "220 220 220")
- ("floralwhite" . "255 250 240")
- ("oldlace" . "253 245 230")
- ("linen" . "250 240 230")
- ("antiquewhite" . "250 235 215")
- ("papayawhip" . "255 239 213")
- ("blanchedalmond" . "255 235 205")
- ("bisque" . "255 228 196")
- ("peachpuff" . "255 218 185")
- ("navajowhite" . "255 222 173")
- ("moccasin" . "255 228 181")
- ("cornsilk" . "255 248 220")
- ("ivory" . "255 255 240")
- ("lemonchiffon" . "255 250 205")
- ("seashell" . "255 245 238")
- ("honeydew" . "240 255 240")
- ("mintcream" . "245 255 250")
- ("azure" . "240 255 255")
- ("aliceblue" . "240 248 255")
- ("lavender" . "230 230 250")
- ("lavenderblush" . "255 240 245")
- ("mistyrose" . "255 228 225")
- ("white" . "255 255 255")
- ("black" . "0 0 0")
- ("darkslategrey" . "47 79 79")
- ("dimgrey" . "105 105 105")
- ("slategrey" . "112 128 144")
- ("lightslategrey" . "119 136 153")
- ("grey" . "190 190 190")
- ("lightgrey" . "211 211 211")
- ("midnightblue" . "25 25 112")
- ("navy" . "0 0 128")
- ("navyblue" . "0 0 128")
- ("cornflowerblue" . "100 149 237")
- ("darkslateblue" . "72 61 139")
- ("slateblue" . "106 90 205")
- ("mediumslateblue" . "123 104 238")
- ("lightslateblue" . "132 112 255")
- ("mediumblue" . "0 0 205")
- ("royalblue" . "65 105 225")
- ("blue" . "0 0 255")
- ("dodgerblue" . "30 144 255")
- ("deepskyblue" . "0 191 255")
- ("skyblue" . "135 206 235")
- ("lightskyblue" . "135 206 250")
- ("steelblue" . "70 130 180")
- ("lightsteelblue" . "176 196 222")
- ("lightblue" . "173 216 230")
- ("powderblue" . "176 224 230")
- ("paleturquoise" . "175 238 238")
- ("darkturquoise" . "0 206 209")
- ("mediumturquoise" . "72 209 204")
- ("turquoise" . "64 224 208")
- ("cyan" . "0 255 255")
- ("lightcyan" . "224 255 255")
- ("cadetblue" . "95 158 160")
- ("mediumaquamarine" . "102 205 170")
- ("aquamarine" . "127 255 212")
- ("darkgreen" . "0 100 0")
- ("darkolivegreen" . "85 107 47")
- ("darkseagreen" . "143 188 143")
- ("seagreen" . "46 139 87")
- ("mediumseagreen" . "60 179 113")
- ("lightseagreen" . "32 178 170")
- ("palegreen" . "152 251 152")
- ("springgreen" . "0 255 127")
- ("lawngreen" . "124 252 0")
- ("green" . "0 255 0")
- ("chartreuse" . "127 255 0")
- ("mediumspringgreen" . "0 250 154")
- ("greenyellow" . "173 255 47")
- ("limegreen" . "50 205 50")
- ("yellowgreen" . "154 205 50")
- ("forestgreen" . "34 139 34")
- ("olivedrab" . "107 142 35")
- ("darkkhaki" . "189 183 107")
- ("khaki" . "240 230 140")
- ("palegoldenrod" . "238 232 170")
- ("lightgoldenrodyellow" . "250 250 210")
- ("lightyellow" . "255 255 224")
- ("yellow" . "255 255 0")
- ("gold" . "255 215 0")
- ("lightgoldenrod" . "238 221 130")
- ("goldenrod" . "218 165 32")
- ("darkgoldenrod" . "184 134 11")
- ("rosybrown" . "188 143 143")
- ("indianred" . "205 92 92")
- ("saddlebrown" . "139 69 19")
- ("sienna" . "160 82 45")
- ("peru" . "205 133 63")
- ("burlywood" . "222 184 135")
- ("beige" . "245 245 220")
- ("wheat" . "245 222 179")
- ("sandybrown" . "244 164 96")
- ("tan" . "210 180 140")
- ("chocolate" . "210 105 30")
- ("firebrick" . "178 34 34")
- ("brown" . "165 42 42")
- ("darksalmon" . "233 150 122")
- ("salmon" . "250 128 114")
- ("lightsalmon" . "255 160 122")
- ("orange" . "255 165 0")
- ("darkorange" . "255 140 0")
- ("coral" . "255 127 80")
- ("lightcoral" . "240 128 128")
- ("tomato" . "255 99 71")
- ("orangered" . "255 69 0")
- ("red" . "255 0 0")
- ("hotpink" . "255 105 180")
- ("deeppink" . "255 20 147")
- ("pink" . "255 192 203")
- ("lightpink" . "255 182 193")
- ("palevioletred" . "219 112 147")
- ("maroon" . "176 48 96")
- ("mediumvioletred" . "199 21 133")
- ("violetred" . "208 32 144")
- ("magenta" . "255 0 255")
- ("violet" . "238 130 238")
- ("plum" . "221 160 221")
- ("orchid" . "218 112 214")
- ("mediumorchid" . "186 85 211")
- ("darkorchid" . "153 50 204")
- ("darkviolet" . "148 0 211")
- ("blueviolet" . "138 43 226")
- ("purple" . "160 32 240")
- ("mediumpurple" . "147 112 219")
- ("thistle" . "216 191 216")
- ("snow1" . "255 250 250")
- ("snow2" . "238 233 233")
- ("snow3" . "205 201 201")
- ("snow4" . "139 137 137")
- ("seashell1" . "255 245 238")
- ("seashell2" . "238 229 222")
- ("seashell3" . "205 197 191")
- ("seashell4" . "139 134 130")
- ("antiquewhite1" . "255 239 219")
- ("antiquewhite2" . "238 223 204")
- ("antiquewhite3" . "205 192 176")
- ("antiquewhite4" . "139 131 120")
- ("bisque1" . "255 228 196")
- ("bisque2" . "238 213 183")
- ("bisque3" . "205 183 158")
- ("bisque4" . "139 125 107")
- ("peachpuff1" . "255 218 185")
- ("peachpuff2" . "238 203 173")
- ("peachpuff3" . "205 175 149")
- ("peachpuff4" . "139 119 101")
- ("navajowhite1" . "255 222 173")
- ("navajowhite2" . "238 207 161")
- ("navajowhite3" . "205 179 139")
- ("navajowhite4" . "139 121 94")
- ("lemonchiffon1" . "255 250 205")
- ("lemonchiffon2" . "238 233 191")
- ("lemonchiffon3" . "205 201 165")
- ("lemonchiffon4" . "139 137 112")
- ("cornsilk1" . "255 248 220")
- ("cornsilk2" . "238 232 205")
- ("cornsilk3" . "205 200 177")
- ("cornsilk4" . "139 136 120")
- ("ivory1" . "255 255 240")
- ("ivory2" . "238 238 224")
- ("ivory3" . "205 205 193")
- ("ivory4" . "139 139 131")
- ("honeydew1" . "240 255 240")
- ("honeydew2" . "224 238 224")
- ("honeydew3" . "193 205 193")
- ("honeydew4" . "131 139 131")
- ("lavenderblush1" . "255 240 245")
- ("lavenderblush2" . "238 224 229")
- ("lavenderblush3" . "205 193 197")
- ("lavenderblush4" . "139 131 134")
- ("mistyrose1" . "255 228 225")
- ("mistyrose2" . "238 213 210")
- ("mistyrose3" . "205 183 181")
- ("mistyrose4" . "139 125 123")
- ("azure1" . "240 255 255")
- ("azure2" . "224 238 238")
- ("azure3" . "193 205 205")
- ("azure4" . "131 139 139")
- ("slateblue1" . "131 111 255")
- ("slateblue2" . "122 103 238")
- ("slateblue3" . "105 89 205")
- ("slateblue4" . "71 60 139")
- ("royalblue1" . "72 118 255")
- ("royalblue2" . "67 110 238")
- ("royalblue3" . "58 95 205")
- ("royalblue4" . "39 64 139")
- ("blue1" . "0 0 255")
- ("blue2" . "0 0 238")
- ("blue3" . "0 0 205")
- ("blue4" . "0 0 139")
- ("dodgerblue1" . "30 144 255")
- ("dodgerblue2" . "28 134 238")
- ("dodgerblue3" . "24 116 205")
- ("dodgerblue4" . "16 78 139")
- ("steelblue1" . "99 184 255")
- ("steelblue2" . "92 172 238")
- ("steelblue3" . "79 148 205")
- ("steelblue4" . "54 100 139")
- ("deepskyblue1" . "0 191 255")
- ("deepskyblue2" . "0 178 238")
- ("deepskyblue3" . "0 154 205")
- ("deepskyblue4" . "0 104 139")
- ("skyblue1" . "135 206 255")
- ("skyblue2" . "126 192 238")
- ("skyblue3" . "108 166 205")
- ("skyblue4" . "74 112 139")
- ("lightskyblue1" . "176 226 255")
- ("lightskyblue2" . "164 211 238")
- ("lightskyblue3" . "141 182 205")
- ("lightskyblue4" . "96 123 139")
- ("lightsteelblue1" . "202 225 255")
- ("lightsteelblue2" . "188 210 238")
- ("lightsteelblue3" . "162 181 205")
- ("lightsteelblue4" . "110 123 139")
- ("lightblue1" . "191 239 255")
- ("lightblue2" . "178 223 238")
- ("lightblue3" . "154 192 205")
- ("lightblue4" . "104 131 139")
- ("lightcyan1" . "224 255 255")
- ("lightcyan2" . "209 238 238")
- ("lightcyan3" . "180 205 205")
- ("lightcyan4" . "122 139 139")
- ("paleturquoise1" . "187 255 255")
- ("paleturquoise2" . "174 238 238")
- ("paleturquoise3" . "150 205 205")
- ("paleturquoise4" . "102 139 139")
- ("cadetblue1" . "152 245 255")
- ("cadetblue2" . "142 229 238")
- ("cadetblue3" . "122 197 205")
- ("cadetblue4" . "83 134 139")
- ("turquoise1" . "0 245 255")
- ("turquoise2" . "0 229 238")
- ("turquoise3" . "0 197 205")
- ("turquoise4" . "0 134 139")
- ("cyan1" . "0 255 255")
- ("cyan2" . "0 238 238")
- ("cyan3" . "0 205 205")
- ("cyan4" . "0 139 139")
- ("aquamarine1" . "127 255 212")
- ("aquamarine2" . "118 238 198")
- ("aquamarine3" . "102 205 170")
- ("aquamarine4" . "69 139 116")
- ("darkseagreen1" . "193 255 193")
- ("darkseagreen2" . "180 238 180")
- ("darkseagreen3" . "155 205 155")
- ("darkseagreen4" . "105 139 105")
- ("seagreen1" . "84 255 159")
- ("seagreen2" . "78 238 148")
- ("seagreen3" . "67 205 128")
- ("seagreen4" . "46 139 87")
- ("palegreen1" . "154 255 154")
- ("palegreen2" . "144 238 144")
- ("palegreen3" . "124 205 124")
- ("palegreen4" . "84 139 84")
- ("springgreen1" . "0 255 127")
- ("springgreen2" . "0 238 118")
- ("springgreen3" . "0 205 102")
- ("springgreen4" . "0 139 69")
- ("green1" . "0 255 0")
- ("green2" . "0 238 0")
- ("green3" . "0 205 0")
- ("green4" . "0 139 0")
- ("chartreuse1" . "127 255 0")
- ("chartreuse2" . "118 238 0")
- ("chartreuse3" . "102 205 0")
- ("chartreuse4" . "69 139 0")
- ("olivedrab1" . "192 255 62")
- ("olivedrab2" . "179 238 58")
- ("olivedrab3" . "154 205 50")
- ("olivedrab4" . "105 139 34")
- ("darkolivegreen1" . "202 255 112")
- ("darkolivegreen2" . "188 238 104")
- ("darkolivegreen3" . "162 205 90")
- ("darkolivegreen4" . "110 139 61")
- ("khaki1" . "255 246 143")
- ("khaki2" . "238 230 133")
- ("khaki3" . "205 198 115")
- ("khaki4" . "139 134 78")
- ("lightgoldenrod1" . "255 236 139")
- ("lightgoldenrod2" . "238 220 130")
- ("lightgoldenrod3" . "205 190 112")
- ("lightgoldenrod4" . "139 129 76")
- ("lightyellow1" . "255 255 224")
- ("lightyellow2" . "238 238 209")
- ("lightyellow3" . "205 205 180")
- ("lightyellow4" . "139 139 122")
- ("yellow1" . "255 255 0")
- ("yellow2" . "238 238 0")
- ("yellow3" . "205 205 0")
- ("yellow4" . "139 139 0")
- ("gold1" . "255 215 0")
- ("gold2" . "238 201 0")
- ("gold3" . "205 173 0")
- ("gold4" . "139 117 0")
- ("goldenrod1" . "255 193 37")
- ("goldenrod2" . "238 180 34")
- ("goldenrod3" . "205 155 29")
- ("goldenrod4" . "139 105 20")
- ("darkgoldenrod1" . "255 185 15")
- ("darkgoldenrod2" . "238 173 14")
- ("darkgoldenrod3" . "205 149 12")
- ("darkgoldenrod4" . "139 101 8")
- ("rosybrown1" . "255 193 193")
- ("rosybrown2" . "238 180 180")
- ("rosybrown3" . "205 155 155")
- ("rosybrown4" . "139 105 105")
- ("indianred1" . "255 106 106")
- ("indianred2" . "238 99 99")
- ("indianred3" . "205 85 85")
- ("indianred4" . "139 58 58")
- ("sienna1" . "255 130 71")
- ("sienna2" . "238 121 66")
- ("sienna3" . "205 104 57")
- ("sienna4" . "139 71 38")
- ("burlywood1" . "255 211 155")
- ("burlywood2" . "238 197 145")
- ("burlywood3" . "205 170 125")
- ("burlywood4" . "139 115 85")
- ("wheat1" . "255 231 186")
- ("wheat2" . "238 216 174")
- ("wheat3" . "205 186 150")
- ("wheat4" . "139 126 102")
- ("tan1" . "255 165 79")
- ("tan2" . "238 154 73")
- ("tan3" . "205 133 63")
- ("tan4" . "139 90 43")
- ("chocolate1" . "255 127 36")
- ("chocolate2" . "238 118 33")
- ("chocolate3" . "205 102 29")
- ("chocolate4" . "139 69 19")
- ("firebrick1" . "255 48 48")
- ("firebrick2" . "238 44 44")
- ("firebrick3" . "205 38 38")
- ("firebrick4" . "139 26 26")
- ("brown1" . "255 64 64")
- ("brown2" . "238 59 59")
- ("brown3" . "205 51 51")
- ("brown4" . "139 35 35")
- ("salmon1" . "255 140 105")
- ("salmon2" . "238 130 98")
- ("salmon3" . "205 112 84")
- ("salmon4" . "139 76 57")
- ("lightsalmon1" . "255 160 122")
- ("lightsalmon2" . "238 149 114")
- ("lightsalmon3" . "205 129 98")
- ("lightsalmon4" . "139 87 66")
- ("orange1" . "255 165 0")
- ("orange2" . "238 154 0")
- ("orange3" . "205 133 0")
- ("orange4" . "139 90 0")
- ("darkorange1" . "255 127 0")
- ("darkorange2" . "238 118 0")
- ("darkorange3" . "205 102 0")
- ("darkorange4" . "139 69 0")
- ("coral1" . "255 114 86")
- ("coral2" . "238 106 80")
- ("coral3" . "205 91 69")
- ("coral4" . "139 62 47")
- ("tomato1" . "255 99 71")
- ("tomato2" . "238 92 66")
- ("tomato3" . "205 79 57")
- ("tomato4" . "139 54 38")
- ("orangered1" . "255 69 0")
- ("orangered2" . "238 64 0")
- ("orangered3" . "205 55 0")
- ("orangered4" . "139 37 0")
- ("red1" . "255 0 0")
- ("red2" . "238 0 0")
- ("red3" . "205 0 0")
- ("red4" . "139 0 0")
- ("deeppink1" . "255 20 147")
- ("deeppink2" . "238 18 137")
- ("deeppink3" . "205 16 118")
- ("deeppink4" . "139 10 80")
- ("hotpink1" . "255 110 180")
- ("hotpink2" . "238 106 167")
- ("hotpink3" . "205 96 144")
- ("hotpink4" . "139 58 98")
- ("pink1" . "255 181 197")
- ("pink2" . "238 169 184")
- ("pink3" . "205 145 158")
- ("pink4" . "139 99 108")
- ("lightpink1" . "255 174 185")
- ("lightpink2" . "238 162 173")
- ("lightpink3" . "205 140 149")
- ("lightpink4" . "139 95 101")
- ("palevioletred1" . "255 130 171")
- ("palevioletred2" . "238 121 159")
- ("palevioletred3" . "205 104 137")
- ("palevioletred4" . "139 71 93")
- ("maroon1" . "255 52 179")
- ("maroon2" . "238 48 167")
- ("maroon3" . "205 41 144")
- ("maroon4" . "139 28 98")
- ("violetred1" . "255 62 150")
- ("violetred2" . "238 58 140")
- ("violetred3" . "205 50 120")
- ("violetred4" . "139 34 82")
- ("magenta1" . "255 0 255")
- ("magenta2" . "238 0 238")
- ("magenta3" . "205 0 205")
- ("magenta4" . "139 0 139")
- ("orchid1" . "255 131 250")
- ("orchid2" . "238 122 233")
- ("orchid3" . "205 105 201")
- ("orchid4" . "139 71 137")
- ("plum1" . "255 187 255")
- ("plum2" . "238 174 238")
- ("plum3" . "205 150 205")
- ("plum4" . "139 102 139")
- ("mediumorchid1" . "224 102 255")
- ("mediumorchid2" . "209 95 238")
- ("mediumorchid3" . "180 82 205")
- ("mediumorchid4" . "122 55 139")
- ("darkorchid1" . "191 62 255")
- ("darkorchid2" . "178 58 238")
- ("darkorchid3" . "154 50 205")
- ("darkorchid4" . "104 34 139")
- ("purple1" . "155 48 255")
- ("purple2" . "145 44 238")
- ("purple3" . "125 38 205")
- ("purple4" . "85 26 139")
- ("mediumpurple1" . "171 130 255")
- ("mediumpurple2" . "159 121 238")
- ("mediumpurple3" . "137 104 205")
- ("mediumpurple4" . "93 71 139")
- ("thistle1" . "255 225 255")
- ("thistle2" . "238 210 238")
- ("thistle3" . "205 181 205")
- ("thistle4" . "139 123 139")
- ("grey0" . "0 0 0")
- ("grey1" . "3 3 3")
- ("grey2" . "5 5 5")
- ("grey3" . "8 8 8")
- ("grey4" . "10 10 10")
- ("grey5" . "13 13 13")
- ("grey6" . "15 15 15")
- ("grey7" . "18 18 18")
- ("grey8" . "20 20 20")
- ("grey9" . "23 23 23")
- ("grey10" . "26 26 26")
- ("grey11" . "28 28 28")
- ("grey12" . "31 31 31")
- ("grey13" . "33 33 33")
- ("grey14" . "36 36 36")
- ("grey15" . "38 38 38")
- ("grey16" . "41 41 41")
- ("grey17" . "43 43 43")
- ("grey18" . "46 46 46")
- ("grey19" . "48 48 48")
- ("grey20" . "51 51 51")
- ("grey21" . "54 54 54")
- ("grey22" . "56 56 56")
- ("grey23" . "59 59 59")
- ("grey24" . "61 61 61")
- ("grey25" . "64 64 64")
- ("grey26" . "66 66 66")
- ("grey27" . "69 69 69")
- ("grey28" . "71 71 71")
- ("grey29" . "74 74 74")
- ("grey30" . "77 77 77")
- ("grey31" . "79 79 79")
- ("grey32" . "82 82 82")
- ("grey33" . "84 84 84")
- ("grey34" . "87 87 87")
- ("grey35" . "89 89 89")
- ("grey36" . "92 92 92")
- ("grey37" . "94 94 94")
- ("grey38" . "97 97 97")
- ("grey39" . "99 99 99")
- ("grey40" . "102 102 102")
- ("grey41" . "105 105 105")
- ("grey42" . "107 107 107")
- ("grey43" . "110 110 110")
- ("grey44" . "112 112 112")
- ("grey45" . "115 115 115")
- ("grey46" . "117 117 117")
- ("grey47" . "120 120 120")
- ("grey48" . "122 122 122")
- ("grey49" . "125 125 125")
- ("grey50" . "127 127 127")
- ("grey51" . "130 130 130")
- ("grey52" . "133 133 133")
- ("grey53" . "135 135 135")
- ("grey54" . "138 138 138")
- ("grey55" . "140 140 140")
- ("grey56" . "143 143 143")
- ("grey57" . "145 145 145")
- ("grey58" . "148 148 148")
- ("grey59" . "150 150 150")
- ("grey60" . "153 153 153")
- ("grey61" . "156 156 156")
- ("grey62" . "158 158 158")
- ("grey63" . "161 161 161")
- ("grey64" . "163 163 163")
- ("grey65" . "166 166 166")
- ("grey66" . "168 168 168")
- ("grey67" . "171 171 171")
- ("grey68" . "173 173 173")
- ("grey69" . "176 176 176")
- ("grey70" . "179 179 179")
- ("grey71" . "181 181 181")
- ("grey72" . "184 184 184")
- ("grey73" . "186 186 186")
- ("grey74" . "189 189 189")
- ("grey75" . "191 191 191")
- ("grey76" . "194 194 194")
- ("grey77" . "196 196 196")
- ("grey78" . "199 199 199")
- ("grey79" . "201 201 201")
- ("grey80" . "204 204 204")
- ("grey81" . "207 207 207")
- ("grey82" . "209 209 209")
- ("grey83" . "212 212 212")
- ("grey84" . "214 214 214")
- ("grey85" . "217 217 217")
- ("grey86" . "219 219 219")
- ("grey87" . "222 222 222")
- ("grey88" . "224 224 224")
- ("grey89" . "227 227 227")
- ("grey90" . "229 229 229")
- ("grey91" . "232 232 232")
- ("grey92" . "235 235 235")
- ("grey93" . "237 237 237")
- ("grey94" . "240 240 240")
- ("grey95" . "242 242 242")
- ("grey96" . "245 245 245")
- ("grey97" . "247 247 247")
- ("grey98" . "250 250 250")
- ("grey99" . "252 252 252")
- ("grey100" . "255 255 255")
- ("darkgrey" . "169 169 169")
- ("darkblue" . "0 0 139")
- ("darkcyan" . "0 139 139")
- ("darkmagenta" . "139 0 139")
- ("darkred" . "139 0 0")
- ("lightgreen" . "144 238 144")
- ("lightred" . "255 127 127")))
+ ("snow" . #(255 250 250))
+ ("ghostwhite" . #(248 248 255))
+ ("whitesmoke" . #(245 245 245))
+ ("gainsboro" . #(220 220 220))
+ ("floralwhite" . #(255 250 240))
+ ("oldlace" . #(253 245 230))
+ ("linen" . #(250 240 230))
+ ("antiquewhite" . #(250 235 215))
+ ("papayawhip" . #(255 239 213))
+ ("blanchedalmond" . #(255 235 205))
+ ("bisque" . #(255 228 196))
+ ("peachpuff" . #(255 218 185))
+ ("navajowhite" . #(255 222 173))
+ ("moccasin" . #(255 228 181))
+ ("cornsilk" . #(255 248 220))
+ ("ivory" . #(255 255 240))
+ ("lemonchiffon" . #(255 250 205))
+ ("seashell" . #(255 245 238))
+ ("honeydew" . #(240 255 240))
+ ("mintcream" . #(245 255 250))
+ ("azure" . #(240 255 255))
+ ("aliceblue" . #(240 248 255))
+ ("lavender" . #(230 230 250))
+ ("lavenderblush" . #(255 240 245))
+ ("mistyrose" . #(255 228 225))
+ ("white" . #(255 255 255))
+ ("black" . #(0 0 0))
+ ("darkslategrey" . #(47 79 79))
+ ("dimgrey" . #(105 105 105))
+ ("slategrey" . #(112 128 144))
+ ("lightslategrey" . #(119 136 153))
+ ("grey" . #(190 190 190))
+ ("lightgrey" . #(211 211 211))
+ ("midnightblue" . #(25 25 112))
+ ("navy" . #(0 0 128))
+ ("navyblue" . #(0 0 128))
+ ("cornflowerblue" . #(100 149 237))
+ ("darkslateblue" . #(72 61 139))
+ ("slateblue" . #(106 90 205))
+ ("mediumslateblue" . #(123 104 238))
+ ("lightslateblue" . #(132 112 255))
+ ("mediumblue" . #(0 0 205))
+ ("royalblue" . #(65 105 225))
+ ("blue" . #(0 0 255))
+ ("dodgerblue" . #(30 144 255))
+ ("deepskyblue" . #(0 191 255))
+ ("skyblue" . #(135 206 235))
+ ("lightskyblue" . #(135 206 250))
+ ("steelblue" . #(70 130 180))
+ ("lightsteelblue" . #(176 196 222))
+ ("lightblue" . #(173 216 230))
+ ("powderblue" . #(176 224 230))
+ ("paleturquoise" . #(175 238 238))
+ ("darkturquoise" . #(0 206 209))
+ ("mediumturquoise" . #(72 209 204))
+ ("turquoise" . #(64 224 208))
+ ("cyan" . #(0 255 255))
+ ("lightcyan" . #(224 255 255))
+ ("cadetblue" . #(95 158 160))
+ ("mediumaquamarine" . #(102 205 170))
+ ("aquamarine" . #(127 255 212))
+ ("darkgreen" . #(0 100 0))
+ ("darkolivegreen" . #(85 107 47))
+ ("darkseagreen" . #(143 188 143))
+ ("seagreen" . #(46 139 87))
+ ("mediumseagreen" . #(60 179 113))
+ ("lightseagreen" . #(32 178 170))
+ ("palegreen" . #(152 251 152))
+ ("springgreen" . #(0 255 127))
+ ("lawngreen" . #(124 252 0))
+ ("green" . #(0 255 0))
+ ("chartreuse" . #(127 255 0))
+ ("mediumspringgreen" . #(0 250 154))
+ ("greenyellow" . #(173 255 47))
+ ("limegreen" . #(50 205 50))
+ ("yellowgreen" . #(154 205 50))
+ ("forestgreen" . #(34 139 34))
+ ("olivedrab" . #(107 142 35))
+ ("darkkhaki" . #(189 183 107))
+ ("khaki" . #(240 230 140))
+ ("palegoldenrod" . #(238 232 170))
+ ("lightgoldenrodyellow" . #(250 250 210))
+ ("lightyellow" . #(255 255 224))
+ ("yellow" . #(255 255 0))
+ ("gold" . #(255 215 0))
+ ("lightgoldenrod" . #(238 221 130))
+ ("goldenrod" . #(218 165 32))
+ ("darkgoldenrod" . #(184 134 11))
+ ("rosybrown" . #(188 143 143))
+ ("indianred" . #(205 92 92))
+ ("saddlebrown" . #(139 69 19))
+ ("sienna" . #(160 82 45))
+ ("peru" . #(205 133 63))
+ ("burlywood" . #(222 184 135))
+ ("beige" . #(245 245 220))
+ ("wheat" . #(245 222 179))
+ ("sandybrown" . #(244 164 96))
+ ("tan" . #(210 180 140))
+ ("chocolate" . #(210 105 30))
+ ("firebrick" . #(178 34 34))
+ ("brown" . #(165 42 42))
+ ("darksalmon" . #(233 150 122))
+ ("salmon" . #(250 128 114))
+ ("lightsalmon" . #(255 160 122))
+ ("orange" . #(255 165 0))
+ ("darkorange" . #(255 140 0))
+ ("coral" . #(255 127 80))
+ ("lightcoral" . #(240 128 128))
+ ("tomato" . #(255 99 71))
+ ("orangered" . #(255 69 0))
+ ("red" . #(255 0 0))
+ ("hotpink" . #(255 105 180))
+ ("deeppink" . #(255 20 147))
+ ("pink" . #(255 192 203))
+ ("lightpink" . #(255 182 193))
+ ("palevioletred" . #(219 112 147))
+ ("maroon" . #(176 48 96))
+ ("mediumvioletred" . #(199 21 133))
+ ("violetred" . #(208 32 144))
+ ("magenta" . #(255 0 255))
+ ("violet" . #(238 130 238))
+ ("plum" . #(221 160 221))
+ ("orchid" . #(218 112 214))
+ ("mediumorchid" . #(186 85 211))
+ ("darkorchid" . #(153 50 204))
+ ("darkviolet" . #(148 0 211))
+ ("blueviolet" . #(138 43 226))
+ ("purple" . #(160 32 240))
+ ("mediumpurple" . #(147 112 219))
+ ("thistle" . #(216 191 216))
+ ("snow1" . #(255 250 250))
+ ("snow2" . #(238 233 233))
+ ("snow3" . #(205 201 201))
+ ("snow4" . #(139 137 137))
+ ("seashell1" . #(255 245 238))
+ ("seashell2" . #(238 229 222))
+ ("seashell3" . #(205 197 191))
+ ("seashell4" . #(139 134 130))
+ ("antiquewhite1" . #(255 239 219))
+ ("antiquewhite2" . #(238 223 204))
+ ("antiquewhite3" . #(205 192 176))
+ ("antiquewhite4" . #(139 131 120))
+ ("bisque1" . #(255 228 196))
+ ("bisque2" . #(238 213 183))
+ ("bisque3" . #(205 183 158))
+ ("bisque4" . #(139 125 107))
+ ("peachpuff1" . #(255 218 185))
+ ("peachpuff2" . #(238 203 173))
+ ("peachpuff3" . #(205 175 149))
+ ("peachpuff4" . #(139 119 101))
+ ("navajowhite1" . #(255 222 173))
+ ("navajowhite2" . #(238 207 161))
+ ("navajowhite3" . #(205 179 139))
+ ("navajowhite4" . #(139 121 94))
+ ("lemonchiffon1" . #(255 250 205))
+ ("lemonchiffon2" . #(238 233 191))
+ ("lemonchiffon3" . #(205 201 165))
+ ("lemonchiffon4" . #(139 137 112))
+ ("cornsilk1" . #(255 248 220))
+ ("cornsilk2" . #(238 232 205))
+ ("cornsilk3" . #(205 200 177))
+ ("cornsilk4" . #(139 136 120))
+ ("ivory1" . #(255 255 240))
+ ("ivory2" . #(238 238 224))
+ ("ivory3" . #(205 205 193))
+ ("ivory4" . #(139 139 131))
+ ("honeydew1" . #(240 255 240))
+ ("honeydew2" . #(224 238 224))
+ ("honeydew3" . #(193 205 193))
+ ("honeydew4" . #(131 139 131))
+ ("lavenderblush1" . #(255 240 245))
+ ("lavenderblush2" . #(238 224 229))
+ ("lavenderblush3" . #(205 193 197))
+ ("lavenderblush4" . #(139 131 134))
+ ("mistyrose1" . #(255 228 225))
+ ("mistyrose2" . #(238 213 210))
+ ("mistyrose3" . #(205 183 181))
+ ("mistyrose4" . #(139 125 123))
+ ("azure1" . #(240 255 255))
+ ("azure2" . #(224 238 238))
+ ("azure3" . #(193 205 205))
+ ("azure4" . #(131 139 139))
+ ("slateblue1" . #(131 111 255))
+ ("slateblue2" . #(122 103 238))
+ ("slateblue3" . #(105 89 205))
+ ("slateblue4" . #(71 60 139))
+ ("royalblue1" . #(72 118 255))
+ ("royalblue2" . #(67 110 238))
+ ("royalblue3" . #(58 95 205))
+ ("royalblue4" . #(39 64 139))
+ ("blue1" . #(0 0 255))
+ ("blue2" . #(0 0 238))
+ ("blue3" . #(0 0 205))
+ ("blue4" . #(0 0 139))
+ ("dodgerblue1" . #(30 144 255))
+ ("dodgerblue2" . #(28 134 238))
+ ("dodgerblue3" . #(24 116 205))
+ ("dodgerblue4" . #(16 78 139))
+ ("steelblue1" . #(99 184 255))
+ ("steelblue2" . #(92 172 238))
+ ("steelblue3" . #(79 148 205))
+ ("steelblue4" . #(54 100 139))
+ ("deepskyblue1" . #(0 191 255))
+ ("deepskyblue2" . #(0 178 238))
+ ("deepskyblue3" . #(0 154 205))
+ ("deepskyblue4" . #(0 104 139))
+ ("skyblue1" . #(135 206 255))
+ ("skyblue2" . #(126 192 238))
+ ("skyblue3" . #(108 166 205))
+ ("skyblue4" . #(74 112 139))
+ ("lightskyblue1" . #(176 226 255))
+ ("lightskyblue2" . #(164 211 238))
+ ("lightskyblue3" . #(141 182 205))
+ ("lightskyblue4" . #(96 123 139))
+ ("lightsteelblue1" . #(202 225 255))
+ ("lightsteelblue2" . #(188 210 238))
+ ("lightsteelblue3" . #(162 181 205))
+ ("lightsteelblue4" . #(110 123 139))
+ ("lightblue1" . #(191 239 255))
+ ("lightblue2" . #(178 223 238))
+ ("lightblue3" . #(154 192 205))
+ ("lightblue4" . #(104 131 139))
+ ("lightcyan1" . #(224 255 255))
+ ("lightcyan2" . #(209 238 238))
+ ("lightcyan3" . #(180 205 205))
+ ("lightcyan4" . #(122 139 139))
+ ("paleturquoise1" . #(187 255 255))
+ ("paleturquoise2" . #(174 238 238))
+ ("paleturquoise3" . #(150 205 205))
+ ("paleturquoise4" . #(102 139 139))
+ ("cadetblue1" . #(152 245 255))
+ ("cadetblue2" . #(142 229 238))
+ ("cadetblue3" . #(122 197 205))
+ ("cadetblue4" . #(83 134 139))
+ ("turquoise1" . #(0 245 255))
+ ("turquoise2" . #(0 229 238))
+ ("turquoise3" . #(0 197 205))
+ ("turquoise4" . #(0 134 139))
+ ("cyan1" . #(0 255 255))
+ ("cyan2" . #(0 238 238))
+ ("cyan3" . #(0 205 205))
+ ("cyan4" . #(0 139 139))
+ ("aquamarine1" . #(127 255 212))
+ ("aquamarine2" . #(118 238 198))
+ ("aquamarine3" . #(102 205 170))
+ ("aquamarine4" . #(69 139 116))
+ ("darkseagreen1" . #(193 255 193))
+ ("darkseagreen2" . #(180 238 180))
+ ("darkseagreen3" . #(155 205 155))
+ ("darkseagreen4" . #(105 139 105))
+ ("seagreen1" . #(84 255 159))
+ ("seagreen2" . #(78 238 148))
+ ("seagreen3" . #(67 205 128))
+ ("seagreen4" . #(46 139 87))
+ ("palegreen1" . #(154 255 154))
+ ("palegreen2" . #(144 238 144))
+ ("palegreen3" . #(124 205 124))
+ ("palegreen4" . #(84 139 84))
+ ("springgreen1" . #(0 255 127))
+ ("springgreen2" . #(0 238 118))
+ ("springgreen3" . #(0 205 102))
+ ("springgreen4" . #(0 139 69))
+ ("green1" . #(0 255 0))
+ ("green2" . #(0 238 0))
+ ("green3" . #(0 205 0))
+ ("green4" . #(0 139 0))
+ ("chartreuse1" . #(127 255 0))
+ ("chartreuse2" . #(118 238 0))
+ ("chartreuse3" . #(102 205 0))
+ ("chartreuse4" . #(69 139 0))
+ ("olivedrab1" . #(192 255 62))
+ ("olivedrab2" . #(179 238 58))
+ ("olivedrab3" . #(154 205 50))
+ ("olivedrab4" . #(105 139 34))
+ ("darkolivegreen1" . #(202 255 112))
+ ("darkolivegreen2" . #(188 238 104))
+ ("darkolivegreen3" . #(162 205 90))
+ ("darkolivegreen4" . #(110 139 61))
+ ("khaki1" . #(255 246 143))
+ ("khaki2" . #(238 230 133))
+ ("khaki3" . #(205 198 115))
+ ("khaki4" . #(139 134 78))
+ ("lightgoldenrod1" . #(255 236 139))
+ ("lightgoldenrod2" . #(238 220 130))
+ ("lightgoldenrod3" . #(205 190 112))
+ ("lightgoldenrod4" . #(139 129 76))
+ ("lightyellow1" . #(255 255 224))
+ ("lightyellow2" . #(238 238 209))
+ ("lightyellow3" . #(205 205 180))
+ ("lightyellow4" . #(139 139 122))
+ ("yellow1" . #(255 255 0))
+ ("yellow2" . #(238 238 0))
+ ("yellow3" . #(205 205 0))
+ ("yellow4" . #(139 139 0))
+ ("gold1" . #(255 215 0))
+ ("gold2" . #(238 201 0))
+ ("gold3" . #(205 173 0))
+ ("gold4" . #(139 117 0))
+ ("goldenrod1" . #(255 193 37))
+ ("goldenrod2" . #(238 180 34))
+ ("goldenrod3" . #(205 155 29))
+ ("goldenrod4" . #(139 105 20))
+ ("darkgoldenrod1" . #(255 185 15))
+ ("darkgoldenrod2" . #(238 173 14))
+ ("darkgoldenrod3" . #(205 149 12))
+ ("darkgoldenrod4" . #(139 101 8))
+ ("rosybrown1" . #(255 193 193))
+ ("rosybrown2" . #(238 180 180))
+ ("rosybrown3" . #(205 155 155))
+ ("rosybrown4" . #(139 105 105))
+ ("indianred1" . #(255 106 106))
+ ("indianred2" . #(238 99 99))
+ ("indianred3" . #(205 85 85))
+ ("indianred4" . #(139 58 58))
+ ("sienna1" . #(255 130 71))
+ ("sienna2" . #(238 121 66))
+ ("sienna3" . #(205 104 57))
+ ("sienna4" . #(139 71 38))
+ ("burlywood1" . #(255 211 155))
+ ("burlywood2" . #(238 197 145))
+ ("burlywood3" . #(205 170 125))
+ ("burlywood4" . #(139 115 85))
+ ("wheat1" . #(255 231 186))
+ ("wheat2" . #(238 216 174))
+ ("wheat3" . #(205 186 150))
+ ("wheat4" . #(139 126 102))
+ ("tan1" . #(255 165 79))
+ ("tan2" . #(238 154 73))
+ ("tan3" . #(205 133 63))
+ ("tan4" . #(139 90 43))
+ ("chocolate1" . #(255 127 36))
+ ("chocolate2" . #(238 118 33))
+ ("chocolate3" . #(205 102 29))
+ ("chocolate4" . #(139 69 19))
+ ("firebrick1" . #(255 48 48))
+ ("firebrick2" . #(238 44 44))
+ ("firebrick3" . #(205 38 38))
+ ("firebrick4" . #(139 26 26))
+ ("brown1" . #(255 64 64))
+ ("brown2" . #(238 59 59))
+ ("brown3" . #(205 51 51))
+ ("brown4" . #(139 35 35))
+ ("salmon1" . #(255 140 105))
+ ("salmon2" . #(238 130 98))
+ ("salmon3" . #(205 112 84))
+ ("salmon4" . #(139 76 57))
+ ("lightsalmon1" . #(255 160 122))
+ ("lightsalmon2" . #(238 149 114))
+ ("lightsalmon3" . #(205 129 98))
+ ("lightsalmon4" . #(139 87 66))
+ ("orange1" . #(255 165 0))
+ ("orange2" . #(238 154 0))
+ ("orange3" . #(205 133 0))
+ ("orange4" . #(139 90 0))
+ ("darkorange1" . #(255 127 0))
+ ("darkorange2" . #(238 118 0))
+ ("darkorange3" . #(205 102 0))
+ ("darkorange4" . #(139 69 0))
+ ("coral1" . #(255 114 86))
+ ("coral2" . #(238 106 80))
+ ("coral3" . #(205 91 69))
+ ("coral4" . #(139 62 47))
+ ("tomato1" . #(255 99 71))
+ ("tomato2" . #(238 92 66))
+ ("tomato3" . #(205 79 57))
+ ("tomato4" . #(139 54 38))
+ ("orangered1" . #(255 69 0))
+ ("orangered2" . #(238 64 0))
+ ("orangered3" . #(205 55 0))
+ ("orangered4" . #(139 37 0))
+ ("red1" . #(255 0 0))
+ ("red2" . #(238 0 0))
+ ("red3" . #(205 0 0))
+ ("red4" . #(139 0 0))
+ ("deeppink1" . #(255 20 147))
+ ("deeppink2" . #(238 18 137))
+ ("deeppink3" . #(205 16 118))
+ ("deeppink4" . #(139 10 80))
+ ("hotpink1" . #(255 110 180))
+ ("hotpink2" . #(238 106 167))
+ ("hotpink3" . #(205 96 144))
+ ("hotpink4" . #(139 58 98))
+ ("pink1" . #(255 181 197))
+ ("pink2" . #(238 169 184))
+ ("pink3" . #(205 145 158))
+ ("pink4" . #(139 99 108))
+ ("lightpink1" . #(255 174 185))
+ ("lightpink2" . #(238 162 173))
+ ("lightpink3" . #(205 140 149))
+ ("lightpink4" . #(139 95 101))
+ ("palevioletred1" . #(255 130 171))
+ ("palevioletred2" . #(238 121 159))
+ ("palevioletred3" . #(205 104 137))
+ ("palevioletred4" . #(139 71 93))
+ ("maroon1" . #(255 52 179))
+ ("maroon2" . #(238 48 167))
+ ("maroon3" . #(205 41 144))
+ ("maroon4" . #(139 28 98))
+ ("violetred1" . #(255 62 150))
+ ("violetred2" . #(238 58 140))
+ ("violetred3" . #(205 50 120))
+ ("violetred4" . #(139 34 82))
+ ("magenta1" . #(255 0 255))
+ ("magenta2" . #(238 0 238))
+ ("magenta3" . #(205 0 205))
+ ("magenta4" . #(139 0 139))
+ ("orchid1" . #(255 131 250))
+ ("orchid2" . #(238 122 233))
+ ("orchid3" . #(205 105 201))
+ ("orchid4" . #(139 71 137))
+ ("plum1" . #(255 187 255))
+ ("plum2" . #(238 174 238))
+ ("plum3" . #(205 150 205))
+ ("plum4" . #(139 102 139))
+ ("mediumorchid1" . #(224 102 255))
+ ("mediumorchid2" . #(209 95 238))
+ ("mediumorchid3" . #(180 82 205))
+ ("mediumorchid4" . #(122 55 139))
+ ("darkorchid1" . #(191 62 255))
+ ("darkorchid2" . #(178 58 238))
+ ("darkorchid3" . #(154 50 205))
+ ("darkorchid4" . #(104 34 139))
+ ("purple1" . #(155 48 255))
+ ("purple2" . #(145 44 238))
+ ("purple3" . #(125 38 205))
+ ("purple4" . #(85 26 139))
+ ("mediumpurple1" . #(171 130 255))
+ ("mediumpurple2" . #(159 121 238))
+ ("mediumpurple3" . #(137 104 205))
+ ("mediumpurple4" . #(93 71 139))
+ ("thistle1" . #(255 225 255))
+ ("thistle2" . #(238 210 238))
+ ("thistle3" . #(205 181 205))
+ ("thistle4" . #(139 123 139))
+ ("grey0" . #(0 0 0))
+ ("grey1" . #(3 3 3))
+ ("grey2" . #(5 5 5))
+ ("grey3" . #(8 8 8))
+ ("grey4" . #(10 10 10))
+ ("grey5" . #(13 13 13))
+ ("grey6" . #(15 15 15))
+ ("grey7" . #(18 18 18))
+ ("grey8" . #(20 20 20))
+ ("grey9" . #(23 23 23))
+ ("grey10" . #(26 26 26))
+ ("grey11" . #(28 28 28))
+ ("grey12" . #(31 31 31))
+ ("grey13" . #(33 33 33))
+ ("grey14" . #(36 36 36))
+ ("grey15" . #(38 38 38))
+ ("grey16" . #(41 41 41))
+ ("grey17" . #(43 43 43))
+ ("grey18" . #(46 46 46))
+ ("grey19" . #(48 48 48))
+ ("grey20" . #(51 51 51))
+ ("grey21" . #(54 54 54))
+ ("grey22" . #(56 56 56))
+ ("grey23" . #(59 59 59))
+ ("grey24" . #(61 61 61))
+ ("grey25" . #(64 64 64))
+ ("grey26" . #(66 66 66))
+ ("grey27" . #(69 69 69))
+ ("grey28" . #(71 71 71))
+ ("grey29" . #(74 74 74))
+ ("grey30" . #(77 77 77))
+ ("grey31" . #(79 79 79))
+ ("grey32" . #(82 82 82))
+ ("grey33" . #(84 84 84))
+ ("grey34" . #(87 87 87))
+ ("grey35" . #(89 89 89))
+ ("grey36" . #(92 92 92))
+ ("grey37" . #(94 94 94))
+ ("grey38" . #(97 97 97))
+ ("grey39" . #(99 99 99))
+ ("grey40" . #(102 102 102))
+ ("grey41" . #(105 105 105))
+ ("grey42" . #(107 107 107))
+ ("grey43" . #(110 110 110))
+ ("grey44" . #(112 112 112))
+ ("grey45" . #(115 115 115))
+ ("grey46" . #(117 117 117))
+ ("grey47" . #(120 120 120))
+ ("grey48" . #(122 122 122))
+ ("grey49" . #(125 125 125))
+ ("grey50" . #(127 127 127))
+ ("grey51" . #(130 130 130))
+ ("grey52" . #(133 133 133))
+ ("grey53" . #(135 135 135))
+ ("grey54" . #(138 138 138))
+ ("grey55" . #(140 140 140))
+ ("grey56" . #(143 143 143))
+ ("grey57" . #(145 145 145))
+ ("grey58" . #(148 148 148))
+ ("grey59" . #(150 150 150))
+ ("grey60" . #(153 153 153))
+ ("grey61" . #(156 156 156))
+ ("grey62" . #(158 158 158))
+ ("grey63" . #(161 161 161))
+ ("grey64" . #(163 163 163))
+ ("grey65" . #(166 166 166))
+ ("grey66" . #(168 168 168))
+ ("grey67" . #(171 171 171))
+ ("grey68" . #(173 173 173))
+ ("grey69" . #(176 176 176))
+ ("grey70" . #(179 179 179))
+ ("grey71" . #(181 181 181))
+ ("grey72" . #(184 184 184))
+ ("grey73" . #(186 186 186))
+ ("grey74" . #(189 189 189))
+ ("grey75" . #(191 191 191))
+ ("grey76" . #(194 194 194))
+ ("grey77" . #(196 196 196))
+ ("grey78" . #(199 199 199))
+ ("grey79" . #(201 201 201))
+ ("grey80" . #(204 204 204))
+ ("grey81" . #(207 207 207))
+ ("grey82" . #(209 209 209))
+ ("grey83" . #(212 212 212))
+ ("grey84" . #(214 214 214))
+ ("grey85" . #(217 217 217))
+ ("grey86" . #(219 219 219))
+ ("grey87" . #(222 222 222))
+ ("grey88" . #(224 224 224))
+ ("grey89" . #(227 227 227))
+ ("grey90" . #(229 229 229))
+ ("grey91" . #(232 232 232))
+ ("grey92" . #(235 235 235))
+ ("grey93" . #(237 237 237))
+ ("grey94" . #(240 240 240))
+ ("grey95" . #(242 242 242))
+ ("grey96" . #(245 245 245))
+ ("grey97" . #(247 247 247))
+ ("grey98" . #(250 250 250))
+ ("grey99" . #(252 252 252))
+ ("grey100" . #(255 255 255))
+ ("darkgrey" . #(169 169 169))
+ ("darkblue" . #(0 0 139))
+ ("darkcyan" . #(0 139 139))
+ ("darkmagenta" . #(139 0 139))
+ ("darkred" . #(139 0 0))
+ ("lightgreen" . #(144 238 144))
+ ("lightred" . #(255 127 127))))
(define (%convert-color str)
(let ((col (assoc str %rgb-alist)))
(cond
(col
- (let* ((p (open-input-string (cdr col)))
- (r (read p))
- (g (read p))
- (b (read p)))
+ (let ((r (vector-ref (cdr col) 0))
+ (g (vector-ref (cdr col) 1))
+ (b (vector-ref (cdr col) 2)))
(values r g b)))
((and (string? str) (eq? (string-ref str 0) #\#) (= (string-length str) 7))
(values (string->number (substring str 1 3) 16)