anchor.diff:              %% not yet implemented
               DrawTrace
       end,
  -    draw_messages(File, Nodes, ScaleX, RemainingTrace).
  +    draw_messages(File, Nodes, ScaleX, HaveRealTime, RemainingTrace).
   
   %% Functions used to report tracing events from other modules
   -spec epidemic_reply_msg(passed_state(), anypid(), anypid(), comm:message()) ->
  
positive.code:                         [] -> NewDrawTrace;
                          _ ->
                              DoneTime = element(2, hd(DoneEvents)),
                              io:format(File,
                                        "\\draw[semithick] (~pcm, -~p)"
                                        " -- "
                                        " (~pcm, -~p) node[inner sep=1pt, anchor=south] {\\tiny ~p};~n",
                                        [RecvTime/ScaleX, DestNum/2,
                                         DoneTime/ScaleX, DestNum/2,
                                         DoneTime - RecvTime]),
                              lists:delete(hd(DoneEvents), NewDrawTrace)
                      end
              end;
  
negative.code:     [ setelement(2, X, timer:now_diff(element(2, X), StartTime))
        || X <- SortedTrace].
  
  -spec notime_delta(trace()) -> trace().
  notime_delta(Trace) ->
      SortedTrace = lists:keysort(2, Trace),
      util:map_with_nr(fun(X, I) -> setelement(2, X, I*10) end, SortedTrace, 0).
  
  %% sample call sequence to get a tx trace:
  %% tex traces have to be relatively short, so paste all at once to the
  %% erlang shell.
  