anchor.diff:      case showing_progress(Verbosity) of
         false -> none;
         true ->
  -        to_stderr("~s", [Header]),
  -        if Output =:= disable ->
  -            Msg = "No output report will be generated~n",
  -            ?log(self(), ?lwarning, Msg, []);
  -           true ->
  -            to_stderr("~nWriting results in ~s", [OutputName])
  -        end,
  -        if GraphData =:= disable -> ok;
  -           true ->
  -            {_, GraphName} = Graph,
  -            to_stderr("~nWriting graph in ~s", [GraphName])
  -        end,
  -        progress_initial_padding(),
  +        to_stderr("~s~n", [Header]),
  +        initialize_ticker(),
           Self = self(),
           spawn_link(fun() -> ticker(Self) end)
       end,
  +  if Output =:= disable ->
  +      Msg = "No output report will be generated~n",
  +      ?log(self(), ?lwarning, Msg, []);
  +     true ->
  +      ?log(self(), ?linfo, "Writing results in ~s~n", [OutputName])
  +  end,
  +  if GraphData =:= disable -> ok;
  +     true ->
  +      {_, GraphName} = Graph,
  +      ?log(self(), ?linfo, "Writing graph in ~s~n", [GraphName])
  +  end,
     PrintableOptions =
       delete_props(
         [estimator, graph, output, processes, timers, verbosity],
  
positive.code: %%------------------------------------------------------------------------------
  
  progress_initial_padding() ->
    to_stderr("~n~n~n~n~n~n",[]).
  
  progress_clear() ->
    delete_lines(4).
  
negative.code:   "    Errors |  Explored " ++ SSB ++
      "| Planned |  ~ Rate |  Total(?) | Time(?) ".
  
  progress_line(0) ->
    progress_line_common("");
  progress_line(_State) ->
    progress_line_common("-----------").
  