>yiqa ( color -- yiqa )
YIQ colors
Prev:<yiqa> ( y in-phase quadrature alpha -- yiqa )


Vocabulary
colors.yiq

Inputs
coloran object


Outputs
yiqaan object


Definition
IN: colors.yiq

GENERIC: >yiqa ( color -- yiqa )


Methods
USING: colors colors.yiq kernel ;

M: object >yiqa >rgba >yiqa ;


USING: colors colors.yiq math ;

M:: rgba >yiqa ( rgba -- yiqa )
rgba >rgba-components :> ( r g b a ) 0.3 r * 0.59 g *
0.11 b * + + :> y r y - :> r-y b y - :> b-y 0.74 r-y *
0.27 b-y * - :> i 0.48 r-y * 0.41 b-y * +
:> q y i q a <yiqa> ;


USING: colors.yiq ;

M: yiqa >yiqa ; inline