Next: RAN, Previous: PRODUCT, Up: Intrinsic Procedures [Contents][Index]
RADIX
— Base of a model numberRADIX(X)
returns the base of the model representing the entity X.
Fortran 90 and later
Inquiry function
RESULT = RADIX(X)
X | Shall be of type INTEGER or REAL |
The return value is a scalar of type 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