6.1.29 Битовые логические операторы

С помощью -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: