Graph colouring: Difference between revisions
m
→{{header|J}}
m (J: slightly simpler if colors start with 0 rather than 1) |
m (→{{header|J}}) |
||
Line 786:
greedy=: {{
colors=. (#y)#a:
for_node.
color=. <{.(-.~ [:i.1+#) ~.;node#colors
colors=. color node_index} colors
|