Как псевдоним имени функции в Фортран
Не уверен, что название правильно поставлено. Предложения приветствуются.
Вот что я хочу сделать. Проверьте условие, а затем решите, какую функцию использовать в цикле. Например:
if (a < 0) then
loop_func = func1
else
loop_func = func2
endif
Я могу тогда использоватьloop_func
в качестве указателя при написании моего цикла. Обе функции принимают абсолютно одинаковые входные данные и используют разные подходы к решению проблемы, основанные на значенииa
, Это позволит мне иметь только один блок кода вместо двух почти идентичных блоков. Это может относиться и к подпрограммам.
Есть идеи, как это можно реализовать?
Спасибо.