HP Fortran Programmer's Reference (September 2007)

Intrinsic procedures
Intrinsic procedure specifications
Chapter 11610
Argument
HARVEST must be of type real. It is an INTENT(OUT) argument. It may be a scalar or an array
variable. It is set to contain pseudorandom numbers from the uniform distribution in the
interval 0 <= x < 1.
RANDOM_SEED(SIZE, PUT, GET)
Optional arguments
SIZE, PUT, GET
Description
Restarts or queries the pseudorandom number generator used by RANDOM_NUMBER.
Class
Subroutine.
Arguments
There must either be exactly one or no arguments present.
SIZE (optional) must be scalar and of type default integer. It is an INTENT(OUT) argument.
It is set to the number N of integers that the processor uses to hold the value
of the seed.
PUT (optional) must be a default integer array of rank one and size >= N . It is an
INTENT(IN) argument. It is used by the processor to set the seed value.
GET (optional) must be a default integer array of rank one and size > = N . It is an
INTENT(OUT) argument. It is set by the processor to the current value of the
seed. If no argument is present, the processor sets the seed to a
processor-dependent value.
RANGE(X)
Description
Returns the decimal exponent range in the model representing integer or real numbers with
the same kind type parameter as the argument.