anchor.diff:  %%       (optional delivery, not reified in the trace.)
   
   main([TraceFile, ReplayTraceFile, CounterexampleConsultFile, RebarCounterexampleConsultFile, PreloadOmissionFile]) ->
  +    %% Keep track of when test started.
  +    StartTime = os:timestamp(),
  +
       %% Open ets table.
       ?MODULE = ets:new(?MODULE, [named_table, set]),
   
  
positive.code:     io:format(Io, "~s", [jsx:prettify(EncodedJsonTrace)]),
      file:close(Io),
  
      ok.
  
  %% @private
  
negative.code:     PT = powerset(T),
      [ [H|X] || X <- PT ] ++ PT.
  
  %% @private
  format_message_payload_for_json(MessagePayload) ->
      list_to_binary(lists:flatten(io_lib:format("~w", [MessagePayload]))).