! Copyright (C) 2008 Eduardo Cavazos.
! See http://factorcode.org/license.txt for BSD license.
-USING: colors kernel accessors ;
+USING: accessors colors kernel math ;
IN: colors.gray
TUPLE: gray < color { gray read-only } { alpha read-only } ;
-
-IN: colors.cmyx
+USING: help.markup help.syntax ;
+IN: colors.cmyk
HELP: cmyka
{ $class-description "The class of CMYK (Cyan, Magenta, Yellow, Black) colors with an alpha channel. All slots store values in the interval " { $snippet "[0,1]" } "." } ;
! Copyright (C) 2012 John Benediktsson
! See http://factorcode.org/license.txt for BSD license
-USING: accessors colors kernel math math.order ;
+USING: accessors combinators colors colors.gray kernel math
+math.order ;
IN: colors.cmyk