关于module中public变量的疑问
最近看书，根据对module中public变量的理解写了个简单的演示程序，疑问我在程序的注释中已经说明。我的理解是
module中public的变量在module contains中子程序可以直接使用，不需要定义
在主程序或者其它module中只要use该module也可以直接使用，不需要定义
不知道这样理解对不对，还请各位老师帮忙指点，先谢过！
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已经在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
在module中contains的子程序（或函数），他们可以访问的变量有：
1. 虚参
2. 局部变量
3. module中定义的变量（无论public还是private）
以上顺序是有优先级的。所以，如果有一个虚参 n 了，则module中定义的 n（无论public还是private）都被“掩盖”
在module中定义的 private 变量。
在module内部也可以随意使用，但外部（主程序或其他use了该模块的程序单元）则不能使用。 vvt 发表于 2017-7-10 09:31
在module中contains的子程序（或函数），他们可以访问的变量有：
1. 虚参
2. 局部变量
非常感谢 vvt 的详细解释。
关于这个优先级能否提供些出处和程序事例供学习，在彭国伦一书好像没有看到这方面的阐述。 vvt 发表于 2017-7-10 09:31
在module中contains的子程序（或函数），他们可以访问的变量有：
1. 虚参
2. 局部变量
既然n定义为public变量，那么子程序的实参和虚参是不是就可以省略了
contains中的子程序直接写subroutine cal()
调用该子程序时写 call cal()
vvt 老师，我这样想对吗？
如果实参和虚参有好多变量，都是定义的public变量，就可以省略了。这样写会存在什么风险吗？
如果你要表达的是 module 中定义的 n，那么确实不需要通过虚参来传递 n 了。
这样做的风险就是，会降低可移植性和独立性。
当你发现下次也需要这个 cal 函数的时候，你不但需要把 cal 的代码拷贝到新的地方，你还必须把 cal 函数涉及到的module中的变量也拷贝过去。
而 cal 函数依赖哪些 module 中的变量？不是特别的清晰和明了。
所以，如果特别通用的代码，还是尽量的书写成独立的可移植的部分，通过虚参来传递。
特别有关联性的变量（们）和函数（们），可以捆绑在一个module里。 fcode 发表于 2017-7-10 20:58
如果你要表达的是 module 中定义的 n，那么确实不需要通过虚参来传递 n 了。
这样做的风险就是，会降低可 ...
非常感谢大神 fcode老师的详细解答，您的这段解答我这个菜鸟还需更多实践来加强理解。
我已经编写了一个关于液滴成核和凝结生长问题的程序，基本上都是f77的语法，现在在学高版本的fortran语法，改进程序。看了本站分享的视频，真是受益匪浅，在此对你们的无私奉献表示非常感谢。
在原来的程序中，定义的变量很多，实参和虚参数量也较多，需要换行，而且需要多次调用子程序。
在看到module这个新语法后觉得很好用，希望将变量在module中定义为public 变量，这样主程序和子程序用到时就不必定义，实参和虚参也可以省略，这样程序看起来估计会简洁好多。
我正在改进程序，还没有考虑在其它问题中调用现有的moduel和子程序，fcode老师的提醒慢慢体会。
vvt 发表于 2017-7-10 09:31
在module中contains的子程序（或函数），他们可以访问的变量有：
1. 虚参
2. 局部变量
大师, 关于掩盖, 可以再详细说说吗, 彭国伦老师的书及 fcode 教学视频里都没有提到过啊, 多谢!
页:
[1]