How to use PARAMETERS in a DATA statement?

How to use PARAMETERS in a DATA statement?

Bild des Benutzers billsincl
2 Beiträge / 0 neu
Letzter Beitrag
Nähere Informationen zur Compiler-Optimierung finden Sie in unserem Optimierungshinweis.
Bild des Benutzers mecej4

How about this?

integer, parameter :: MUL = 7

integer :: i, a(3) = (/(i,i=1,3)/)*MUL

write(*,*)a

end

OR, equivalently,


integer, parameter :: MUL = 7

integer :: i, a(3) = [1:3]*MUL

write(*,*)a

end

Melden Sie sich an, um einen Kommentar zu hinterlassen.