title: Ada: Seeding Random
body: <p>How can I seed Ada.Numerics.Discrete_Random with a discrete value?  I see code like:</p>
  
  <pre><code>declare
     type Rand_Range is range 25..75;
     package Rand_Int is new Ada.Numerics.Discrete_Random(Rand_Range);
     seed : Rand_Int.Generator;
     Num : Rand_Range;
  begin
     Rand_Int.Reset(seed);
     Num := Rand_Int.Random(seed);
     Put_Line(Rand_Range'Image(Num));
  end;
  </code></pre>
  
  <p>which seeds the "Rand_Int" with the "seed" value, but I cannot find any instruction on actually setting the seed value.  Or I am completely looking at this the wrong way?  I want to set the seed value to a number (like 4 or 5) that I can control to observe test results.</p>
  
  <p>Thanks!</p>