anchor.diff:      case Lease of 
           empty ->
               log:log("you are trying to remove an active lease in update"),
  +            % async. call!
  +            service_per_vm:kill_nodes_by_name([pid_groups:my_groupname()]),
  +            util:sleep_for_ever(),
               ok;
           _ ->
               ok
  
positive.code:     LeaseList = dht_node_state:get(State, lease_list),
      Active = LeaseList#lease_list_t.active,
      Id = l_on_cseq:get_id(Lease),
      case Active of
          empty ->
              State;
          _ ->
              case l_on_cseq:get_id(Active) =:= Id of
                  true ->
                      dht_node_state:set_lease_list(remove_next_round(Id, State),
                                                    LeaseList#lease_list_t{active=empty});
                  false ->
                      State
              end
      end.
  
  -spec remove_passive_lease_from_dht_node_state(l_on_cseq:lease_t(), l_on_cseq:lease_id(),
  
negative.code:         active ->
              log:log("you are trying to remove an active lease"),
              % disable_mnesia_dbs(State) ?
              % async. call!
              service_per_vm:kill_nodes_by_name([pid_groups:my_groupname()]),
              util:sleep_for_ever(),
              remove_active_lease_from_dht_node_state(Lease, Id, State);
          any ->
              remove_passive_lease_from_dht_node_state(Lease, Id,
  