Fortran Coder

查看: 110|回复: 5

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

[复制链接]

11

帖子

4

主题

0

精华

熟手

F 币
223 元
贡献
119 点
发表于 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

回复

使用道具 举报

446

帖子

0

主题

0

精华

大师

F 币
901 元
贡献
432 点

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

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 币
223 元
贡献
119 点
 楼主| 发表于 2017-7-10 11:43:31 | 显示全部楼层
vvt 发表于 2017-7-10 09:31
在module中contains的子程序(或函数),他们可以访问的变量有:
1. 虚参
2. 局部变量

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

11

帖子

4

主题

0

精华

熟手

F 币
223 元
贡献
119 点
 楼主| 发表于 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变量,就可以省略了。这样写会存在什么风险吗?

1096

帖子

12

主题

5

精华

论坛跑堂

Fcode跑堂

F 币
847 元
贡献
746 点

新人勋章贡献勋章管理勋章帅哥勋章爱心勋章规矩勋章元老勋章水王勋章

发表于 2017-7-10 20:58:22 | 显示全部楼层
如果你要表达的是 module 中定义的 n,那么确实不需要通过虚参来传递 n 了。

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

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

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

11

帖子

4

主题

0

精华

熟手

F 币
223 元
贡献
119 点
 楼主| 发表于 2017-7-10 22:07:32 | 显示全部楼层
fcode 发表于 2017-7-10 20:58
如果你要表达的是 module 中定义的 n,那么确实不需要通过虚参来传递 n 了。

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

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

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

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

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


您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

QQ|捐赠本站|Archiver|关于我们 About Us|QQ群|Fcode

GMT+8, 2017-8-24 05:25

Powered by Discuz! X3.2

© 2001-2017 Comsenz Inc.

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