Implicit loop for filling a dimension variable

Question

I need help to understand why I cannot compile this code

program test
 integer,dimension(1:10) :: isquares
 isquares(:) = (j**2,j=1,10)
 print*,isquares
end

However, this version is ok:

program test
 print*,(j**2,j=1,10)
end

Alexander Vogt · Accepted Answer · 2017-04-22 12:20:41Z

2

(j**2,j=1,10) is a implicit loop. For an assignment, you need to convert this into an array first:

isquares(:) = [(j**2,j=1,10)]

answered Apr 22, 2017 at 12:20

Alexander Vogt

18.2k13 gold badges56 silver badges72 bronze badges

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

2 Comments

Hans Zimermann Over a year ago

Right, but this feature are only available in Fortran 2003 version. jsquares(:) = [(j**2,j=1,10)] 1 Error: Fortran 2003: [...] style array constructors at (1)

Alexander Vogt Over a year ago

Then use (/ (j**2,j=1,10) /)

Collectives™ on Stack Overflow

Implicit loop for filling a dimension variable

1 Answer 1

2 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

2 Comments

Your Answer

Sign up or log in

Post as a guest

Related