anchor.diff:      unknown;
   get_value_type(Value, _Type) when is_number(Value) ->
       Value;
  -get_value_type(Value, {histogram, _}) ->
  +get_value_type(Value, {histogram, _Size}) ->
       histogram:get_num_inserts(Value);
  -get_value_type(Value, {histogram, _, _}) ->
  +get_value_type(Value, {histogram, _Size, _NormFun, _InverseFun}) ->
       histogram_normalized:get_num_inserts(Value).
   
   %% @doc returns the weighted average of a list using decreasing weight
  
positive.code: 
  -spec call_module(atom(), list()) -> state().
  call_module(Fun, Args) ->
      apply(get_lb_module(), Fun, Args). 
  
  -spec get_lb_module() -> atom() | failed.
  get_lb_module() ->
  
negative.code: %%%%%%%%%%%%%%%%%%%%%%%% Monitoring values %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  
  %% @doc Called by db process to initialize monitors
  -spec init_db_monitors(MyId::?RT:key(), MyRange::intervals:interval()) -> ok.
  init_db_monitors(MyId, MyRange) ->
      case monitor_db() of
          true ->
              MonitorRes = config:read(lb_active_monitor_resolution),
              History = config:read(lb_active_monitor_history),
              HistogramSize = config:read(lb_active_histogram_size),
              HistogramType =
                  case intervals:in(?MINUS_INFINITY, MyRange) andalso MyRange =/= intervals:all() of
                      false ->
                          {histogram, HistogramSize};
                      true -> %% we need a normalized histogram because of the key space overflow
                          NormFun =
                              fun(Val) ->
                                      case Val - MyId of
                                          NormVal when NormVal =< ?MINUS_INFINITY ->
                                              ?PLUS_INFINITY + NormVal - 1;
                                          NormVal ->
                                              NormVal
                                      end
                              end,
                          InverseFun =
                              fun(NormVal) ->
                                      (NormVal + MyId + 1) rem ?PLUS_INFINITY
                              end,
                          {histogram, HistogramSize, NormFun, InverseFun}
                  end,
              Reads  = rrd:create(MonitorRes * 1000, History + 1, HistogramType),
              Writes = rrd:create(MonitorRes * 1000, History + 1, HistogramType),
  