通过use/only包含的变量初始化

Question

我想在一个模块中创建一个变量，从我从另一个导入的数量。这个模块中的所有函数都将使用这个新变量，所以我不希望在每个函数中都重新声明和分配它。我想在开始时声明并分配它一次，并使其全局到整个模块。但是这行不通:

module example_mod
   use some_constants, only:derp, blah
   implicit none
   real, private :: derived_const = derp*(blah-1.0)/50.0   !doesn't work!
contains
!a whole bunch of functions that use derived_const

我怎样才能得到我想要的?

Answer 1

编译器告诉你"derp"应该是一个常量。您可以通过在它的声明中添加说明符parameter来使它成为一个。这对于常量变量也更安全，因为它可以防止程序员意外地更改它们。