=color ( graphviz-obj val -- graphviz-obj' )

Vocabulary

graphviz.notation

Inputs

graphviz-obj	an object
val	an object

Outputs

graphviz-obj'

an object

Definition

IN: graphviz.notation

GENERIC#: =color 1 ( graphviz-obj val -- graphviz-obj' )

Methods

USING: accessors graphviz.attributes graphviz.notation present ;

M: edge-attributes =color present >>color ;


USING: accessors graphviz graphviz.notation kernel present ;

M: edge =color present over attributes>> color<< ;


USING: accessors graphviz.attributes graphviz.notation present ;

M: graph-attributes =color present >>color ;


USING: accessors graphviz graphviz.attributes graphviz.notation
kernel present ;

M: graph =color <graph-attributes> swap present >>color add ;


USING: accessors graphviz.attributes graphviz.notation present ;

M: node-attributes =color present >>color ;


USING: accessors graphviz graphviz.notation kernel present ;

M: node =color present over attributes>> color<< ;


USING: accessors graphviz graphviz.attributes graphviz.notation
kernel present ;

M: subgraph =color <graph-attributes> swap present >>color add ;