Fortran Coder

查看: 16701|回复: 6
打印 上一主题 下一主题

[Module] 关于module中public变量的疑问

[复制链接]

11

帖子

4

主题

0

精华

熟手

F 币
263 元
贡献
138 点
跳转到指定楼层
楼主
发表于 2017-7-10 08:52:26 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
最近看书,根据对module中public变量的理解写了个简单的演示程序,疑问我在程序的注释中已经说明。

我的理解是
module中public的变量在module contains中子程序可以直接使用,不需要定义
在主程序或者其它module中只要use该module也可以直接使用,不需要定义
不知道这样理解对不对,还请各位老师帮忙指点,先谢过!
[Fortran] 纯文本查看 复制代码
Module var
    Implicit None
    integer,public:: n
    integer,private:: i,j
    contains
    subroutine cal(n)

    integer n              !  n变量如果定义能顺利运行,若不定义,会出现如下错误
                                !  This name does not have a type, and must have an explicit type.   [N]
                                !  但是,n已经在module中定义为public变量了,为啥不能直接用
    j=0
    do i=1,n
        j=j+i
        write(*,*)i,n,j
    end do
    end subroutine cal
end Module var

program main
    use var
    Implicit None
    n=10
    call cal(n)

    pause
end

分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

954

帖子

0

主题

0

精华

大师

F 币
184 元
贡献
75 点

规矩勋章元老勋章新人勋章水王勋章热心勋章

QQ
沙发
发表于 2017-7-10 09:31:43 | 只看该作者
在module中contains的子程序(或函数),他们可以访问的变量有:
1. 虚参
2. 局部变量
3. module中定义的变量(无论public还是private)
以上顺序是有优先级的。所以,如果有一个虚参 n 了,则module中定义的 n(无论public还是private)都被“掩盖”

在module中定义的 private 变量。
在module内部也可以随意使用,但外部(主程序或其他use了该模块的程序单元)则不能使用。

11

帖子

4

主题

0

精华

熟手

F 币
263 元
贡献
138 点
板凳
 楼主| 发表于 2017-7-10 11:43:31 | 只看该作者
vvt 发表于 2017-7-10 09:31
在module中contains的子程序(或函数),他们可以访问的变量有:
1. 虚参
2. 局部变量

非常感谢 vvt 的详细解释。
关于这个优先级能否提供些出处和程序事例供学习,在彭国伦一书好像没有看到这方面的阐述。

11

帖子

4

主题

0

精华

熟手

F 币
263 元
贡献
138 点
地板
 楼主| 发表于 2017-7-10 19:32:06 | 只看该作者
vvt 发表于 2017-7-10 09:31
在module中contains的子程序(或函数),他们可以访问的变量有:
1. 虚参
2. 局部变量

既然n定义为public变量,那么子程序的实参和虚参是不是就可以省略了
contains中的子程序直接写  subroutine cal()
调用该子程序时写 call cal()

vvt 老师,我这样想对吗?
如果实参和虚参有好多变量,都是定义的public变量,就可以省略了。这样写会存在什么风险吗?

2033

帖子

12

主题

5

精华

论坛跑堂

臭石头雪球

F 币
1642 元
贡献
709 点

美女勋章热心勋章星光勋章新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

5#
发表于 2017-7-10 20:58:22 | 只看该作者
如果你要表达的是 module 中定义的 n,那么确实不需要通过虚参来传递 n 了。

这样做的风险就是,会降低可移植性和独立性。

当你发现下次也需要这个 cal 函数的时候,你不但需要把 cal 的代码拷贝到新的地方,你还必须把 cal 函数涉及到的module中的变量也拷贝过去。
而 cal 函数依赖哪些 module 中的变量?不是特别的清晰和明了。

所以,如果特别通用的代码,还是尽量的书写成独立的可移植的部分,通过虚参来传递。
特别有关联性的变量(们)和函数(们),可以捆绑在一个module里。

11

帖子

4

主题

0

精华

熟手

F 币
263 元
贡献
138 点
6#
 楼主| 发表于 2017-7-10 22:07:32 | 只看该作者
fcode 发表于 2017-7-10 20:58
如果你要表达的是 module 中定义的 n,那么确实不需要通过虚参来传递 n 了。

这样做的风险就是,会降低可 ...

非常感谢大神 fcode老师的详细解答,您的这段解答我这个菜鸟还需更多实践来加强理解。

我已经编写了一个关于液滴成核和凝结生长问题的程序,基本上都是f77的语法,现在在学高版本的fortran语法,改进程序。看了本站分享的视频,真是受益匪浅,在此对你们的无私奉献表示非常感谢。

在原来的程序中,定义的变量很多,实参和虚参数量也较多,需要换行,而且需要多次调用子程序。
在看到module这个新语法后觉得很好用,希望将变量在module中定义为public 变量,这样主程序和子程序用到时就不必定义,实参和虚参也可以省略,这样程序看起来估计会简洁好多。

我正在改进程序,还没有考虑在其它问题中调用现有的moduel和子程序,fcode老师的提醒慢慢体会。


5

帖子

1

主题

0

精华

入门

F 币
61 元
贡献
33 点
7#
发表于 2019-10-29 11:13:15 | 只看该作者
vvt 发表于 2017-7-10 09:31
在module中contains的子程序(或函数),他们可以访问的变量有:
1. 虚参
2. 局部变量

大师, 关于掩盖, 可以再详细说说吗, 彭国伦老师的书及 fcode 教学视频里都没有提到过啊, 多谢!
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

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

GMT+8, 2024-12-27 07:12

Powered by Tencent X3.4

© 2013-2024 Tencent

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