let orange = (`Color "#FFAA00" : [> `Color of string])