求助大神，关于在module中使用common命令的问题

fcode

这种问题没有丝毫意义。
因为一旦用了 module，那么 common 就该被摒弃了。没意思。

以下是较真：
如果使用这些变量的程序单元，通过 common 语句修饰这些变量。则按照位置对应。
如果通过 use modul（并且没有common的话），则按照变量名对应。
如果即写了 use modul，又写了 common，则会报错（重复定义）。
最后强调：请摒弃 common

fcode

一枚硬币 发表于 2017-8-11 09:23
就是说，module和common谁起作用是按照是use module还是common来决定的。因为是在看别人以前写的程序，所以 ...

不，他们都起作用了。

此时，可以认为这些变量，如 G，具有三个名字：
G （module内部的名字，仅在Module内部可以访问）
modul::G  （module 对外的名字）
/CONST1/G  （Common的名字）

虽然 G 有三个名字，但其实只有一块内存。

在使用它的程序单元中，第一个名字不能直接访问（因为是module内部的）
通过第二个名字访问，则按照 Module 的变量名对应规则。
通过第三个名字访问，则按照 Common 的字节对应规则。

不能同时通过第二和第三个名字访问。（编译器会认为重名）

fcode

chiangtp 发表于 2017-8-11 16:43
COMMON: "block"方式的資料共享, powerful/flexible, 當然也dangerous

[mw_shl_code=fortran,true]SUBRO ...

摒弃一词，如果在正式场合，的确不妥。（因为它有忘恩负义的意思）
但是在口语里，我们经常会故意用它来形容应该“果断的”放弃。