9.85 DIGITS — Функция значимых двоичных разрядов

Описание:

DIGITS(X) возвращает количество значимых двоичных разрядов внутренней модели представления X. Например, на системе с 32-разрядным представлением чисел с плавающей точкой, обычное вещественное число, скорее всего, вернёт 24.

Стандарт:

Fortran 90 и более поздние версии

Класс:

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

Синтаксис:

RESULT = DIGITS(X)

Аргументы:

X	Тип может быть INTEGER или REAL.

Возвращаемое значение:

Возвращаемое значение имеет тип INTEGER.

Пример:

program test_digits
    integer :: i = 12345
    real :: x = 3.143
    real(8) :: y = 2.33
    print *, digits(i)
    print *, digits(x)
    print *, digits(y)
end program test_digits