Smee

Initialise really huge array with Open64 fortran

Discussion created by Smee on Jun 6, 2011
Latest reply on Dec 22, 2011 by santosh.zanjurne

I need to initialise a really huge array in the code, so I did this:

 

   REAL(8),PARAMETER:: PROPVA(5,176,10) = RESHAPE((/   &
&-620.46D0, 107.56D0,2582111.64D0,  -1.00D0,  -1.00D0,&
&-621.15D0,-106.67D0,     -1.00D0,  -1.00D0,  -1.00D0,&
&  -1.00D0,  -1.00D0,     -1.00D0,  -1.00D0,  -1.00D0,&
&  -1.00D0,  -1.00D0,     -1.00D0,  -1.00D0,  -1.00D0,&
&  -1.00D0,  -1.00D0,     -1.00D0,  -1.00D0,  -1.00D0,&

! Many more lines here

&1265.15D0,38.327905D0,4557.7588D0,4.8487814D-05,0.14543109D0,&
&1269.15D0,38.193556D0,4568.2317D0,4.8622668D-05,0.14588583D0,&
&1273.15D0,38.060267D0,4578.7088D0,4.8757318D-05,0.14634023D0&
&/),(/5,176,10/))

That worked fine both under an old Compaq and a new Intel compilers, but Open64 refuses to accept more than 499 continuation lines. I tried to merge some lines, but that gave me

Signal: Segmentation fault in Front End Parse/Semantic phase.
Error: Signal Segmentation fault in phase Front End Parse/Semantic -- processing aborted

So, how can I initialise really HUGE array with given values?

Outcomes