Rand Intrinsic
..............
Rand(FLAG)
Rand: `REAL(KIND=1)' function.
FLAG: `INTEGER'; OPTIONAL; scalar; INTENT(IN).
Intrinsic groups: `unix'.
Description:
Returns a uniform quasi-random number between 0 and 1. If FLAG is
0, the next number in sequence is returned; if FLAG is 1, the generator
is restarted by calling `srand(0)'; if FLAG has any other value, it is
used as a new seed with `srand'.
Note:SRand Intrinsic.
_Note:_ As typically implemented (by the routine of the same name in
the C library), this random number generator is a very poor one, though
the BSD and GNU libraries provide a much better implementation than the
`traditional' one. On a different system you almost certainly want to
use something better.