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

切换到窄版开启辅助访问

Fortran Coder»论坛 › 研讨区 › Fortran语法讨论 › 请问为什么这个子程序的值没有输出

返回列表发新帖

查看: 869|回复: 8

上一主题

下一主题

[子程序] 请问为什么这个子程序的值没有输出

已解决

22 帖子	8 主题	0 精华

F 币: 101 元
贡献: 52 点

发消息

电梯直达

跳转到指定楼层

楼主

发表于 2023-12-20 10:18:55 | 只看该作者 |只看大图回帖奖励

回帖奖励

|倒序浏览 |阅读模式

本帖最后由盛世青衫于 2023-12-20 10:20 编辑

图三中，按照判断关系会进入第45行的这个子程序，通过wirte输出看起来子程序确实进入了，并且这个子程序也输出了一个qulv_i_j
但是从结果图看这个值变成了另外一个值这是什么原因呢为什么没有输出呢？
图一为结果图，第一行表示子程序输出的值，应该是正确的，第二行表示主程序结束判断输出的值是错误的，请问有大哥知道原因吗
谢谢

本主题由 fcode 于 2023-12-22 16:07 添加图章已解决

97910632ae1b91c599ff0b7d9adf2c0.png (14.08 KB, 下载次数: 86)

2.png (68.49 KB, 下载次数: 80)

1.png (93.67 KB, 下载次数: 84)

主程序

主程序

分享到: 微信

收藏0 点赞0 点踩0

回复

使用道具举报

725 帖子	4 主题	0 精华

农村外出务工人员

F 币: 657 元
贡献: 337 点

发消息

沙发

发表于 2023-12-20 14:18:04 | 只看该作者

主程序里面的 qulv_i_j 是主程序里的。子程序里的 qulv_i_j 是子程序里的。
主程序和子程序的作用域是独立的。

就像：你家的钥匙是你家的钥匙，我家的钥匙是我家的钥匙。你家的钥匙不是我家的钥匙，我家的钥匙也不是你家的钥匙。

回复支持反对

使用道具举报

22 帖子	8 主题	0 精华

F 币: 101 元
贡献: 52 点

发消息

板凳

楼主| 发表于 2023-12-20 14:28:15 | 只看该作者

本帖最后由盛世青衫于 2023-12-20 14:36 编辑

楚香饭发表于 2023-12-20 14:18
主程序里面的 qulv_i_j 是主程序里的。子程序里的 qulv_i_j 是子程序里的。
主程序和子程序的作用域是独立 ...

请问我如何能让他输入到主程序里呀

，我还想让主程序继续使用这个值进行别的运算

回复支持反对

使用道具举报

725 帖子	4 主题	0 精华

农村外出务工人员

F 币: 657 元
贡献: 337 点

发消息

地板

发表于 2023-12-20 18:30:40 | 只看该作者

通过参数传递，或者通过 module 模块

回复支持反对

使用道具举报

22 帖子	8 主题	0 精华

F 币: 101 元
贡献: 52 点

发消息

5^#

楼主| 发表于 2023-12-21 14:25:38 | 只看该作者

楚香饭发表于 2023-12-20 18:30
通过参数传递，或者通过 module 模块

感谢，我加了common，解决了这个问题。再次感谢

回复支持反对

使用道具举报

725 帖子	4 主题	0 精华

农村外出务工人员

F 币: 657 元
贡献: 337 点

发消息

6^#

发表于 2023-12-21 15:07:57 | 只看该作者

盛世青衫发表于 2023-12-21 14:25
感谢，我加了common，解决了这个问题。再次感谢

给你提供了好的方案（module或者参数传递），你偏偏自己选择了最差的方案（common）。

回复支持反对

使用道具举报

22 帖子	8 主题	0 精华

F 币: 101 元
贡献: 52 点

发消息

7^#

楼主| 发表于 2023-12-22 09:12:30 | 只看该作者

楚香饭发表于 2023-12-21 15:07
给你提供了好的方案（module或者参数传递），你偏偏自己选择了最差的方案（common）。 ...

您好，感谢回复，我刚刚接触不太懂，请问参数传递和我这个common有什么区别嘛，至于模块我不太懂如何只在我的if下调用，我看教程都是在一开始调用模块，如何像子程序一样在需要的地方调用呀，叨扰了，希望得到您的回复

回复支持反对

使用道具举报

725 帖子	4 主题	0 精华

农村外出务工人员

F 币: 657 元
贡献: 337 点

发消息

8^#

发表于 2023-12-22 10:49:47 | 只看该作者

http://common.w.fcode.cn/ 关于common的缺陷。
http://v.fcode.cn/video-module.html 关于 module 的视频教程

回复支持反对

使用道具举报

22 帖子	8 主题	0 精华

F 币: 101 元
贡献: 52 点

发消息

9^#

楼主| 发表于 2023-12-25 09:57:54 | 只看该作者

楚香饭发表于 2023-12-22 10:49
http://common.w.fcode.cn/ 关于common的缺陷。
http://v.fcode.cn/video-module.html 关于 module 的视 ...

感谢大佬感谢

回复支持反对

使用道具举报

返回列表发新帖

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

GMT+8, 2024-11-23 22:44

Powered by Tencent X3.4

© 2013-2024 Tencent

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