Next: , Previous: PRECISION, Up: Intrinsic Procedures


8.84 RADIX — Base of a model number

Description:
RADIX(X) returns the base of the model representing the entity X.
Option:
f95, gnu
Class:
inquiry function
Syntax:
R = RADIX(X)
Arguments:

X Shall be of type INTEGER or REAL

Return value:
The return value is a scalar of type INTEGER and of the default integer kind.
Example:
          program test_radix
            print *, "The radix for the default integer kind is", radix(0)
            print *, "The radix for the default real kind is", radix(0.0)
          end program test_radix