Software Archive
Read-only legacy content
17061 Discussions

WRITE problem

Intel_C_Intel
Employee
312 Views
Dear sir,
I have one problem with my Fortran program that I cannot solve for 3 weeks. My program does one loop iteratively. In each loop, there are about 2250 points that has to compute the values at the points. Now there are some logical errors in my program so it can run completely only 2 iterations. I use Fortran PowerStation 4.0. It say that I got the overflow problem. It is my task to find those logical errors, I am trying. However there is one thing that I do not understand. When I use command 'WRITE' to write the values of one array at all 2250 points in each loop, the loop will be terminated only in 1 iteration. The compiler say it is the overflow problem. I have checked that if I define that array correctly; and if the output is in the right format and the right range. Yes every thing seems reasonable. The problem occur in one subroutine. I tried to change the values of that array in some points before the calling statement for that array. And then print out the value of that array at every point. Yes the values changed at the points that I assigned correctly.
Only statements

NSPE=1
IJKM=2250
write(65,11)(r,(q_dash_p(r,1,1,s),s=1,NSPE+7),r=1,IJKM)
11 format(I6,E12.2,E12.2,E10.2,E10.2,E15.2,E15.2,E10.2,E10.2)

make the program terminated early 1 iteration. I checked that if the format of each values is correct. Yes they are corrected and the printed out values are reasonable too. However if I use the statements

NSPE=1
IJKM=2250
write(65,*)(r,(q_dash_p(r,1,1,s),s=1,NSPE+7),r=1,IJKM)

instead. I found that the loop will be terminated in iteration No.2 at about point No. 250.

Please someone suggest me. Thank you very much sir.
0 Kudos
1 Reply
Steven_L_Intel1
Employee
312 Views
You say you are using Microsoft Fortran PowerStation - please understand that this forum is for users of Compaq Fortran compilers, not those from other manufacturers. You should consider switching to Compaq Visual Fortran, the current, supported compiler that is highly compatible with Microsoft Fortran PowerStation.

Steve
0 Kudos
Reply