anchor.diff:          X ->
               ct:pal("~w ~w", [Module, X]),
               erlang:sleep(1000),
  -            %ct:fail(unknown_module),
  +            ct:fail(unknown_module),
               ok
       end.
   
  
positive.code:         [] ->
              false;
          _ ->
              util:randomelem(Runnable)
      end.
  
  sleep_delay() -> 100.
  
negative.code:             random:seed(A1, A2, A3),
              ok
      end.
  
  %% @doc Returns a random element from the given (non-empty!) list according to
  %%      a uniform distribution.
  -spec seeded_randomelem(List::[X,...]) -> X.
  seeded_randomelem(List)->
      Length = length(List),
      RandomNum = random:uniform(Length),
      lists:nth(RandomNum, List).
  
  % @todo
  % - start_scheduling could set a new/different white_list
  