anchor.diff:  port_loop(Port, Timeout, Command) ->
     receive
       noose -> 
  +      io:format("noose~n"),
         port_close(Port),
         noose;
       shutdown ->
  +      io:format("shutdown~n"),
         port_close(Port),
         exit(shutdown);
       {Source, host} -> 
  +      io:format("host~n"),
         Source ! {Port, node()},
         port_loop(Port,Timeout,Command);
       {Source, heat} -> 
  +      io:format("heat~n"),
         Port ! {self(), {command, term_to_binary(ping)}},
         Hot = term_to_binary(pong),
         receive
  
positive.code:       end,
        port_loop(Port,Timeout,Command);
      {_Source, {just_send_a_command, Message}} -> 
        Port ! {self(), {command, Message}},
        port_loop(Port,Timeout,Command);
      {Port, {exit_status, _Code}} ->
        % Hard and Unanticipated Crash
        error_logger:error_msg( "Port closed! ~p~n", [Port] ),
        exit({error, _Code});
      {'EXIT',_Pid,shutdown} ->
        port_close(Port),
        exit(shutdown);
      Any -> 
  
negative.code:       end,
        port_loop(Port, Timeout, Command);
      {Source, api} -> 
        io:format("api~n"),
        Port ! {self(), {command, term_to_binary(api)}},
        receive
          {Port, {data, Result}} ->   
  