anchor.diff:  
   	[exit(Pid, kill) || Pid <- [P1|HalfHogs++LastHogs]],
   	AfterLoad = get_load(),
  -	{false,_} = {lists:any(fun(Load) -> Load > 5 end, AfterLoad),AfterLoad},
  +	{false,_} = {lists:any(fun(Load) -> Load > 25 end, AfterLoad),AfterLoad},
   	true = erlang:system_flag(scheduler_wall_time, false)
       after
   	erlang:system_flag(scheduler_wall_time, false)
  
positive.code: 
  get_load() ->
      Start = erlang:statistics(scheduler_wall_time),
      timer:sleep(500),
      End = erlang:statistics(scheduler_wall_time),
      lists:reverse(lists:sort(load_percentage(lists:sort(Start),lists:sort(End)))).
  
  
negative.code:     try
  	Schedulers = erlang:system_info(schedulers_online),
  	%% Let testserver and everyone else finish their work
  	timer:sleep(1500),
  	%% Empty load
  	EmptyLoad = get_load(),
  	{false, _} = {lists:any(fun(Load) -> Load > 50 end, EmptyLoad),EmptyLoad},
  