anchor.diff:                      fetch(BindId, FromId, FromP),
                       {noreply, State};
                   _ ->
  -                    {NextClock, NextKey} = next_key(DV#dv.next, Clock, Partition, Table),
  +                    {NextClock, NextKey} = next_key(DV#dv.next, Clock, Partition),
                       BindingList = lists:append(DV#dv.binding_list, [FromId]),
                       DV1 = DV#dv{binding_list=BindingList, next=NextKey},
                       true = ets:insert(Table, {TargetId, DV1}),
  
positive.code:         NextKey0 == undefined ->
              Next = State#state.clock + 1,
              NextKey={Next, Partition},
              declare_by_id(NextKey, Table);
          true ->
              {Next, _} = NextKey0,
              NextKey = NextKey0
  
negative.code:     {reply, {Clock,Partition}, State#state{clock=Clock}};
  
  handle_command({declare, Id}, _From, State=#state{table=Table}) ->
      true = ets:insert(Table, {Id, #dv{value=undefined}}),
      {reply, {ok, Id}, State};
  
  handle_command({async_bind, Id, F, Arg}, _From,
  