stdlib/source/documentation/lux/data/color/named.lux


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195

(.require
 [library
  [lux (.except)
   ["$" documentation]
   [data
    ["[0]" text (.only)
     ["%" \\format (.only format)]]
    [collection
     ["[0]" list (.use "[1]#[0]" monoid)]]]
   [math
    [number
     ["[0]" nat (.use "hex#[0]" hex)]]]]]
 [\\library
  ["[0]" / (.only)
   [//
    ["[0]" rgb]]]])

(def description
  (template (_ <name>)
    [($.definition <name>
       (let [[red green blue] <name>
             [_ name] (symbol <name>)]
         (format "R:" (hex#encoded red)
                 " G:" (hex#encoded green)
                 " B:" (hex#encoded blue)
                 " | " (text.replaced "_" " " name))))]))

(`` (def .public documentation
      (List $.Documentation)
      (let [a-c (list (,, (with_template [<name>]
                            [(description <name>)]

                            [/.alice_blue]
                            [/.antique_white]
                            [/.aqua]
                            [/.aquamarine]
                            [/.azure]
                            [/.beige]
                            [/.bisque]
                            [/.black]
                            [/.blanched_almond]
                            [/.blue]
                            [/.blue_violet]
                            [/.brown]
                            [/.burly_wood]
                            [/.cadet_blue]
                            [/.chartreuse]
                            [/.chocolate]
                            [/.coral]
                            [/.cornflower_blue]
                            [/.cornsilk]
                            [/.crimson]
                            [/.cyan]
                            )))
            d-k (list (,, (with_template [<name>]
                            [(description <name>)]

                            [/.dark_blue]
                            [/.dark_cyan]
                            [/.dark_goldenrod]
                            [/.dark_gray]
                            [/.dark_green]
                            [/.dark_khaki]
                            [/.dark_magenta]
                            [/.dark_olive_green]
                            [/.dark_orange]
                            [/.dark_orchid]
                            [/.dark_red]
                            [/.dark_salmon]
                            [/.dark_sea_green]
                            [/.dark_slate_blue]
                            [/.dark_slate_gray]
                            [/.dark_turquoise]
                            [/.dark_violet]
                            [/.deep_pink]
                            [/.deep_sky_blue]
                            [/.dim_gray]
                            [/.dodger_blue]
                            [/.fire_brick]
                            [/.floral_white]
                            [/.forest_green]
                            [/.fuchsia]
                            [/.gainsboro]
                            [/.ghost_white]
                            [/.gold]
                            [/.goldenrod]
                            [/.gray]
                            [/.green]
                            [/.green_yellow]
                            [/.honey_dew]
                            [/.hot_pink]
                            [/.indian_red]
                            [/.indigo]
                            [/.ivory]
                            [/.khaki]
                            )))
            l-o (list (,, (with_template [<name>]
                            [(description <name>)]

                            [/.lavender]
                            [/.lavender_blush]
                            [/.lawn_green]
                            [/.lemon_chiffon]
                            [/.light_blue]
                            [/.light_coral]
                            [/.light_cyan]
                            [/.light_goldenrod_yellow]
                            [/.light_gray]
                            [/.light_green]
                            [/.light_pink]
                            [/.light_salmon]
                            [/.light_sea_green]
                            [/.light_sky_blue]
                            [/.light_slate_gray]
                            [/.light_steel_blue]
                            [/.light_yellow]
                            [/.lime]
                            [/.lime_green]
                            [/.linen]
                            [/.magenta]
                            [/.maroon]
                            [/.medium_aquamarine]
                            [/.medium_blue]
                            [/.medium_orchid]
                            [/.medium_purple]
                            [/.medium_sea_green]
                            [/.medium_slate_blue]
                            [/.medium_spring_green]
                            [/.medium_turquoise]
                            [/.medium_violet_red]
                            [/.midnight_blue]
                            [/.mint_cream]
                            [/.misty_rose]
                            [/.moccasin]
                            [/.navajo_white]
                            [/.navy]
                            [/.old_lace]
                            [/.olive]
                            [/.olive_drab]
                            [/.orange]
                            [/.orange_red]
                            [/.orchid]
                            )))
            p-y (list (,, (with_template [<name>]
                            [(description <name>)]

                            [/.pale_goldenrod]
                            [/.pale_green]
                            [/.pale_turquoise]
                            [/.pale_violet_red]
                            [/.papaya_whip]
                            [/.peach_puff]
                            [/.peru]
                            [/.pink]
                            [/.plum]
                            [/.powder_blue]
                            [/.purple]
                            [/.rebecca_purple]
                            [/.red]
                            [/.rosy_brown]
                            [/.royal_blue]
                            [/.saddle_brown]
                            [/.salmon]
                            [/.sandy_brown]
                            [/.sea_green]
                            [/.sea_shell]
                            [/.sienna]
                            [/.silver]
                            [/.sky_blue]
                            [/.slate_blue]
                            [/.slate_gray]
                            [/.snow]
                            [/.spring_green]
                            [/.steel_blue]
                            [/.tan]
                            [/.teal]
                            [/.thistle]
                            [/.tomato]
                            [/.turquoise]
                            [/.violet]
                            [/.wheat]
                            [/.white]
                            [/.white_smoke]
                            [/.yellow]
                            [/.yellow_green]
                            )))]
        (list.partial ($.module /._
                                "")

                      (all list#composite
                           a-c
                           d-k
                           l-o
                           p-y
                           )))))