anchor.diff:  	GenMax = lists:max([M || {_, M} <- Results]),
   	{GenAvg, GenMax}.
   
  -match(C, Query, PageSize, Parent) ->
  +match(C, Query, Filters, PageSize, Parent) ->
   	Self = self(),
   	Pids =
  -		[spawn(fun() -> receive P -> P ! timer:tc(lucene, match, [Query, PageSize]) end end)
  +		[spawn(fun() -> receive P -> P ! timer:tc(lucene, match, [Query, PageSize, [], Filters]) end end)
   	 	 || _ <- lists:seq(1, C)],
   	[Pid ! Self || Pid <- Pids],
   	Times =
  
positive.code: 		 end || _ <- lists:seq(1, C)],
  	Parent ! {lists:sum(Times), hd(lists:reverse(lists:sort(Times)))}.
  
  -spec concurrency(pos_integer(), pos_integer(), pos_integer(), string(), pos_integer(), pos_integer()) -> {float(), [float()]}.
  concurrency(NumDocs, NumFields, N, Query, CTop, CStep) ->
  	io:format("Clearing the index...~n"),
  	lucene:clear(),
  	io:format("Filling the index...~n"),
  
negative.code: -module(lucene_bench).
  -author('elbrujohalcon@inaka.net').
  
  -export([add/2, match/7, just_match/5, concurrency/7]).
  -export([sleep/2]).
  
  -spec add(pos_integer(), pos_integer()) -> float().
  