anchor.diff:  new({sequential_int_bin, MaxKey}, _Id) ->
       Ref = make_ref(),
       fun() -> Key = sequential_int_generator(Ref, MaxKey), <<Key:32/native>> end;
  +new({sequential_int_str, MaxKey}, _Id) ->
  +    Ref = make_ref(),
  +    fun() -> Key = sequential_int_generator(Ref, MaxKey), integer_to_list(Key) end;
   new({uniform_int_bin, MaxKey}, _Id) ->
       fun() -> Key = random:uniform(MaxKey), <<Key:32/native>> end;
   new({uniform_int_str, MaxKey}, _Id) ->
  
positive.code:     S1 = (-1 / Shape) - 1,
      S2 = Mean * (Shape - 1),
      fun() -> trunc(math:pow(1 - random:uniform(), S1) * S2) end;
  new(Other, _Id) ->
      ?FAIL_MSG("Unsupported key generator requested: ~p\n", [Other]).
  
  
negative.code:     MaxKey;
  dimension({sequential_int_bin, MaxKey}) ->
      MaxKey;
  dimension({sequential_int_str, MaxKey}) ->
      MaxKey;
  dimension({uniform_int_bin, MaxKey}) ->
      MaxKey;
  dimension({uniform_int_str, MaxKey}) ->
  