anchor.diff:      receive 
           {Pid, Ans} ->
               Ans
  -    after 600000 ->
  +    after 3600000 ->
           {error, timeout}
       end.
  
positive.code:     FilePrefix = Dir ++ "/" ++ NodeType ++ "__",
      FileSuffix = ".analysis",
      stop_trace(Node, Mode, FilePrefix, FileSuffix).
  
  stop_trace(Node, "mode_full", FilePrefix, FileSuffix) ->  
      io:format("Stopping full trace on node ~p~n", [Node]), 
  
negative.code:     end.    
  
  start_trace(Node, "mode_totals_only") ->
      start_trace(Node, "mode_full");
  start_trace(Node, "mode_trace_only") ->
      start_trace(Node, "mode_full");
  start_trace(Node, "mode_full") ->
      ProcsToTrace = lists:foldl(fun(Elem, AccIn) -> AccIn ++ get_pid(Elem, Node) end, [], ?trace_procs), 
      io:format("Starting trace of procs: ~p~n", [ProcsToTrace]),
  