RADIX — Base of a model number

RADIX(X)

RADIX(X) returns the base of the model representing the entity X.

Parameters

X – Shall be of type INTEGER or REAL

Returns

The return value is a scalar of type INTEGER and of the default integer kind.

Standard:

Fortran 90 and later

Class:

Inquiry function

Syntax:

RESULT = RADIX(X)

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

See also:

SELECTED_REAL_KIND