anchor.diff:  
   %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  -send(Name,Port,Cookie) ->
  +mk_send(Name,Port,Cookie) ->
     fun(Chunk)->
         try {ok,Sck} = gen_tcp:connect(Name,Port,conn_opts(),conn_timeout()),
   	  try gen_tcp:send(Sck,prf_crypto:encrypt(Cookie,expand_recs(Chunk)))
  
positive.code: 
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  out(FD) -> fun(E)-> print_term(FD,expand_recs(E)) end.
  
  %%print_term(Term) -> print_term(group_leader(),Term).
  print_term(FD,Term) -> 
    case node(FD) == node() of
      true -> ?log(Term);
  
negative.code: stop() -> 
    try ?MODULE ! stop
    catch _:_ -> ok
    end.
  
  %% E.g:  add_send_subscriber("localhost",56669,"I'm a Cookie").
  add_send_subscriber(Host,Port,PassPhrase) ->
    try {ok,{hostent,Host,[],inet,4,_}} = inet:gethostbyname(Host),
        ?MODULE ! {add_subscriber,mk_send(Host,Port,PassPhrase)},
        ok
    catch 
      error:{badmatch,{ok,{hostent,G,[W],inet,4,_}}} -> {error,{badhost,W,G}};
      _:R -> {error,R}
    end.
  
  add_log_subscriber() ->
    try ?MODULE ! {add_subscriber,mk_log(group_leader())}, ok
    catch _:R -> {error,R}
    end.
  
  clear_subscribers() ->
    try ?MODULE ! clear_subscribers, ok
    catch _:R -> {error,R}
    end.
  
  message(Term) ->
  