8.197 RADIX — Основание номера модели

Описание:

RADIX(X) возвращает основание модели, представляющей сущность X.

Стандарт:

Fortran 95 и новее

Класс:

Функция запроса

Синтаксис:

RESULT = RADIX(X)

Аргументы:

X	Должен быть типа INTEGER или REAL

Значение возврата:

Значение возврата является скаляром типа INTEGER и стандартного целого типа.

См. также:

SELECTED_REAL_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