依次调用几个Fortran95函数

编程问答 2022-06-10

问题描述

我定义了许多功能，如下所示：

function f1(x) result (y)
    ...
end function

function f2(x) result (y)
    ...
end function

...

function fn(x) result (y)
    ...
end function

我正在寻找一种通过某种输入x(i)调用每个人并打印结果的自动方法。原型将是：

f = (/f1,f2,...,fn/)
do i=1,m
    do j=1,n
        y = f(j)(x(i))
        write(*,*) y
    end do
end do

当然，这不起作用。我尝试了一些goto方法，但是似乎根本不允许使用别名函数名称。

注意：：我正在使用fortran95。

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

arraysarraysarraysfortranfortran95functionfunctionfunctionprocedure