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: