anchor.diff:          fun (X) -> 
                    Port = find_free_port(BaseScalarisPort),
                    YawsPort = find_free_port(BaseYawsPort),
  -                 NodeName = lists:flatten(io_lib:format("node~p_~p", [Time, X])),
  +                 NodeName = lists:flatten(io_lib:format("autoscale_~p_~p", [Time, X])),
                    Cmd = lists:flatten(io_lib:format("./../bin/scalarisctl -e -detached -s -p ~p -y ~p -n ~s start", 
                                                      [Port, YawsPort, NodeName])),
                    io:format("Executing: ~p~n", [Cmd]),
  
positive.code:     ok.
  
  
  -spec get_number_of_vms() -> non_neg_integer().
  get_number_of_vms() ->
      length(erlang:element(2, erl_epmd:names())).
  
  -spec add_vms(integer()) -> ok.
  add_vms(N) ->
  
negative.code: 
  -spec remove_vms(integer()) -> ok.
  remove_vms(N) ->
      VMs = get_vms(),
      RemoveFun = 
          fun(NodeName) ->						
                  Cmd = lists:flatten(io_lib:format("./../bin/scalarisctl -n ~s gstop", 
  