radix(3I)

NAME
     RADIX - Returns the base number from the real or integer number models

SYNOPSIS
     RADIX ([X=]x)

IMPLEMENTATION
     UNICOS, UNICOS/mk, IRIX systems

     CF90, MIPSpro 7 Fortran 90

STANDARDS
     Fortran

DESCRIPTION
     The RADIX intrinsic function returns the base number of the model
     (either real or integer) that represents numbers of the same type and
     kind type parameter as the argument specified.  For more information
     on the real number model and the integer number model, see the
     MODELS(3I) man page.  It accepts the following argument:

     x    Must be of type integer or real.  It may be scalar or array
          valued.

     RADIX is an inquiry function.  The name of this intrinsic cannot be
     passed as an argument.

RETURN VALUES
     The result is a default integer scalar.  The result has the value r if
     x is of type integer and the value b if x is of type real, where r and
     b are as defined in the model.

EXAMPLES
     RADIX(X) has the value 2 for real X.

SEE ALSO
     MODELS(3I)

     Intrinsic Procedures Reference Manual for the printed version of this
     man page.