MAXEXPONENT (real-arg)

  Class:  Inquiry function - Generic

  Returns the maximum exponent in the model representing the same
  type and kind type parameter as the argument.  The argument can be
  scalar or array valued.

  The model for real numbers is described in the HP Fortran for
  OpenVMS Language Reference Manual.

  Example:

  If X is REAL*4 type, MAXEXPONENT (X) has the value 128.