RAND — Real pseudo-random number#

RAND(FLAG)#

RAND(FLAG) returns a pseudo-random number from a uniform distribution between 0 and 1. If FLAG is 0, the next number in the current sequence is returned; if FLAG is 1, the generator is restarted by CALL SRAND(0) ; if FLAG has any other value, it is used as a new seed with SRAND.

Parameters

I – Shall be a scalar INTEGER of kind 4.

Returns

The return value is of REAL type and the default kind.

Standard:

GNU extension

Class:

Function

Syntax:
RESULT = RAND(I)
Example:
program test_rand
  integer,parameter :: seed = 86456

  call srand(seed)
  print *, rand(), rand(), rand(), rand()
  print *, rand(seed), rand(), rand(), rand()
end program test_rand
See also:

SRAND — Reinitialize the random number generator, RANDOM_NUMBER — Pseudo-random number