<color-model> ( model class -- model )

Vocabulary

color-picker

Inputs

model	an object
class	an object

Outputs

model

an object

Definition

USING: classes.tuple math models.arrow sequences ;

IN: color-picker

: <color-model> ( model class -- model )
    '[ [ 255 /f ] map 1.0 suffix _ slots>tuple ] <arrow> ;