oklcha
OKLCH colors

Next:

<oklcha> ( l c h alpha -- oklcha )

Vocabulary
colors.oklch

Class description
The class of OKLCH colors with an alpha channel.

Definition

IN: colors.oklch

TUPLE: oklcha l c h alpha ;

Methods

USING: accessors colors.oklab colors.oklch kernel locals.backend
math math.functions ;

M: oklcha >oklaba
    [
        [ 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 <oklaba> ;


USING: colors colors.oklab colors.oklch ;

M: oklcha >rgba >oklaba >rgba ;