golden-rainbow ( num-colors saturation luminance -- colors )

Vocabulary

colors.hsv

Inputs

num-colors	an object
saturation	an object
luminance	an object

Outputs

colors

an object

Definition

USING: kernel math random sequences ;

IN: colors.hsv

: golden-rainbow
    ( num-colors saturation luminance -- colors )
    [ random-unit ] 3dip
    [ [ [ 0.618033988749895 + 1.0 mod dup ] ] dip ] dip
    [ 1.0 <hsva> ] 2curry compose replicate nip ;