let blue = (`Color "#9999ff" : [> `Color of string ])