anchor.diff:                        "~n   Num Online Schedulers: ~s"
                         "~n", [str_num_schedulers()]),
               io:format("TS Scale Factor: ~w~n", [timetrap_scale_factor()]),
  -            Factor = case erlang:system_info(schedulers) of
  -                         1 ->
  -                             10;
  -                         2 ->
  -                             5;
  -                         _ ->
  -                             2
  -                     end,
  -            {Factor, []}
  +            {num_schedulers_to_factor(), []}
       end.
   
   
  
positive.code:         _:_:_ ->
              io:format("TS Scale Factor: ~w~n", [timetrap_scale_factor()]),
              {Factor, []}
      end.
  
  linux_cpuinfo_lookup(Key) when is_list(Key) ->
  
negative.code:                           "~n   Num Online Schedulers: ~s"
                            "~n", [CPU, BogoMIPS, str_num_schedulers()]),
                  if
                      (BogoMIPS > 50000) ->
                          1;
                      (BogoMIPS > 30000) ->
                          2;
                      (BogoMIPS > 10000) ->
                          3;
                      (BogoMIPS > 5000) ->
                          5;
                      (BogoMIPS > 3000) ->
                          8;
                      true ->
                          10
                  end;
              {ok, "POWER9" ++ _ = CPU} ->
                  %% For some reason this host is really slow
                  %% Consider the CPU, it really should not be...
                  %% But, to not fail a bunch of test cases, we add 5
                  case linux_cpuinfo_clock() of
                      Clock when is_integer(Clock) andalso (Clock > 0) ->
                          io:format("CPU: "
                                    "~n   Model:                 ~s"
                                    "~n   CPU Speed:             ~w"
                                    "~n   Num Online Schedulers: ~s"
                                    "~n", [CPU, Clock, str_num_schedulers()]),
                          if
                              (Clock > 2000) ->
                                  5 + num_schedulers_to_factor();
                              true ->
                                  10 + num_schedulers_to_factor()
                          end;
                      _ ->
                          num_schedulers_to_factor()
                  end;
              {ok, CPU} ->
                  io:format("CPU: "
                            "~n   Model:                 ~s"
                            "~n   Num Online Schedulers: ~s"
                            "~n", [CPU, str_num_schedulers()]),
                  num_schedulers_to_factor();
              _ ->
                  5
          end,
  