anchor.diff:           new_groupsfile/1,
            set_treedict/2,
            interested/2,
  +         get_mypath/0,
            set_groupsdict/1,
            do_replicate/1]).
   
  
positive.code:     file:close(TreeFile),
      {ok, S1#state{map=dict:new()}}.
  
  handle_call({set_treedict, Tree, Leaves}, _From, S0) ->
      Paths = path_from_tree_dict(Tree, Leaves),
      {reply, ok, S0#state{paths=Paths, tree=Tree, nleaves=Leaves}};
  
negative.code: start_link() ->
      gen_server:start({local, ?MODULE}, ?MODULE, [], []).
  
  get_mypath() ->
      gen_server:call(?MODULE, {get_mypath}, infinity).
      
  do_replicate(Key) ->
      gen_server:call(?MODULE, {do_replicate, Key}, infinity).
  
  