Использование содержит, интерфейс, модуль или отдельные подпрограммы?

Question

Я написал код в Fortran, но не получил уверенности в том, как структурировать более длинные коды.

Я часто хочу assumed-shape arrays. Это представляется возможным при использовании interface block, a module или contains. Однако наличие подпрограммы вне основного кода без использования каких-либо из этих методов работает во многих случаях, но не для assumed-shape arrays.

В каком контексте предпочтительнее каждый из этих подходов, и каковы основные отличия?

Каким образом переменные разделяются/унаследованы в каждом подходе?

Answer 1

Интерфейсный блок - дополнительная работа. Вы должны написать блок и пересмотреть его при изменении процедуры. Интерфейсные блоки полезны для таких целей, как использование средств привязки ISO C для вызова подпрограммы языка C.

Наличие подпрограммы под «содержит» в основной программе имеет тот недостаток, что все локальные переменные наследуются. Я думаю, что лучше для процедур быть более изолированными.

Модули делают процедуры более изолированными, а доступ переменных более ясен - если вы не используете чрезмерное использование переменных модуля. Кроме того, проще использовать процедуры из модулей в других программах.