Home
last modified time | relevance | path

Searched refs:color_of_node (Results 1 – 5 of 5) sorted by relevance

/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dkg_environment.F563 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 Dkg_vertex_coloring_methods.F633 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 Dkg_environment.F694 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 Dkg_vertex_coloring_methods.F633 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 Ddrawgraph.gi172 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");