fortran 模块的子例程名称冲突

Question

我有两个不同的模块，每个模块都有相同的子程序。主程序将根据特定条件调用其中一个。我想避免将这些子例程中的每一个重命名为不同的名称。

Answer 1

如果你有两个模块 A 和 B 包含相同的方法 foo() 那么首先你可以创建一个本地别名

program SOModNames
use A, fooA => foo
use B, fooB => foo
implicit none

! Variables
real X(10), Y(10)

call fooA(X,10)
call fooB(Y,10)

end program SOModNames

Unofrtunatelty 例如，您无法使用call A::foo(X,10) 将范围限定为模块。