Return to standard_random_numbers.ads CVS log

Up to [local] / OpenXM_contrib / PHC / Ada / Math_Lib / Numbers

Annotation of OpenXM_contrib/PHC/Ada/Math_Lib/Numbers/standard_random_numbers.ads, Revision 1.1.1.1

1.1       maekawa     1: with Standard_Floating_Numbers;          use Standard_Floating_Numbers;
                      2: with Standard_Complex_Numbers;           use Standard_Complex_Numbers;
                      3:
                      4: package Standard_Random_Numbers is
                      5:
                      6: -- DESCRIPTION :
                      7: --   This package provides random number generators for machine numbers.
                      8:
                      9:   function Random ( lower,upper : integer ) return integer;
                     10:
                     11:   -- DESCRIPTION :
                     12:   --   lower <= Random(lower,upper) <= upper, randomly generated.
                     13:
                     14:   function Random return double_float;
                     15:
                     16:   -- DESCRIPTION :
                     17:   --   Returns a random floating-point number in [-1,1].
                     18:
                     19:   function Random return Complex_Number;
                     20:
                     21:   -- DESCRIPTION :
                     22:   --   Returns a random complex number, with real and imaginary
                     23:   --   part in [-1,1].
                     24:
                     25:   function Random ( modulus : double_float ) return Complex_Number;
                     26:
                     27:   -- DESCRIPTION :
                     28:   --   Generates a random complex number with a given modulus,
                     29:   --   so only the argument angle will be chosen at random.
                     30:
                     31:   function Random1 return Complex_Number;
                     32:
                     33:   -- DESCRIPTION :
                     34:   --   Generates a random complex number with modulus one.
                     35:
                     36: end Standard_Random_Numbers;