顺利就好 发表于 2023-6-13 13:45:18

求助actual EXTERNAL procedure argument F not declared EXTERNAL

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

加上 external f 这个声明语句

顺利就好 发表于 2023-6-13 22:32:09

本帖最后由 顺利就好 于 2023-6-13 22:34 编辑

kyra 发表于 2023-6-13 22:10
加上 external f 这个声明语句
好的，非常感谢您，但是后面这里又提示报错，Could not find the file constant.fi如图所示，不知道是什么原因，还望指点一二，感谢！



necrohan 发表于 2023-6-14 08:37:55

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

fcode 发表于 2023-6-14 13:48:25

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

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

顺利就好 发表于 2023-6-16 23:05:21

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

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

顺利就好 发表于 2023-6-16 23:05:54

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

谢谢解惑，这两天在做别的东西，才看到回复，真是抱歉
页: [1]
查看完整版本: 求助actual EXTERNAL procedure argument F not declared EXTERNAL