anchor.diff:      ProcessesPerNode = round(ProcessCount / SlavesCount),
   
       io:format("-----> Starting benchmark~n"),
  -    io:format("       --> Nodes: ~w (~w slaves)~n", [SlavesCount + 1, SlavesCount]),
  +    io:format("       --> Nodes: ~w / ~w slave(s)~n", [SlavesCount + 1, SlavesCount]),
       io:format("       --> Total processes: ~w (~w / slave node)~n", [ProcessCount, ProcessesPerNode]),
       io:format("       --> Workers per node: ~w~n~n", [WorkersPerNode]),
   
  
positive.code:         end)
      end, WorkerInfo),
      %% wait
      wait_register_on_node(CollectorPid, 0, WorkersPerNode).
  
  worker_register_on_node(_Name, []) -> ok;
  worker_register_on_node(Name, [Pid | PidsTail]) ->
      ok = syn:register(Name, Pid),
      worker_register_on_node(Name + 1, PidsTail).
  
  wait_register_on_node(CollectorPid, Time, 0) ->
      io:format("----> Registered on node ~p on ~p secs.~n", [node(), Time]),
      CollectorPid ! {done, node(), Time};
  wait_register_on_node(CollectorPid, Time, WorkersRemainingCount) ->
      receive
          {done, WorkerTime} ->
              Time1 = lists:max([WorkerTime, Time]),
              wait_register_on_node(CollectorPid, Time1, WorkersRemainingCount - 1)
      end.
  
  unregister_on_node(CollectorPid, WorkersPerNode, FromName, ToName) ->
      %% split pids in workers
  
negative.code:     end, PidsMap),
  
      %% wait all unregistered
      {KillPropagationTimeMs, _} = timer:tc(?MODULE, wait_registry_propagation, [0]),
      KillPropagationTime = KillPropagationTimeMs / 1000000,
      io:format("----> Time to propagate killed process to to master: ~p secs.~n", [KillPropagationTime]),
  
  