anchor.diff:              _ ->
                   5
           end,
  +    AddLabelFactor = label2factor(Label),
       %% Check if we need to adjust the factor because of the memory
  -    try linux_which_meminfo() of
  -        AddFactor ->
  -            io:format("TS Scale Factor: ~w~n", [timetrap_scale_factor()]),
  -            {Factor + AddFactor, []}
  -    catch
  -        _:_:_ ->
  -            io:format("TS Scale Factor: ~w~n", [timetrap_scale_factor()]),
  -            {Factor, []}
  -    end.
  +    AddMemFactor = try linux_which_meminfo()
  +                   catch _:_:_ -> 0
  +                   end,
  +    TSScaleFactor = case timetrap_scale_factor() of
  +                        N when is_integer(N) andalso (N > 0) ->
  +                            N - 1;
  +                        _ ->
  +                            0
  +                    end,
  +    io:format("Factor calc:"
  +              "~n      Base Factor:     ~w"
  +              "~n      Label Factor:    ~w"
  +              "~n      Mem Factor:      ~w"
  +              "~n      TS Scale Factor: ~w"
  +             "~n", [Factor, AddLabelFactor, AddMemFactor, TSScaleFactor]),
  +    {Factor + AddLabelFactor + AddMemFactor + TSScaleFactor, [{label, Label}]}.
   
   linux_cpuinfo_clock() ->
       %% This is written as: "3783.000000MHz"
  
positive.code: 
  
  analyze_and_print_linux_host_info(Version) ->
      Distro =
          case file:read_file_info("/etc/issue") of
              {ok, _} ->
                  linux_which_distro(Version);
              _ ->
                  io:format("Linux: ~s"
                            "~n", [Version]),
                  other
          end,
      Factor =
          case (catch linux_which_cpuinfo(Distro)) of
  
negative.code:             "Unknown"
      end.
                              
  do_linux_which_distro_fedora(Version, Label) ->
      %% Check if fedora
      case file:read_file_info("/etc/fedora-release") of
          {ok, _} ->
  