RADIX (number)

  Class:  Inquiry function - Generic

  Returns the base of the model representing numbers of the same type
  and kind type parameter as the argument.

  The "number" can be of integer or real type; 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 the integer
  model.  For a real argument, the result has the value "b" as
  defined in the real model.

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

  Examples:

  If X is a REAL*4 value, RADIX (X) has the value 2.