- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
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.
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.
Link Copied
1 Reply
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
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
Steve

Reply
Topic Options
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page