RANGE(3I) Last changed: 1-6-98
NAME
RANGE - Returns the decimal exponent range of a number according to
the real or integer model
SYNOPSIS
RANGE ([X=]x)
IMPLEMENTATION
UNICOS, UNICOS/mk, and IRIX systems
STANDARDS
Fortran 90
DESCRIPTION
The RANGE intrinsic function returns the decimal exponent range in the
model representing integer or real numbers with the same kind type
parameter as the argument. For information on integer number model or
the real number model, see the MODELS(3I) man page. It accepts the
following argument:
x Must be of type integer, real, or complex. It may be scalar or
array valued.
RANGE is an inquiry function. The name of this intrinsic cannot be
passed as an argument.
RETURN VALUES
The result is a default integer scalar.
For an integer argument, the result has the value INT(LOG10 (huge)),
where huge is the largest positive integer in the model representing
integer numbers with same kind type parameter as x.
For a real or complex argument, the result has the value
INT(MIN(LOG10(huge),-LOG10(tiny))), where huge and tiny are the
largest and smallest positive numbers in the model representing real
numbers with the same value for the kind type parameter as x.
EXAMPLES
On UNICOS systems, excluding CRAY T90 systems that support IEEE
floating-point arithmetic, RANGE(X) has the value 2465 for real X.
On IRIX systems, RANGE(X) has the following values:
* 37 for real (KIND=4) X
* 307 for real (KIND=8) X
* 291 for real (KIND=16) X
On UNICOS/mk systems, RANGE(X) has the following values:
* 37 for real (KIND=4) X
* 307 for real (KIND=8) X
On CRAY T90 systems that support IEEE floating-point arithmetic,
RANGE(X) has the following values:
* 37 for real (KIND=4) X
* 307 for real (KIND=8) X
* 4931 for real (KIND=16) X
SEE ALSOMODELS(3I)
Intrinsic Procedures Reference Manual, publication SR-2138, for the
printed version of this man page.
