6.1.31 Побитовые логические операторы

С помощью -fdec, GNU Fortran ослабляет ограничения типа на логические операторы, чтобы разрешить целочисленные операнды, и выполняет соответствующую побитовую операцию вместо этого. Этот флаг предназначен только для совместимости и следует избегать в новом коде. Рассмотрите:

INTEGER :: i, j
i = z'33'
j = z'cc'
print *, i .AND. j

В этом примере, скомпилированном с -fdec, GNU Fortran заменит операцию .AND. вызовом встроенной функции IAND, что даст побитовое И от i и j.

Обратите внимание, что это преобразование произойдёт, если хотя бы один операнд имеет целочисленный тип. В результате логический операнд будет преобразован в целое число, когда другой операнд — целое число в логической операции. В этом случае .TRUE. преобразуется в 1 и .FALSE. в 0.

Вот отображение логического оператора на встроенную побитовую функцию, используемую с -fdec: