RANGE (number)

  Class:  Inquiry function - Generic

  Returns the decimal exponent range in the model representing
  numbers with the same kind type parameter as the argument.

  The argument can be of type integer, real, or complex.  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 INT (LOG10 ( HUGE("number") )).
  For a real or complex argument, the result has the value INT(MIN
  (LOG10( HUGE("number") ), -LOG10( TINY("number") ))).

  For information on the integer and real models, see the HP Fortran
  for OpenVMS Language Reference Manual.

  Example:

  If X is a REAL*4 value, RANGE (X) has the value 37.  (HUGE(X) = (1
  - 2**-24) x 2**128 and TINY(X) = 2**-126.)