anchor.diff:  all() ->
       [art,
        merkle_tree,
  -     bloom,
  -     comparison].
  +     bloom].
  +     %comparison].
   
   suite() ->
       [
  -     {timetrap, {seconds, 30}}
  +     {timetrap, {seconds, 90}}
       ].
   
   init_per_suite(Config) ->
  
positive.code:     
      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) 
  
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,
  