anchor.diff:      URL        = url(Server, Port, SocketType, WorkSim), 
       ServerRoot = filename:join(ServerDir, "server_root"),  
       DocRoot    = ServerRoot, %% Not really used in this test
  -
  -    ?DEBUG("randomize setup", []), 
  -    randomized_sizes_init(), 
   
       %% Start used applications
       ?DEBUG("ensure crypto started", []), 
  
positive.code: %% there is exact one number between A and B and then 
  %% randomizes that list.
  
  randomized_sizes_init() ->
      {A, B, C} = os:timestamp(),
      random:seed(A, B, C).
  
  randomized_sizes(From, To, Incr) ->
      L   = lists:seq(From, To, Incr),
  
negative.code: randomized_sizes2(L, N, Len) when N >= Len ->
      L;
  randomized_sizes2(L, N, Len) ->
      SplitWhere = rand:uniform(Len),
      {A, B} = lists:split(SplitWhere, L),
      randomized_sizes2(B ++ A, N+1, Len).
  