设为首页收藏本站如何选择编译器？在线F77转F90 繁体浏览

切换到窄版开启辅助访问

Fortran Coder»论坛 › 研讨区 › Fortran语法讨论 › 求助actual EXTERNAL procedure argument F not declare ...

返回列表发新帖

查看: 2909|回复: 6

上一主题

下一主题

[子程序] 求助actual EXTERNAL procedure argument F not declared EXTERNAL

已解决

28 帖子	12 主题	0 精华

F 币: 82 元
贡献: 68 点

发消息

电梯直达

跳转到指定楼层

楼主

发表于 2023-6-13 13:45:18 | 只看该作者 |只看大图回帖奖励

回帖奖励

|倒序浏览 |阅读模式

3F 币

新手求助，遇到一个语法错误，希望各位大佬指点一下，谢谢（用的编译器是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

分享到: 微信

收藏0 点赞0 点踩0

回复

使用道具举报

259 帖子	0 主题	0 精华

World Analyser

F 币: 717 元
贡献: 510 点

发消息

沙发

发表于 2023-6-13 22:10:31 | 只看该作者

加上 external f 这个声明语句

回复

使用道具举报

28 帖子	12 主题	0 精华

F 币: 82 元
贡献: 68 点

发消息

板凳

楼主| 发表于 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如图所示，不知道是什么原因，还望指点一二，感谢！

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

回复

使用道具举报

250 帖子	2 主题	0 精华

F 币: 1731 元
贡献: 872 点

发消息

地板

发表于 2023-6-14 08:37:55 | 只看该作者

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

回复

使用道具举报

实名认证

2022 帖子	12 主题	5 精华

臭石头雪球

F 币: 1598 元
贡献: 689 点

发消息

5^#

发表于 2023-6-14 13:48:25 | 只看该作者

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

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

回复

使用道具举报

28 帖子	12 主题	0 精华

F 币: 82 元
贡献: 68 点

发消息

6^#

楼主| 发表于 2023-6-16 23:05:21 | 只看该作者

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

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

回复

使用道具举报

28 帖子	12 主题	0 精华

F 币: 82 元
贡献: 68 点

发消息

7^#

楼主| 发表于 2023-6-16 23:05:54 | 只看该作者

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

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

回复

使用道具举报

返回列表发新帖

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-11-23 18:55

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表