anchor.diff:  
   server_loop(Bots) ->
   	receive
  -		{From, {enslave, Nick}} ->
  +		{From, {enlist, Nick}} ->
  +			io:format("Welcome ~p~n", [Nick]),
   			Bots2 = Bots:append(From, Nick),
   			From ! {dist, ok},
   			server_loop(Bots2);
  
positive.code: 			server_loop(Bots)
  	end.
  
  distribute_work([],[],_) -> ok;
  distribute_work(BotList, Pairs, Len) ->
  	[CurPair|RestPairs] = Pairs,
  	[{Pid,Nick}|RestBots] = BotList,
  	Pid ! {decrypt, CurPair, Len},
  	distribute_work(RestBots,RestPairs,Len).
  
  client_loop() ->
  	receive
  		{decrypt, {First, Last}, Len} ->
  			io:format("Working on decrypting string of length ~p...~n",[Len]),
  
  			client_loop();
  		{parrot, Text, Nick} ->
  			io:format("My name is ~p and I go ~p~n", [Nick,Text]),
  
negative.code: 			io:format("Client cannot handle ~p~n",[Other]),
  			client_loop()
  	end.
  
  analyze(Crypted, Max, Max) ->
     case erlang:md5(Max) of
         Crypted ->
             rpc({found, Max});
         _ ->
             rpc({notfound})
     end;
  analyze(Crypted, Cur, Max) ->
     case erlang:md5(Cur) of
         Crypted ->
             rpc({found, Cur});
         _ ->
             analyze(Crypted, pwd:next(Cur), Max)
     end.
  