Fortran Coder

标题: 求助actual EXTERNAL procedure argument F not declared EXTERNAL [打印本页]

作者: 顺利就好 时间: 2023-6-13 13:45
标题: 求助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 时间: 2023-6-13 22:10
加上 external f 这个声明语句

作者: 顺利就好 时间: 2023-6-13 22:32
本帖最后由顺利就好于 2023-6-13 22:34 编辑

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

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

1.png (63 KB, 下载次数: 310)

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

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

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

作者: 顺利就好 时间: 2023-6-16 23:05

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

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

作者: 顺利就好 时间: 2023-6-16 23:05

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

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

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)