求助大神，关于在module中使用common命令的问题
希望大神，帮忙解惑，谢谢了:-lol:-lol。具体问题是：module modul
IMPLICIT REAL*8(A-H,O-Z),INTEGER(I-N)
PARAMETER(MI=201,MJ=51)
COMMON /CONST1/G,PI,CN,OMIGA,PIR180,DEN,DENAIR,DENSED,CW,
1 VIS,oi,tk,rj,CC0,DRAWy,alph3,w3,sk,qm,d50
end module modul
这种情况，应该以那个命令为准呢。就是common里的变量，在外面引用时，是按照common的位置
对应，还是按照module的变量名对应呢。
问题不知道描述的够不够清楚，自己学Fortran算是初级阶段，如果不够清楚，希望大家原谅。可以在问我
真切的希望得到答案，也希望在和大家讨论中成长！！！
这种问题没有丝毫意义。
因为一旦用了 module，那么 common 就该被摒弃了。没意思。
以下是较真：
如果使用这些变量的程序单元，通过 common 语句修饰这些变量。则按照位置对应。
如果通过 use modul（并且没有common的话），则按照变量名对应。
如果即写了 use modul，又写了 common，则会报错（重复定义）。
最后强调：请摒弃 common
就是说，module和common谁起作用是按照是use module还是common来决定的。因为是在看别人以前写的程序，所以在这个地方有些疑惑。谢谢fcode的大神:-lol fcode 发表于 2017-8-10 22:30
这种问题没有丝毫意义。
因为一旦用了 module，那么 common 就该被摒弃了。没意思。
COMMON: "block"方式的資料共享, powerful/flexible, 當然也dangerous
SUBROUTINE sub1(...)
REAL :: A(10) ! all data in one "block" (打包)
COMMON /ABC/ A
SAVE /ABC/
SUBROUTINE sub2(...) !---> can be different numeric-type(+kind)/structute
COMPLEX :: z ! (a) complex = two reals
INTEGER :: i ! (b) easy to get binary representation of a real
REAL :: b(2,2), c(2), pi ! (c) flexible data structure
COMMON /ABC/ z, i, b, c, pi
SAVE /ABC/
(a)與(b) TRANSFER可為之但高下立判, (c)?
舉雙手贊成:能用 CASE/Contour-Do/WHERE/Assumed_Shape/MODULE 為之的,
就不要用 IF/General-DO/FORALL/Explicit-Shape-Adjustable-Size/COMMON
但是, "摒弃", 個人以為太激烈了點
一枚硬币 发表于 2017-8-11 09:23
就是说，module和common谁起作用是按照是use module还是common来决定的。因为是在看别人以前写的程序，所以 ...
不，他们都起作用了。
此时，可以认为这些变量，如 G，具有三个名字：
G （module内部的名字，仅在Module内部可以访问）
modul::G（module 对外的名字）
/CONST1/G（Common的名字）
虽然 G 有三个名字，但其实只有一块内存。
在使用它的程序单元中，第一个名字不能直接访问（因为是module内部的）
通过第二个名字访问，则按照 Module 的变量名对应规则。
通过第三个名字访问，则按照 Common 的字节对应规则。
不能同时通过第二和第三个名字访问。（编译器会认为重名） chiangtp 发表于 2017-8-11 16:43
COMMON: "block"方式的資料共享, powerful/flexible, 當然也dangerous
SUBRO ...
摒弃一词，如果在正式场合，的确不妥。（因为它有忘恩负义的意思）
但是在口语里，我们经常会故意用它来形容应该“果断的”放弃。 fcode 发表于 2017-8-11 19:11
摒弃一词，如果在正式场合，的确不妥。（因为它有忘恩负义的意思）
但是在口语里，我们经常会故意用它来 ...
言重了, 無關"忘恩负义"
初學者, 單純的情況下, 能用MODULE當然就不用COMMON (別問為什麼, 就當Fortran沒COMMON語法)
但是對一定程度的程式員, 他應該要知道"為什麼", 以及COMMON能為MODULE所不及 chiangtp 发表于 2017-8-11 16:43
COMMON: "block"方式的資料共享, powerful/flexible, 當然也dangerous
SUBRO ...
赞赞赞赞赞赞 fcode 发表于 2017-8-11 19:07
不，他们都起作用了。
此时，可以认为这些变量，如 G，具有三个名字：
赞赞赞，谢谢大神。
页:
[1]