anchor.diff:                     size = _Size,
                      lacc = AccL,
                      acc_fun = Fun,
  -                   hacc = AccIn}) when
  -      _Size > ?FOLD_SIZE ->
  +                   hacc = AccIn,
  +                   fold_size = _FoldSize}) when
  +      _Size > _FoldSize ->
       AccOut = Fun({Bucket, Metric}, lists:reverse(AccL), AccIn),
       Size = mmath_bin:length(V),
       Acc#facc{
  
positive.code:           lacc = [],
            bucket,
            acc_fun,
            last
          }).
  
  -define(FOLD_SIZE, 82800).
  -define(MAX_DELTA, 300).
  
  fold_fun(Metric, Time, V,
           Acc =
  
negative.code: 
  handle_call({fold, Fun, Acc0}, _From,
              State = #state{partition = Partition}) ->
      DataDir = application:get_env(riak_core, platform_data_dir, "data"),
      PartitionDir = [DataDir, $/,  integer_to_list(Partition)],
      case file:list_dir(PartitionDir) of
  