Fortran Coder

标题: 关于module中public变量的疑问 [打印本页]

作者: feishay 时间: 2017-7-10 08:52
标题: 关于module中public变量的疑问
最近看书，根据对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

作者: vvt 时间: 2017-7-10 09:31
在module中contains的子程序（或函数），他们可以访问的变量有：
1. 虚参
2. 局部变量
3. module中定义的变量（无论public还是private）
以上顺序是有优先级的。所以，如果有一个虚参 n 了，则module中定义的 n（无论public还是private）都被“掩盖”

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

作者: feishay 时间: 2017-7-10 11:43

vvt 发表于 2017-7-10 09:31
在module中contains的子程序（或函数），他们可以访问的变量有：
1. 虚参
2. 局部变量

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

作者: feishay 时间: 2017-7-10 19:32

vvt 发表于 2017-7-10 09:31
在module中contains的子程序（或函数），他们可以访问的变量有：
1. 虚参
2. 局部变量

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

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

作者: fcode 时间: 2017-7-10 20:58
如果你要表达的是 module 中定义的 n，那么确实不需要通过虚参来传递 n 了。

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

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

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

作者: feishay 时间: 2017-7-10 22:07

fcode 发表于 2017-7-10 20:58
如果你要表达的是 module 中定义的 n，那么确实不需要通过虚参来传递 n 了。

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

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

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

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

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

作者: telegoat 时间: 2019-10-29 11:13

vvt 发表于 2017-7-10 09:31
在module中contains的子程序（或函数），他们可以访问的变量有：
1. 虚参
2. 局部变量

大师, 关于掩盖, 可以再详细说说吗, 彭国伦老师的书及 fcode 教学视频里都没有提到过啊, 多谢!

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)