Fortran Coder

查看: 11501|回复: 7
打印 上一主题 下一主题

[子程序] 调用子程序的返回值

[复制链接]

712

帖子

4

主题

0

精华

大师

农村外出务工人员

F 币
607 元
贡献
311 点

新人勋章爱心勋章水王勋章元老勋章热心勋章

楼主
发表于 2014-7-16 18:57:20 | 显示全部楼层
虚参的数值可以改变,同时会影响实参。但通常,这种情况不叫“返回值”,以便与 function 相区别。

712

帖子

4

主题

0

精华

大师

农村外出务工人员

F 币
607 元
贡献
311 点

新人勋章爱心勋章水王勋章元老勋章热心勋章

沙发
发表于 2014-7-16 20:01:56 | 显示全部楼层
程序单元之间共享数据,一般有几种方法:
1.实参虚参对应
2.common(不推荐)
3.module(推荐)
4.文件(极其大量数据)

既然你使用了实参虚参对应,就不必使用 common 了。或者你使用 common,而不要使用实参虚参对应。

712

帖子

4

主题

0

精华

大师

农村外出务工人员

F 币
607 元
贡献
311 点

新人勋章爱心勋章水王勋章元老勋章热心勋章

板凳
发表于 2014-7-16 20:03:05 | 显示全部楼层
gengyan123456 发表于 2014-7-16 19:16
谢谢!那你可不可以帮我看一下这个程序
SUBROUTINE MATRIX(norder)
      implicit real*8 (a-h,o-z)

NM 是通过 common 获得的,不一定在主程序里,只要使用了common的程序单元,都存在。(相同的拷贝)
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

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

GMT+8, 2024-5-11 02:49

Powered by Tencent X3.4

© 2013-2024 Tencent

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