Содержит ли Fortran 77 встроенную функцию ALL?

Question

Содержит ли Fortran 77 встроенную функцию ALL?

Я пытаюсь проверить, являются ли все элементы логического массива ложными, не проходя через это. Я не могу найти в ALL() функция в руководстве Compaq Visual Fortran 6.6. Есть ли какой-то другой внутренний способ сделать это, или ALL() поддерживается Фортран 77?

Вот что я попробовал. Он компилируется, но я волнуюсь, что он будет делать что-то не так, поскольку его нет в руководстве:

IF(ALL(JLOGICALS .EQV. .FALSE.)) THEN
    !... 
END IF

1

fortran fortran77

Источник

user2842827 26 мар '15 в 20:38

1 ответ

Решение

Другие вопросы по тегам fortran fortran77

user2737715 26 мар '15 в 20:45 2015-03-26 20:45 · Accepted Answer · 2015-03-26 20:45

ALL оператор был добавлен в стандарт Fortran 90, поэтому, строго говоря, он недоступен для чистого компилятора FORTRAN 77.

Однако большинство компиляторов поддерживают это утверждение, и с помощью Fortran вы можете смешивать стандарты. Ваш код должен работать нормально...

Вот список встроенных функций, которые поддерживаются Compaq Visual Fortran 6.6. ALL среди них.