anchor.diff:  
   %% --------------------------------------------------------------------------------------------------------------------
   
  +ets_new(Size) ->
  +	EtsTable = ets:new(whatthefuck, [private]),
  +	[
  +		ets:insert(EtsTable, {list_to_binary(integer_to_list(Key)), <<"Value ", Key/integer>>})
  +		|| Key <- lists:seq(1, Size)
  +	],
  +	{Size, EtsTable}.
  +
   ets_lookup({Size, EtsTable}) ->
   	ets:lookup(EtsTable, list_to_binary(integer_to_list(random:uniform(Size)))).
   
  
positive.code: 
  %% --------------------------------------------------------------------------------------------------------------------
  
  dict_new(ok) ->
  	dict:new().
  
  dict_fetch({Size, Dict}) ->
  	dict:fetch(list_to_binary(integer_to_list(random:uniform(Size))), Dict).
  
negative.code: 	).
  
  dict(Size) ->
  	SetupFunc = fun() -> dict_new(Size) end,
  	run_benches(
  		io_lib:format("dict (~p items)", [Size]),
  		[
  			{new, fun() -> Size end, fun ?MODULE:dict_new/1},
  			{fetch, SetupFunc, fun ?MODULE:dict_fetch/1},
  			{iterate_map, SetupFunc, fun ?MODULE:dict_iterate_map/1},
  			{iterate_fold, SetupFunc, fun ?MODULE:dict_iterate_fold/1},
  