Fortran Coder

标题: common [打印本页]

作者: 我是刚子仔 时间: 2014-4-29 12:47
标题: common
请问大神，在fortran中的common是什么？它有什么作用？

作者: 楚香饭 时间: 2014-4-29 13:47
早期用于定义全局变量。

[Fortran] 纯文本查看 复制代码

Program Main

  real :: a = 1.0 , b = 2.0 , c = 3.0

  common a , b , c

  call sub()

End Program Main



Subroutine sub()

  real :: a , b , c

  common a , c , b !// 此处按顺序对应

  write( * , * ) a , b , c !// 输出 1.0 ， 3.0 ， 2.0

End Subroutine sub

注意它是按顺序对应，而不是按变量名对应。所以极易出错，不推荐使用。

作者: 我是刚子仔 时间: 2014-4-30 15:07

chuxf 发表于 2014-4-29 13:47
早期用于定义全局变量。

[mw_shl_code=fortran,true]Program Main

好的，谢谢！

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