大赞!我补充一个,不仅要在每个使用该common的子程序/主程序中定义common里面的每一个变量,而且似乎连个数和顺序都不能变,比如上面的例子,如果仅仅定义a或者b,或者是定义integer::b,a即使下面依然写common a,b,似乎对应也会出错。