Next: RANDOM_NUMBER, Previous: PRODUCT, Up: Intrinsic Procedures
RADIX — Base of a model numberRADIX(X) returns the base of the model representing the entity X.
     RESULT = RADIX(X)
     | X | Shall be of type INTEGERorREAL | 
INTEGER and of the default
integer kind.
               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