如何在FORTRAN 90

Question

我想在我的模块代码定义一个函数，并调用它的主要Fortran代码，但是当我想编译我的代码我收到此错误定义功能：

此实际参数必须是外部用户函数的名称或内部函数的名称。

，我的作用是：

Function func (x) 
    implicit none 
    double precision func,x 
    func=x 
    RETURN 
end function func 

，并在主代码

call Romberg (dra,func,ra(mm),ra(kk)) 

我想衡量之间的destance ra(mm) & ra(kk)

Answer 1

地址：

external func 

在呼叫者。这告诉调用者“func”是一个外部过程。你显然已经用Romberg声明了一个明确的接口来指定参数是一个过程。