micro/rnd_data_2.d

   1 // Written by Kevin Bealer <kevinbealer@gmail.com>
   2 // Found at http://www.digitalmars.com/webnews/newsgroups.php?art_group=digitalmars.D.announce&article_id=6978
   3 // Sightly modified by Leandro Lucarella <llucax@gmail.com>
   4 // (changed not to print anything and lower the total iterations; ported to
   5 // Tango)
   6
   7 import tango.math.random.Random;
   8
   9 const N = 2_000_000;
  10 const L = 20;
  11 const I = 50; // original: 200
  12
  13 int main(char[][] args)
  14 {
  15      int[][] stuff;
  16
  17      stuff.length = L;
  18
  19      auto rand = new Random();
  20
  21      for(int i = 0; i < I; i++) {
  22          int[] arr = new int[N];
  23
  24          for(int j = 0; j < arr.length; j++) {
  25              rand(arr[j]);
  26          }
  27
  28          int zig = i;
  29          if (zig > stuff.length)
  30              zig = rand.uniform!(int) % stuff.length;
  31
  32          stuff[zig] = arr;
  33      }
  34
  35      return 0;
  36 }
  37