assigning values to an integer array within a Fortran module

Question

I have a module in Fortran called QFoo. It defines a type QFooType.

I want to initialize all the elements of integer array 'is_n' to 0 and want to do it within the module. Could someone help? Thank you!

  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

High Performance Mark · Accepted Answer · 2016-10-18 19:03:19Z

2

integer, dimension(50) :: is_n = 0

works on the latest version of the Intel Fortran compiler. My reading of the Fortran 95 standard suggests that this is standard behaviour.

edited Oct 18, 2016 at 19:03

answered Dec 17, 2009 at 11:47

High Performance Mark

78.6k7 gold badges109 silver badges168 bronze badges

Sign up to request clarification or add additional context in comments.

1 Comment

apt Over a year ago

great! it worked.. thanks! I didn't think that the syntax we use for non array assignment will work here! Thanks again

Collectives™ on Stack Overflow

assigning values to an integer array within a Fortran module

1 Answer 1

1 Comment

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

1 Comment

Your Answer

Sign up or log in

Post as a guest

Related