anchor.diff:  on({get_cs_nodes, Pid}, ok) ->
       case cs_send:is_valid(Pid) of
           true ->
  -            Nodes = [cs_send:make_global(Node)
  -                     || Node <- process_dictionary:find_all_cs_nodes()],
  +            Nodes = get_live_cs_nodes(),
               cs_send:send(Pid, {get_cs_nodes_response, Nodes});
           false ->
               ok
  
positive.code: % @doc ask all local nodes for their state
  dump_node_states() ->
      [gen_component:get_state(Pid)
       || Pid <-  process_dictionary:find_all_cs_nodes()].
  
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  % Server process
  
negative.code: 
  on(_, _State) ->
      unknown_event.
  
  get_live_cs_nodes() ->
      [cs_send:make_global(Pid) || Pid <- process_dictionary:find_all_cs_nodes(), element(1, gen_component:get_state(Pid)) == state].
  