Re: random number generation

[Andrew <eagletalon@chartermi.net>]

tmoran@acm.org wrote:
>>I need to write a program to randomly grab a integer from 1 - 4,and
>>Does this exist in Ada?
> 
>   type Options is range 1 .. 4;
>   package Generate_Options is new Ada.Numerics.Discrete_Random(Options);
>   A_Generator : Generate_Options.Generator;
>   ...
>   X := Generate_Options.Random(A_Generator);
>   Ada.Text_IO.Put_Line("Selected option is" & Options'image(X));
> You could of course replace type Options with
>   type Suits is (Spades, Hearts, Diamonds, Clubs);
> and have several Dealers instead of a single A_Generator, and so forth.
> 
> 
>>     I don't believe it does from what I have been reading.
> 
>   What have you been reading?  If your book doesn't cover random
> number generation, you can go to the authoritative source, section
> A.5.2 of the Ada 95 Reference Manual (available online).



thank you to both of you