anchor.diff:      
       AddListT = measure_util:time_avg(fun() -> bloom:add(BaseBF, List) end,
                                        ExecTimes, []),    
  -    
  +
       IsElemT = measure_util:time_avg(
                   fun() -> 
                           lists:foreach(fun(I) -> bloom:is_element(TestBF, I) end, List) 
  
positive.code: all() ->
      [art,
       merkle_tree,
       bloom,
       comparison].
  
  suite() ->
      [
       {timetrap, {seconds, 30}}
      ].
  
  init_per_suite(Config) ->
  
negative.code:     BaseBF = bloom:new(ToAdd, Fpr, Hfs),
      List = random_list(ToAdd),
      TestBF = bloom:add(BaseBF, List),
  
      AddT = measure_util:time_avg(fun() -> for_to_ex(1, ToAdd,
                                                      fun(I) -> I end,
                                                      fun(I, B) -> bloom:add(B, I) end,
  