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

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

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

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

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

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