anchor.diff:              random:seed(now()),
               G = ?LOGDURATION(new_digraph(Vertices, Edges)),
               {NCI, Communities} = nci:compute_from_graph(G, Limits),
  -            ?LOGDURATION(tap_client_data:nci(NCI, Communities,
  -                                                calendar:universal_time())),
  +            tap_client_data:nci(NCI, Communities, calendar:universal_time()),
               ?LOGDURATION(digraph:delete(G))
           end),
       Pid.
  
positive.code:             G.
  
  do_stop_nci(no_process) ->
      ok;
  do_stop_nci(Pid) when is_pid(Pid) ->
      case calculating(Pid) of
          true ->
              ?WARNING("NCI Calculation timeout ~p(~s)~n",
                  [Pid, pid_current_function(Pid)]),
              exit(Pid, timeout);
          false ->
              ok
      end.
  
  calculating(no_process) ->
  
negative.code:                                     [CalcPid, pid_current_function(CalcPid)]),
              State;
          false ->
              case Dirty of
                  false ->
                      ?DEBUG("Skipping NCI Calculation, no new data"),
                      State;
                  _ ->
                      Pid = push_nci(Digraph, digraph:no_vertices(Digraph),
                                                                      Limits),
                      nci_watchdog(Pid, CalcTimeout),
                      State#?STATE{calc_pid = Pid, dirty = false}
              end
      end,
      {noreply, NewState, hibernate};
  handle_cast(clean_data, State = #?STATE{
  