let green = (`Color "#006600" : [> `Color of string])