anchor.diff:  % @doc returns true if the bloom filter contains item
   -spec is_element_(bloom_filter_t(), key()) -> boolean().
   is_element_(#bloom{size = BFSize, hfs = Hfs, filter = Filter}, Item) -> 
  -    Positions = apply(element(1, Hfs), apply_val_rem, [Hfs, Item, BFSize]),
  +    Positions = ?REP_HFS:apply_val_rem(Hfs, Item, BFSize),
       check_Bits(Filter, Positions).
   
   %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  
positive.code:                size = Size,
                 hfs = Hfs,
                 items_count = NumItems } = Bloom) -> 
      HCount = apply(element(1, Hfs), size, [Hfs]),
      [{filter_bit_size, Size},
       {struct_byte_size, byte_size(term_to_binary(Bloom))},
       {hash_fun_num, HCount},
  
negative.code: 
  -spec get_property(bloom_filter_t(), atom()) -> not_found | term().
  get_property(#bloom{ size = Size, hfs = Hfs, items_count = NumItems }, fpr) ->
      calc_FPR(Size, NumItems, ?REP_HFS:size(Hfs));
  get_property(Bloom, Property) ->
      FieldNames = record_info(fields, bloom),
      {_, N} = lists:foldl(fun(I, {Nr, Res}) -> case I =:= Property of
  