LCHab

Vocabulary

colors.lch

Definition

IN: colors.lch

TUPLE: LCHab l c h alpha ;

Methods

USING: colors.lch ;

M: LCHab >LCHab ; inline


USING: accessors colors.lab colors.lch kernel locals.backend
math math.functions ;

M: LCHab >laba
    [
        [ l>> ] [ c>> ] [ h>> ] tri 3 load-locals
        0 get-local deg>rad load-local
        -3 get-local -2 get-local 0 get-local cos *
        -2 get-local 0 get-local sin * 4 drop-locals
    ] [ alpha>> ] bi <laba> ;


USING: colors colors.lab colors.lch ;

M: LCHab >rgba >laba >rgba ;