This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/14993] [gfortran] RAN (extension) intrinsic/function not supported
- From: "sgk at troutmask dot apl dot washington dot edu" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 31 May 2004 03:00:58 -0000
- Subject: [Bug fortran/14993] [gfortran] RAN (extension) intrinsic/function not supported
- References: <20040417154917.14993.pinskia@gcc.gnu.org>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Additional Comments From sgk at troutmask dot apl dot washington dot edu 2004-05-31 03:00 -------
I think we can make an alias to my implementation, once Paul
and I work out the details. The "+ 1" in "69069 * seed + 1" is
need to guard against a pathalogical seed=0. I guard against
this problem in srand() by explicitly checking for seed=0. Yes, my
implementation will probably generate a different sequence of
random numbers in comparison to RAN(), but if someone is using
RAN() or RAND() then they don't really care about the randomness
in their random numbers.
The PRNG in RANDOM_NUMBER is a good PRNG and the PRNG in rand()
sucks. Do we really need another, slightly different, sucky
PRNG in gfortran.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=14993