How to use PARAMETERS in a DATA statement?

[mecej4]

How about this? [fortran]integer, parameter :: MUL = 7 integer :: i, a(3) = (/(i,i=1,3)/)*MUL write(*,*)a end[/fortran] OR, equivalently, [fortran] integer, parameter :: MUL = 7 integer :: i, a(3) = [1:3]*MUL write(*,*)a end [/fortran]