anchor.diff:  %% @doc Filter the source node's pid from a list.
   -spec filter_source_pid(rt(), [comm:mypid()]) -> [comm:mypid()].
   filter_source_pid(RT, ListOfPids) ->
  -    SourcePid = node:pidX(rt_entry_node(get_source_node(RT))),
  +    SourcePid = pidX(rt_entry_node(get_source_node(RT))),
       [P || P <- ListOfPids, P =/= SourcePid].
   
   %% @doc Set up a set of subscriptions from a routing table
  
positive.code:                     case entry_type(V) of
                          source -> Acc;
                          _Else -> Node = rt_entry_node(V),
                              gb_trees:enter(node:id(Node), Node, Acc)
                      end
              end, gb_trees:empty(),get_rt_tree(RT))}.
  
  
negative.code:         _:_ -> false
      end
      .
  
  %% @doc Transform a node:node_type() to mynode().
  -spec node2mynode(Node::node:node_type()) -> mynode().
  node2mynode(Node) -> {node:id(Node), node:pidX(Node)}.
  
  %% @doc Get the Pid from an mynode().
  -spec pidX(Node::mynode()) -> comm:mypid().
  pidX({_Id, Pid}) -> Pid.
  
  %% @doc Get the id from a mynode().
  -spec id(Node::mynode()) -> key().
  id({Id, _Pid}) -> Id.
  
  