color>ansi ( color -- ansi bold? )

Vocabulary

io.streams.ansi.private

Inputs

color

an object

Outputs

ansi	an object
bold?	an object

Definition

USING: assocs kernel math math.vectors sequences ;

IN: io.streams.ansi.private

: color>ansi ( color -- ansi bold? )
    color>rgb [ distance ] curry colors
    [ keys swap minimum-by ] [ at ] bi dup 8 >=
    [ 8 - t ] [ f ] if ;