RADIX

 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.