anchor.diff:                          end;
                       true ->
                           if
  +                            (NCPU =:= -1) ->
  +                                1;
                               (NCPU >= 4) ->
                                   2;
                               (NCPU >= 2) ->
  
positive.code:         end
      catch
          _:_:_ ->
              1
      end.
  
  
  
negative.code:     io:format("FreeBSD:"
                "~n   Version: ~p"
                "~n", [Version]),
      %% This test require that the program 'sysctl' is in the path.
      %% First test with 'which sysctl', if that does not work
      %% try with 'which /sbin/sysctl'. If that does not work either,
      %% we skip the test...
      try
          begin
              SysCtl =
                  case string:trim(os:cmd("which sysctl")) of
                      [] ->
                          case string:trim(os:cmd("which /sbin/sysctl")) of
                              [] ->
                                  throw(sysctl);
                              SC2 ->
                                  SC2
                          end;
                      SC1 ->
                          SC1
                  end,
              Extract =
                  fun(Key) ->
                          string:tokens(string:trim(os:cmd(SysCtl ++ " " ++ Key)),
                                        [$:])
                  end,
              CPU      = analyze_freebsd_cpu(Extract),
              CPUSpeed = analyze_freebsd_cpu_speed(Extract),
              NCPU     = analyze_freebsd_ncpu(Extract),
              Memory   = analyze_freebsd_memory(Extract),
              io:format("CPU:"
                        "~n   Model:          ~s"
                        "~n   Speed:          ~w"
                        "~n   N:              ~w"
                        "~n   Num Schedulers: ~w"
                        "~nMemory:"
                        "~n   ~w KB"
                        "~n",
                        [CPU, CPUSpeed, NCPU,
                         erlang:system_info(schedulers), Memory]),
              CPUFactor =
                  if
                      (CPUSpeed =:= -1) ->
  