TINY (real-number)

  Class:  Inquiry function - Generic

  Returns the smallest number in the model representing the same type
  and kind type parameter as the argument.

  The argument must be of type real; it can be scalar or array
  valued.  The result type is scalar of the same type and kind type
  parameter as the argument.  The real model is described in the
  HP Fortran for OpenVMS Language Reference Manual.

  Examples:

  If X is of type REAL*4, TINY (X) has the value 2**-126.