Intel Fortran Language Reference - NCI National Facility

9 Intel Fortran Language Reference
Example
QREAL ((2.0q0, 3.0q0)) has the value 2.0q0.
RADIX
Description:
Syntax:
Class:
Arguments:
Results:
Returns the base of the model representing numbers of the same type and kind
parameters as the argument.
result = RADIX (x)
Inquiry function; Generic
x must be of type integer or real; it can be scalar or array valued.
The result is a scalar of type default integer. For an integer argument, the result
has the value r (as defined in “Model for Integer Data”). For a real argument,
the result has the value b (as defined in “Model for Real Data”).
Example
If X is a REAL(4) value, RADIX (X) has the value 2.
RAN
Description:
Syntax:
Class:
Arguments:
Results:
Returns the next number from a sequence of pseudorandom numbers of
uniform distribution over the range 0 to 1. This is a specific function that has
no generic function associated with it. It cannot be passed as an actual
argument.
RAN is not a pure function.
result = RAN (i)
Nonelemental function; Specific
i is the seed. It must be an INTEGER(4) variable or array element.
It should initially be set to a large, odd integer value. The RAN function stores
a value in the argument that is later used to calculate the next random number.
There are no restrictions on the seed, although it should be initialized with
different values on separate runs to obtain different random numbers.
The result type is REAL(4). The result is a floating-point number that is
uniformly distributed in the range between 0.0 inclusive and 1.0 exclusive. It is
set equal to the value associated with the argument i.
9-126