求助actual EXTERNAL procedure argument F not declared EXTERNAL

顺利就好

新手求助，遇到一个语法错误，希望各位大佬指点一下，谢谢（用的编译器是Microsoft Developer Studio，比较古老）出错的语句位于第二行

[Fortran] 纯文本查看 复制代码

call broydn(xx,N,check)
call funcv(N,xx,f) !————————————此处为报错语句
   if (check) then
   write(*,*) 'Convergence problems.'
   endif
   ITFLAG=0
   write(*,'(1x,a5,t10,a1,t22,a1)') 'Index','x','f'
   do i=1,27
   if(ABS(f(i)).GT.0.002) then
   write(*,'(1x,i4,6f12.4,6f12.6)') i,xx(i),f(i)

以下是报错的语句：
E:\Fortran项目\: error FOR2636: actual EXTERNAL procedure argument F not declared EXTERNAL

kyra

加上 external f 这个声明语句

顺利就好

kyra 发表于 2023-6-13 22:10
加上 external f 这个声明语句

好的，非常感谢您，但是后面这里又提示报错，Could not find the file constant.fi如图所示，不知道是什么原因，还望指点一二，感谢！

necrohan

在noncover-num(2).f90的第9行应该是用include语句引用了constant.fi文件，需要设置include的路径
你这个constant.fi文件没放在当前路径下吗
另外，别用中文路径

fcode

include 是根据文件所在的硬盘路径来定位的，而不是 Project 结构中的位置。
所以，检查 noncover-num(2).f90 和  constant.fi 是否在同一个文件夹？

此外，别用中文路径。
有条件的话，别用 CVF 或者 PowerStation 了

顺利就好

necrohan 发表于 2023-6-14 08:37
在noncover-num(2).f90的第9行应该是用include语句引用了constant.fi文件，需要设置include的路径
你这个co ...

谢谢解惑，这两天在做别的东西，才看到回复，真是抱歉

顺利就好

fcode 发表于 2023-6-14 13:48
include 是根据文件所在的硬盘路径来定位的，而不是 Project 结构中的位置。
所以，检查 noncover-num(2).f ...

谢谢解惑，这两天在做别的东西，才看到回复，真是抱歉