将值分配给Fortran模块中的整数数组

Question

我在Fortran中有一个名为QFoo的模块。它定义了一个QFooType类型。

我想将整数数组'is_n'的所有元素初始化为0，并希望在模块中执行此操作。有人可以帮忙吗？谢谢！

  module QFoo
      type QFooType              
          integer::i              
          integer, dimension(50) :: is_n                         
      end type QFooType

     !-----------
     ! I know the following code is wrong
     ! but I want to initialize all the is_n elements to 0
     !-----------
     ! do i = 1, 50
     !    is_n(i) = 0
     ! enddo
     !-----------
  end module QFoo

Answer 1

integer, dimension(50) :: is_n = 0

适用于最新版本的英特尔Fortran编译器。我阅读Fortran 95标准表明这是标准行为。