anchor.diff:      RMState = dht_node_state:get(State, rm_state),
       RMState1 = rm_loop:on(Msg, RMState),
       dht_node_state:set_rm(State, RMState1);
  -% message with cookie for rm_loop?
   on({Msg, Cookie} = FullMsg, State) when
     is_tuple(Msg) andalso is_atom(element(1, Msg)) andalso
         (element(1, Msg) =:= rm orelse
  
positive.code:     RMState1 = rm_loop:on(FullMsg, RMState),
      dht_node_state:set_rm(State, RMState1);
  
  %% Kill Messages
  on({kill}, _State) ->
      kill;
  
  on({leave}, State) ->
      dht_node_move:make_slide_leave(State);
  
  on({churn}, _State) ->
      kill;
  
  on({halt}, _State) ->
      util:sleep_for_ever();
  
  on({die}, _State) ->
      SupDhtNodeId = erlang:get(my_sup_dht_node_id),
      SupDhtNode = pid_groups:get_my(sup_dht_node),
      util:supervisor_terminate_childs(SupDhtNode),
      ok = supervisor:terminate_child(main_sup, SupDhtNodeId),
      ok = supervisor:delete_child(main_sup, SupDhtNodeId),
      kill;
  
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  % Finger Maintenance
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  
negative.code: %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  % Transactions (see transactions/*.erl)
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  on({get_rtm, Source_PID, Key, Process}, State) ->
      MyGroup = pid_groups:my_groupname(),
      Pid = pid_groups:get_my(Process),
  