anchor.diff:          _ ->
               20
       end.
  +
  +
  +analyze_darwin_cpu_to_factor("Apple" ++ _ = _Chip, _NumCores) ->
  +    1;
  +analyze_darwin_cpu_to_factor(_Chip, _NumCores) ->
  +    8.
   
   
   %% The speed is a string: "<speed> <unit>"
  
positive.code: 
  analyze_darwin_hw_model_identifier(HwInfo) ->
      proplists:get_value("model identifier", HwInfo, "-").
  
  analyze_darwin_hw_processor_name(HwInfo) ->
      proplists:get_value("processor name", HwInfo, "-").
  
negative.code:             HwInfo        = analyze_darwin_hardware_info(),
              ModelName     = analyze_darwin_hw_model_name(HwInfo),
              ModelId       = analyze_darwin_hw_model_identifier(HwInfo),
              %% ProcName      = analyze_darwin_hw_processor_name(HwInfo),
              %% ProcSpeed     = analyze_darwin_hw_processor_speed(HwInfo),
              %% NumProc       = analyze_darwin_hw_number_of_processors(HwInfo),
              %% NumCores      = analyze_darwin_hw_total_number_of_cores(HwInfo),
              {Processor, CPUFactor} = analyze_darwin_hw_processor(HwInfo),
              Memory        = analyze_darwin_hw_memory(HwInfo),
              io:format("Darwin:"
                        "~n   System Version:        ~s"
                        "~n   Kernel Version:        ~s"
                        "~n   Model:                 ~s (~s)"
                        "~n   Processor:             ~s"
                        "~n   Memory:                ~s"
                        "~n   Num Online Schedulers: ~s"
                        "~n", [SystemVersion, KernelVersion,
                               ModelName, ModelId,
                               Processor, 
                               Memory,
                               str_num_schedulers()]),
              MemFactor = analyze_darwin_memory_to_factor(Memory),
              if (MemFactor =:= 1) ->
                      {CPUFactor, []};
  