anchor.diff:      receive
   	die ->
   	    nil;
  -	{done, NumReceived} ->
  +	{mappers, done, NumReceived} ->
   	    Parent ! {self (), Dict};
   	Keys  ->
   	    reducer(Parent, add_keys(Dict, Keys), NumReceived + 1)
  
positive.code:     Fun2 = fun (L) -> lists:foldl(Fun, InitAcc, L) end,
      runmany(Fun2, Fuse, List, Malt).
  
  % @doc Same semantics as in module
  % <a href="http://www.erlang.org/doc/man/lists.html">lists</a>.
  % @spec (Fun, List) -> void()
  foreach(Fun, List) ->
      foreach(Fun, List, 1).
  
  % @doc Same semantics as in module
  % <a href="http://www.erlang.org/doc/man/lists.html">lists</a>.
  % @spec (Fun, List, Malt) -> void()
  foreach(Fun, List, Malt) ->
      runmany(fun (L) ->
  
negative.code: 			   Reducer ! die,
  			   exit(Reason)
  		   end,
      Reducer ! {mappers, done, SentMessages},
      Results = receive
  		  {Reducer, Results2} ->
  		      Results2;
  