Hi,
I've been having trouble trying to read an input file. With the following message being generated and the program stopped:
fmt: end of file
apparent state: unit 25 named fort.25
last format: (I7,1X,F8.3,3X,F6.3,1X,F9.3,2(2X,F7.3))
lately reading sequential formatted external IO
./run_tom: line 209: 1707 Aborted ./object
Does anybody have any idea what could be causing this error? The relevant code is posted below.
CODE
c Read the data file
do j=1,nsupl
read(ichd,1201)time, ztlon(j),ztlat(j),ztpres(j),ztemp(j),zptemp(j)
write(6,*) 'itime, ztlon, ztlat, ztpres, ztemp and zptemp are '
ichd is a variable set to 25 causing the program to read the input file which is symbolically linked to fort.25.
1201 is the format string
CODE
format(i7,1x,f8.3,3x,f6.3,1x,f9.3,2(2x,f7.3))
which seems to match the input file perfectly.
Cheers very much in advance for any help
| 