Searched refs:color_of_node (Results 1 – 5 of 5) sorted by relevance
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
H A D | kg_environment.F | 563 INTEGER(KIND=int_4), ALLOCATABLE, DIMENSION(:) :: color_of_node local 683 CALL kg_vertex_coloring(kg_env, pairs, ncolors, color_of_node) 698 IF (.NOT. ALLOCATED(color_of_node)) ALLOCATE (color_of_node(nmol)) 701 CALL mp_bcast(color_of_node, para_env%source, para_env%group) 736 color = color_of_node(i) 742 DEALLOCATE (color_of_node)
|
H A D | kg_vertex_coloring_methods.F | 633 SUBROUTINE kg_vertex_coloring(kg_env, pairs, ncolors, color_of_node) argument 639 INTENT(out) :: color_of_node local 682 ALLOCATE (color_of_node(nnodes)) 687 color_of_node(i) = color
|
/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | kg_environment.F | 694 INTEGER(KIND=int_4), ALLOCATABLE, DIMENSION(:) :: color_of_node local 814 CALL kg_vertex_coloring(kg_env, pairs, ncolors, color_of_node) 829 IF (.NOT. ALLOCATED(color_of_node)) ALLOCATE (color_of_node(nmol)) 832 CALL mp_bcast(color_of_node, para_env%source, para_env%group) 870 color = color_of_node(i) 876 DEALLOCATE (color_of_node)
|
H A D | kg_vertex_coloring_methods.F | 633 SUBROUTINE kg_vertex_coloring(kg_env, pairs, ncolors, color_of_node) argument 639 INTENT(out) :: color_of_node local 682 ALLOCATE (color_of_node(nnodes)) 687 color_of_node(i) = color
|
/dports/math/gap/gap-4.11.0/pkg/automata-1.14/gap/ |
H A D | drawgraph.gi | 172 q, a, color_of_node, k; 262 …# Prepare the list color_of_node, such that state p will be in color node_colors[k] <==> color_of_… 263 color_of_node := List([1 .. A!.states], _ -> 1); 266 color_of_node[p] := k+1; 274 …"", map[p], "\" [shape=triangle, style=filled, fillcolor=", node_colors[color_of_node[p]], "];\n"); 278 …" [shape=triangle,peripheries=2, style=filled, fillcolor=", node_colors[color_of_node[p]], "];\n"); 280 …map[p], "\" [shape=doublecircle, style=filled, fillcolor=", node_colors[color_of_node[p]], "];\n"); 284 …"\"", map[p], "\" [shape=circle, style=filled, fillcolor=", node_colors[color_of_node[p]], "];\n");
|