Можно ли в Фортране поместить функцию в общий блок, например: COMMON / myblock / func (где x - некоторая переменная, а func - функция).
Моя проблема в том, что я хотел бы создать функцию s (x), которая вызывает внешнюю функцию func (x), но без передачи func в s (x). Для моего проекта s (x) должен быть функцией только одной переменной, т.е. я не хочу этого делать: function s (x, func) s = func (x)
Вместо этого я надеюсь, что смогу сделать: function s (x) common / myblock / func s = func (x)
Или, если у кого-то есть другие предложения по использованию модулей или чего-то еще, это будет здорово.
Заранее благодарю за любую помощь.
o.
а затем иметь такой же общий (myblock) в подпрограмме, которая вызывает s (x).